Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

Pagetitle
CTCABR4 -

...

Personalización de encabezado
CTCABR4 -

...

Personalización de encabezado

Punto de entrada: CTCABR4 -

...

 

Personalización de encabezado

Alcances

...

:

Microsiga Protheus 8.11, Microsiga Protheus 10

...

...

Versiones:

Microsiga Protheus 8.11, Microsiga Protheus 10

...

Compatible países:

Todos

...

Compatible con las bases de datos:

...

Todas

 

...

Descripción:

...

El punto de entrada CTCABR4 permite la personalización de encabezado estándar para los informes de la versión R4.

Programa

...

fuente

CTBXFUN.PRX

...

Sintaxis

CTCABR4 -

...

Personalización de encabezado ( [ ] ) --> aCabec

...

Parámetros:

 

...


Nombre



Tipo

...



Descripción

...



Estándar

...



Obligatorio



Referencia






Array of Record

...














Devolución

...

aCabec

 

...

 

...

 

...

 

...

  ()

 

...

 

...

 

...

 

...

 

...

   array de retorno do cabecalho customizado

...

Ejemplos

User

...

Function  CTCABR4()Local

...

dDataIni

...

  Local dDataFim          Local cChar         := chr(160)

...

  //

...

carácter dummy

...

para alineamiento del encabezado   Local cDataExt       := ""If

...

NomeProg

...

=

...

"CTBR400"

...

  //

...

Ejemplo ->

...

Si fuera el Diario contable dDataIni       := mv_par01               dDataFim       := mv_par02    cDataExt := Transform(Day(dDataIni),'99')

...

+

...

"

...

de

...

"

...

+

...

MesExtenso(dDataIni)

...

+

...

"

...

de

...

"

...

+

...

Transform(Year(dDataIni),'9999');

...

            + " a " + Transform(Day(dDataFim),'99')

...

+

...

"

...

de

...

"

...

+

...

MesExtenso(dDataFim)

...

+

...

"

...

de

...

"

...

+

...

Transform(Year(dDataFim),'9999')

...

   aCabec

...

:=

...

{

...

cChar

...

+

...

"         " + "EMPRESA PRUEBA S/A"

...

  +

...

"         " + cChar;              , cChar + "         " + "000.000.000-0"

...

      + "         " + cChar;            , cChar + "         " + "LIBRO DIARIO"       + "         " + cChar;            , cChar + "         " + cDataExt             + "         " + cChar;                , cChar + "         " + RptFolha + TRANSFORM(oReport:Page(),'999999')

...

}                    Endif             Return aCabec

Variables


Nombre



Tipo



Alcance



Puede modificar



descripción






Array of Record



Global



No

Variáveis

 

 Nome  Tipo  Escopo  Pode Alterar  descrição 
    Array of Record  Global  Não    

 

...