4D Write v16WR INSERT PAGE NUMBER |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D Write v16
WR INSERT PAGE NUMBER
|
WR INSERT PAGE NUMBER ( area ; formato ; tipoPag ) | ||||||||
Parámetro | Tipo | Descripción | ||||||
area | Entero largo |
![]() |
Área 4D Write | |||||
formato | Entero |
![]() |
Tipo de formato | |||||
tipoPag | Entero |
![]() |
Número a insertar 0 = Número de página, 1 = Número total de páginas | |||||
El comando WR INSERT PAGE NUMBER permite insertar en la posición del cursor, una referencia que muestra el número de página actual o el número total de páginas. Esta referencia puede ubicarse en el texto principal, en el pie de página o en el encabezado. Puede utilizar el comando WR SET FRAME para colocar el cursor en el área que elija.
formato le permite elegir el formato de salida de la variable insertada. En este parámetro, puede pasar una de las siguientes constantes del tema WR Formatos número de página:
Constante | Tipo | Valor |
wr 123 | Entero largo | 0 |
wr abc | Entero largo | 1 |
wr ABC | Entero largo | 2 |
wr i ii iii | Entero largo | 3 |
wr I II III | Entero largo | 4 |
El parámetro opcional tipoPag permite insertar el número de página actual o el número total de páginas del documento actual. Si pasa la constante wr page number (valor 0) o si omite este parámetro, se inserta el número de página actual. Si pasa la constante wr total number of pages (valor 1), se inserta el número total de páginas del documento.
El siguiente método (OddPages) está asociado a una variable insertada en el pie de página del documento actual:
`Revisión de si el modo "Diferente en páginas izquierda y derecha" ya está activado
If(WR Get doc property(Area;wr different left right pages)#1)
`Si no, activar este modo
WR SET DOC PROPERTY(Area;wr different left right pages;1)
ALERT("Atención: el documento ya está en modo 'Diferente en páginas izquierda y derecha")
End if
`Ubicamos el cursor en el pie de página izquierdo
WR SET FRAME(Area;wr left footer)
`Insertamos 'Page X' en mayúsculas romanas
WR INSERT TEXT(Area;"Page ")
WR INSERT PAGE NUMBER(Area;wr i ii iii;wr page number)
WR INSERT TEXT(Area;" on ")
WR INSERT PAGE NUMBER(Area;wr i ii iii;wr total number of pages)
Producto: 4D Write
Tema: WR Objetos dinámicos
Número
89473
Modificado: 4D Write 6.5.3
4D Write - Lenguaje ( 4D Write v16)