Programacion Sintaxis ApiExcel

APIs de Programacion para API Office.

Informacion adicional con sintaxis en formato as400 (miembros).

miembro 1

      *-------------------------------------------------------*
      *       Miembro de Ayuda Operaciones API EXCEL CPI      *
      *-------------------------------------------------------*
      *--- Orden de Comienzo de API

           @XL_START DATA('AUTO') DATA2(' ')                           */
                 Para crear informes desde AS/400:
                 DATA debe contener 'NOAUTO' y DATA2 un nombre de
                 miembro de interface
      *--- Orden de Cierre de API

           @XL_END
      *
      *--- Operaciones con constantes
      *
      *-- Mueve una constante única

           @XL_MOVEX ROW('rrr') COL('ccc') DATA(dato)

      *-- Inicia el movimiento de un grupo de constantes a la derecha
      *- Debe cerrarse con una operación MOVEX

           @XL_MOVEXA ROW('rrr') COL('ccc') DATA(datoX)
      *
      *--- Operaciones con números
      *
      *-- Mueve dato numérico único

           @XL_MOVEN ROW('rrr') COL('ccc') DATA(datoN) DEC('0')

      *-- Inicia el movimiento de un grupo de datos numéricos a la
      *- derecha. Debe cerrarse con una operación MOVEN

           @XL_MOVENA ROW('rrr') COL('ccc') DATA(datoN) DEC('0')

             ROW y COL a blancos significa la fila o columna activa
             o la siguiente columna en el caso de un grupo
             ROW y COL admiten '+n' que significa la activa más n
             Si en ROW se indica '*NAME' o '*NAMETX' en COL se pone
             un nombre de celda

      *
      *--- Operaciones varias
      *
      *-- Activa una celda con el nombre indicado

           @XL ACTION('POS') DATA('NomCelda') DATA2(' ')

      *-- Activa una hoja del documento

           @XL ACTION('SHEET') DATA('n') DATA2(' ')

            n es el número de la hoja del documento

      *-- Inserta una fila antes de la fila de la celda con el nombre
      *-- que se indica. La fila insertada toma los atributos de la
      *-- fila anterior a la de la celda con ese nombre

           @XL ACTION('INSERT') DATA('NomCelda') DATA2(' ')

      *-- Font
           @XL ACTION('FONT') DATA(wfont1) DATA2(wfont2)

            wfont1 tiene una longitud de 14 posiciones siendo:
               01-04 Nombre de Font (ARI- o TNR- o MSS- MSSS o
                     ---- para no cambiar)
               05-05 - (un guión)
               06-07 SizeFont. Admite entre 05 y 50 (00 para no
                     cambiar). Admite también +n y -n para aumentar
                     o disminuir el tamaño.
               08-10 Atributos N=Negrita, I=Itálica, S=Subrayado
                     C=Centrar, R=Dcha, L=Izq
               11-12 ColorTexto de 00 a 15 ó -- para no cambiar
               13-14 ColorFondo de 00 a 15 ó -- para no cambiar
                        00=Negro 01=Azul 02=Verde 03=Cy   04=Rosa
                        05=Mag   06=Ama  07=Blan  08=Gris 09=Az+
                        10=Ver+  11=Cy+  12=Ros+  13=Mag+ 14=Bl+

            wfont2 tiene una longitud de 4 posiciones siendo:
               01-02 Columna desde (como 01,04...)
               03-04 Columna hasta (07, 09...)
               si esta a blancos el Font es para la celda activa

      *-- Borde

           @XL ACTION('BORDE') DATA(wbord1) DATA2(wbord2)

            wbord1 tiene una longitud de 5 posiciones siendo:
               01-01 - (un guión)
               02-03 Color del borde. mismo código de color que Font
               04-04 Grosor del Borde. De 1 a 4.
               05-05 Estilo.
                     1=Continuo 2=Rayas 3=Puntos 7=Doble
                     4=2+3      5=2+3+2 6=Gris   8=Auto

            wbord2 Columna desde hasta como wfont2.

            Puede combinarse una orden de BORDE con otra de FONT
            para el fondo del texto.

      *-- Borde sin verticales entre el ámbito de celdas

           @XL ACTION('BORDEA') DATA(wbord1) DATA2(wbord2)

            wbord1 tiene una longitud de 5 posiciones siendo:
               01-01 - (un guión)
               02-03 -- (dos guiones) No hay uso de color en BORDEA.
               04-04 - (un guión). No hay uso de Grosor.
               05-05 Estilo. Solo se usan los códigos 1 y 7.
                     También 2 y 3. Puede combinarse con Font de
                     Fondo.

            wbord2 Columna desde hasta como wfont2.

      *-- Emite una Pausa en el PC mostrando el contenido de campo

           @XL ACTION('PAUSA') DATA(campo) DATA2(' ')

      *-- Edición en contenido de celdas

           @XL ACTION('FORMAT') DATA(codedi) DATA2(coldh)

             codedi es un código de edición en modo Excel, por ejemplo:
                    '#.##0' ó '#.##0.00' (Se permite $ a izqda o dcha)
                    '#.##0_);[Red](#.##0)' (pone negativos en rojo)
             coldh  Columna desde hasta como wfont2

      *-- Aumento o Disminución del Tamaño de la columna activa

           @XL ACTION('SIZECOL') DATA(size) DATA2(coldh)

             size   es un código de edición en modo Excel, por ejemplo:
                    '#.##0' ó '#.##0.00' (Se permite $ a izqda o dcha)
                    '#.##0_);[Red](#.##0)' (pone negativos en rojo)
             coldh  Columna desde hasta como wfont2.
                    Una columna tipo de Excel tiene un tamaño de
                    12 aproximadamente.
                    Admite +n y -n para Aumentar/Disminuir el tamaño

      *-- Supresión de la fila que tiene una celda con ese nombre

           @XL ACTION('DELROW') DATA(Nomcelda) DATA2(' ')

      *-- Supresión de la columna que tiene una celda con ese nombre

           @XL ACTION('DELCOL') DATA(Nomcelda) DATA2(' ')

      *-- Supresión de un TextBox con ese nombre

           @XL ACTION('DELTX') DATA(Nomcelda) DATA2(' ')

      *-- Apertura desde 400

           @XL ACTION('START') DATA('NOAUTO') DATA2(Mbrinterf)
               Mbrinter es el miembro de interface

      *-- Desde el 400

           @XL ACTION('Open') DATA(TipoAper) DATA2(Numhoja)
               TipoAper admite 'VISIBLE', 'MIN', 'HIDE' o ' '.
               Numhoja admite n, ' ' o '*NEW'

      *-- Desde el 400

           @XL ACTION('Close') DATA('Y/N/?') DATA2(' ')

      *-- Desde el 400

           @XL ACTION('SaveAS') DATA(Path) DATA2(file sin exten)
               Path admite '*SOURCE', *TARGET, '*PGM', *EXCEL o un path

      *-- Desde el 400

           @XL ACTION('Save') DATA(' ') DATA2(' ')
               Salva el file abierto

      *-- Relativo a la impresión
      *- Alineación

           @XL ACTION('SETPRINT') DATA(posic) DATA2(' ')
               posic admite: 'PORT' Vertical o 'LAND' Horiz

      *- Centrado

           @XL ACTION('SETPRINT') DATA(centra) DATA2(' ')
             centra admite 'CenterV' Vertical o
                           'CenterH' Horizontal

      *- Creando cabeceras y pies del documento (las 3)

           @XL ACTION('SETPRINT') DATA(texto) DATA2(cabepie)
             texto  texto de las cabeceras o pies. en este texto
                    se admite controles:
                    I&=Itálica  &B=Bold   &U=Underline    &D=Date
                    &T=Time     &F=File   &A=TabName      &P=Page
                    &N=Pages    *PATH=Dir *USER1=EmpreReg *USER2=UsuarReg
                    Ejemplo:
                    'Página &P de &N'

      *- Imprimir solo BLACK&WHITE (no grises)

           @XL ACTION('SETPRINT') DATA('BW') DATA2(' ')

      *- Activar/Desactivar Impresión de Grid

           @XL ACTION('SETPRINT') DATA('Grid') DATA2(' ')

      *- Imprimir la Hoja activa

           @XL ACTION('PRINT') DATA('Y') DATA2(' ')

             'Y'= Sí. Admite también 'N'=No, '?' Pregunta

miembro 2 (macros?)

      *-------------------------------------------------------*
      *       Miembro de Ayuda Operaciones API EXCEL CPI      *
      *-------------------------------------------------------*
      *--- Orden de Comienzo de API
      *    @XL_START                                                   */

%XLSTC                     MOVEL'*START@ 'XL@ACC    P      ORDEN *STA
%XLSTC                     MOVELXL@MBI    XL@ROW    P      NOMBRE INT
%XLSTC                     EXSR XL@SR1                     API Excel

      *--- Orden de Cierre de API
      *    @XL_END

%XLENC                     MOVEL'*ENDPGM@'XL@ACC    P      API EXCEL
%XLENC                     EXSR XL@SR1                     API EXCEL
      *
      *--- Operaciones con constantes
      *
      *-- Mueve una constante única
      *    @XL_MOVEX ROW('rrr') COL('ccc') DATA(datoX)

%XLX C                     MOVEL'rrr  '   XL@ROW    P      Row / Fila
%XLX C                     MOVEL'ccc   '  XL@COL    P      Columna /
%XLX C                     MOVE 'X'       XL@TIP           Dato Alfab
%XLX C                     MOVELdatoX     XL@ALF           Contenido
%XLX C                     MOVEL'*WRITE  'XL@ACC    P      celda unic
%XLX C                     EXSR XL@SR1                     API Excel

      *-- Inicia el movimiento de un grupo de constantes a la derecha
      *- Debe cerrarse con una operación MOVEX
           @XL_MOVEXA ROW('rrr') COL('ccc') DATA(datoX)

%XLXAC                     MOVELrrr       XL@ROW    P      Row / Fila
%XLXAC                     MOVELccc       XL@COL    P      Columna /
%XLXAC                     MOVE 'X'       XL@TIP           Dato Alfab
%XLXAC                     MOVELdatoX     XL@ALF           Contenido
%XLXAC                     MOVEL'*ADD    'XL@ACC    P      celda de g
%XLXAC                     EXSR XL@SR1                     API Excel
      *
      *--- Operaciones con números
      *
      *-- Mueve dato numérico único
           @XL_MOVEN ROW('rrr') COL('ccc') DATA(datoN) DEC('0')
           Para rrr=*BLANKS
%XLN C                     MOVELrrr       XL@ROW    P      Row / Fila
%XLN C                     MOVELccc       XL@COL    P      Columna /
%XLN C                     MOVE '0'       XL@TIP           Num Decima
%XLN C                     Z-ADDdatoN     XL@NUM           Contenido
%XLN C                     MOVEL'*WRITE  'XL@ACC    P      celda unic
%XLN C                     EXSR XL@SR1                     API Excel

      *-- Inicia el movimiento de un grupo de datos numéricos a la
      *- derecha. Debe cerrarse con una operación MOVEN
      *    @XL_MOVENA ROW('rrr') COL('ccc') DATA(datoN) DEC('0')

%XLNAC                     MOVELrrr       XL@ROW    P      Row / Fila
%XLNAC                     MOVELccc       XL@COL    P      Columna /
%XLNAC                     MOVE '0'       XL@TIP           Num Decima
%XLNAC                     Z-ADDdatoN     XL@NUM           Contenido
%XLNAC                     MOVEL'*ADD    'XL@ACC    P      celda unic
%XLNAC                     EXSR XL@SR1                     API Excel

             ROW y COL a blancos significa la fila o columna activa
             o la siguiente columna en el caso de un grupo
             ROW y COL admiten '+n' que significa la activa más n
             Si en ROW se indica '*NAME' o '*NAMETX' en COL se pone
             un nombre de celda

      *
      *--- Operaciones varias
      *
      *-- Activa una celda con el nombre indicado
      *    @XL ACTION('POS') DATA('NomCelda') DATA2(' ')

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'POS'     XL@COL    P      Accion Ord
%XL  C                     MOVELNomCelda  XL@ALF    P      Contenido
%XL  C                     MOVEL' '       XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *-- Activa una hoja del documento
      *    @XL ACTION('SHEET') DATA('n') DATA2(' ')
            n es el número de la hoja del documento

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'SHEET'   XL@COL    P      Accion Ord
%XL  C                     MOVEL'n'       XL@ALF    P      Contenido
%XL  C                     MOVEL' '       XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *-- Inserta una fila antes de la fila de la celda con el nombre
      *-- que se indica. La fila insertada toma los atributos de la
      *-- fila anterior a la de la celda con ese nombre

      *    @XL ACTION('INSERT') DATA('NomCelda') DATA2(' ')

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'INSERT'  XL@COL    P      Accion Ord
%XL  C                     MOVELNomCelda  XL@ALF    P      Contenido
%XL  C                     MOVEL' '       XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *-- Font
      *    @XL ACTION('FONT') DATA(wfont1) DATA2(wfont2)

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'FONT'    XL@COL    P      Accion Ord
%XL  C                     MOVELWFONT1    XL@ALF    P      Contenido
%XL  C                     MOVELwfont2    XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

            wfont1 tiene una longitud de 14 posiciones siendo:
               01-04 Nombre de Font (ARI- o TNR- o MSS- MSSS o
                     ---- para no cambiar)
               05-05 - (un guión)
               06-07 SizeFont. Admite entre 05 y 50 (00 para no
                     cambiar). Admite también +n y -n para aumentar
                     o disminuir el tamaño.
               08-10 Atributos N=Negrita, I=Itálica, S=Subrayado
                     C=Centrar, R=Dcha, L=Izq
               11-12 ColorTexto de 00 a 15 ó -- para no cambiar
               13-14 ColorFondo de 00 a 15 ó -- para no cambiar
                        00=Negro 01=Azul 02=Verde 03=Cy   04=Rosa
                        05=Mag   06=Ama  07=Blan  08=Gris 09=Az+
                        10=Ver+  11=Cy+  12=Ros+  13=Mag+ 14=Bl+

            wfont2 tiene una longitud de 4 posiciones siendo:
               01-02 Columna desde (como 01,04...)
               03-04 Columna hasta (07, 09...)
               si esta a blancos el Font es para la celda activa

      *-- Borde
      *    @XL ACTION('BORDE') DATA(wbord1) DATA2(wbord2)

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'BORDE '  XL@COL    P      Accion Ord
%XL  C                     MOVELwbord1    XL@ALF    P      Contenido
%XL  C                     MOVELwbord2    XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

            wbord1 tiene una longitud de 5 posiciones siendo:
               01-01 - (un guión)
               02-03 Color del borde. mismo código de color que Font
               04-04 Grosor del Borde. De 1 a 4.
               05-05 Estilo.
                     1=Continuo 2=Rayas 3=Puntos 7=Doble
                     4=2+3      5=2+3+2 6=Gris   8=Auto

            wbord2 Columna desde hasta como wfont2.

            Puede combinarse una orden de BORDE con otra de FONT
            para el fondo del texto.

      *-- Borde sin verticales entre el ámbito de celdas
      *    @XL ACTION('BORDEA') DATA(wbord1) DATA2(wbord2)
            wbord1 tiene una longitud de 5 posiciones siendo:
               01-01 - (un guión)
               02-03 -- (dos guiones) No hay uso de color en BORDEA.
               04-04 - (un guión). No hay uso de Grosor.
               05-05 Estilo. Solo se usan los códigos 1 y 7.
                     También 2 y 3. Puede combinarse con Font de
                     Fondo.

            wbord2 Columna desde hasta como wfont2.

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'BORDEA'  XL@COL    P      Accion Ord
%XL  C                     MOVELwbord1'   XL@ALF    P      Contenido
%XL  C                     MOVELwbord2    XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *-- Emite una Pausa en el PC mostrando el contenido de campo
      *    @XL ACTION('PAUSA') DATA(campo) DATA2(' ')

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'PAUSA'   XL@COL    P      Accion Ord
%XL  C                     MOVELCAMPO     XL@ALF    P      Contenido
%XL  C                     MOVEL' '       XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *-- Edición en contenido de celdas
      *    @XL ACTION('FORMAT') DATA(codedi) DATA2(coldh)

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'FORMAT'  XL@COL    P      Accion Ord
%XL  C                     MOVELcodedi    XL@ALF    P      Contenido
%XL  C                     MOVELcoldh     XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

             codedi es un código de edición en modo Excel, por ejemplo:
                    '#.##0' ó '#.##0.00' (Se permite $ a izqda o dcha)
                    '#.##0_);[Red](#.##0)' (pone negativos en rojo)
             coldh  Columna desde hasta como wfont2

      *-- Aumento o Disminución del Tamaño de la columna activa
      *    @XL ACTION('SIZECOL') DATA(size) DATA2(coldh)
             size   es un código de edición en modo Excel, por ejemplo:
                    '#.##0' ó '#.##0.00' (Se permite $ a izqda o dcha)
                    '#.##0_);[Red](#.##0)' (pone negativos en rojo)
             coldh  Columna desde hasta como wfont2.
                    Una columna tipo de Excel tiene un tamaño de
                    12 aproximadamente.
                    Admite +n y -n para Aumentar/Disminuir el tamaño

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'SIZECOL' XL@COL    P      Accion Ord
%XL  C                     MOVELsize      XL@ALF    P      Contenido
%XL  C                     MOVELcoldh     XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *-- Supresión de la fila que tiene una celda con ese nombre
      *    @XL ACTION('DELROW') DATA(Nomcelda) DATA2(' ')

      *-- Supresión de la columna que tiene una celda con ese nombre
      *    @XL ACTION('DELCOL') DATA(Nomcelda) DATA2(' ')

      *-- Supresión de un TextBox con ese nombre
      *    @XL ACTION('DELTX') DATA(Nomcelda) DATA2(' ')

      *-- Relativo a la impresión
      *- Alineación
      *    @XL ACTION('SETPRINT') DATA(posic) DATA2(' ')
               posic admite: 'PORT' Vertical o 'LAND' Horiz

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'SETPRINT'XL@COL    P      Accion Ord
%XL  C                     MOVELposic     XL@ALF    P      Contenido
%XL  C                     MOVEL' '       XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *- Centrado
      *    @XL ACTION('SETPRINT') DATA(centra) DATA2(' ')
             centra admite 'CenterV' Vertical o
                           'CenterH' Horizontal

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'SETPRINT'XL@COL    P      Accion Ord
%XL  C                     MOVELcentra    XL@ALF    P      Contenido
%XL  C                     MOVEL' '       XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *- Creando cabeceras y pies del documento (las 3)
      *    @XL ACTION('SETPRINT') DATA(texto) DATA2(cabepie)
             texto  texto de las cabeceras o pies. en este texto
                    se admite controles:
                    I&=Itálica  &B=Bold   &U=Underline    &D=Date
                    &T=Time     &F=File   &A=TabName      &P=Page
                    &N=Pages    *PATH=Dir *USER1=EmpreReg *USER2=UsuarReg
                    Ejemplo:
                    'Página &P de &N'

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'SETPRINT'XL@COL    P      Accion Ord
%XL  C                     MOVELtexto     XL@ALF    P      Contenido
%XL  C                     MOVELcabepie   XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *- Imprimir solo BLACK&WHITE (no grises)
      *    @XL ACTION('SETPRINT') DATA('BW') DATA2(' ')

      *- Activar/Desactivar Impresión de Grid
      *    @XL ACTION('SETPRINT') DATA('Grid') DATA2(' ')

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'SETPRINT'XL@COL    P      Accion Ord
%XL  C                     MOVEL'GRID'    XL@ALF    P      Contenido
%XL  C                     MOVEL'N'       XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

      *- Imprimir la Hoja activa
           @XL ACTION('PRINT') DATA('Y') DATA2(' ')
             'Y'= Sí. Admite también 'N'=No, '?' Pregunta

%XL  C                     MOVEL'*ACTION' XL@ACC    P      Accion
%XL  C                     MOVEL'PRINT'   XL@COL    P      Accion Ord
%XL  C                     MOVEL'Y'       XL@ALF    P      Contenido
%XL  C                     MOVEL' '       XL@ROW    P      Contenido
%XL  C                     EXSR XL@SR1                     API Excel

 
/kunden/homepages/8/d674751560/htdocs/cpies/doc/data/pages/api_office/programacionsintaxis.txt · Última modificación: 4/04/2017 06:30 (editor externo)
[unknown button type]
 
Excepto donde se indique lo contrario, el contenido de este wiki esta bajo la siguiente licencia: CC Attribution-Noncommercial-Share Alike 4.0 International
Recent changes RSS feed Donate Powered by PHP Valid XHTML 1.0 Valid CSS Driven by DokuWiki