Errore MI6053

git-svn-id: svn://10.65.10.50/trunk@3544 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-09-09 08:39:16 +00:00
parent 190a6664b2
commit a6b954546c

View File

@ -4,7 +4,7 @@ TOOLBAR "" 0 20 0 2
#include <toolbar.h> #include <toolbar.h>
ENDPAGE ENDPAGE
PAGE "Tabella Indici Libro Unico" -1 -1 71 20 PAGE "Tabella Indici Libro Unico" -1 -1 71 20
@ -47,7 +47,7 @@ BEGIN
INPUT CODLIB F_CODLIB INPUT CODLIB F_CODLIB
INPUT NUMREG F_INDEX INPUT NUMREG F_INDEX
DISPLAY "Anno" ANNO DISPLAY "Anno" ANNO
DISPLAY "Codice Libro Unico" CODLIB DISPLAY "Codice libro" CODLIB
// DISPLAY "Descrizione@50" %LBU->S0 // DISPLAY "Descrizione@50" %LBU->S0
DISPLAY "Indice@7" NUMREG DISPLAY "Indice@7" NUMREG
DISPLAY "Ditta" CODDITTA DISPLAY "Ditta" CODDITTA
@ -87,7 +87,7 @@ NUMBER F_PFIN_LU 5
BEGIN BEGIN
PROMPT 1 4 "Numero pagina finale registro unico " PROMPT 1 4 "Numero pagina finale registro unico "
FIELD PAGFIN FIELD PAGFIN
FLAGS "UR" FLAGS "UR"
NUM_EXPR {#THIS_FIELD>=#F_PINI_LU} NUM_EXPR {#THIS_FIELD>=#F_PINI_LU}
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
WARNING "Inserire un numero di pagina superiore a quella iniziale" WARNING "Inserire un numero di pagina superiore a quella iniziale"
@ -98,7 +98,7 @@ BEGIN
PROMPT 1 6 "Codice ditta " PROMPT 1 6 "Codice ditta "
FIELD CODDITTA FIELD CODDITTA
USE LF_NDITTE USE LF_NDITTE
INPUT CODDITTA F_DITTA INPUT CODDITTA F_DITTA
DISPLAY "Codice ditta" CODDITTA DISPLAY "Codice ditta" CODDITTA
DISPLAY "Ragione sociale@50" RAGSOC DISPLAY "Ragione sociale@50" RAGSOC
OUTPUT F_DITTA CODDITTA OUTPUT F_DITTA CODDITTA
@ -169,7 +169,7 @@ END
STRING F_CODVID 3 STRING F_CODVID 3
BEGIN BEGIN
PROMPT 1 14 "Codice vidimazione " PROMPT 1 14 "Codice vidimazione "
FIELD CODVID FIELD CODVID
FLAGS "UZ" FLAGS "UZ"
USE %VID USE %VID
INPUT CODTAB F_CODVID INPUT CODTAB F_CODVID