campo-sirio/ce/ceeur11.uml

89 lines
1.2 KiB
Plaintext
Raw Normal View History

#include "ceeur11.h"
TOOLBAR "" 0 -3 0 3
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -11 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -11 ""
END
ENDPAGE
PAGE "Conversione ditta" 0 0 80 18
GROUPBOX DLG_NULL 78 6
BEGIN
PROMPT 1 1 "@bDitta da convertire"
END
NUMBER F11_DITTA 5
BEGIN
PROMPT 2 2 "Ditta "
USE LF_NDITTE
INPUT CODDITTA F11_DITTA
OUTPUT F11_RAGSOC RAGSOC
CHECKTYPE NORMAL
FLAGS "DF"
END
STRING F11_RAGSOC 50
BEGIN
PROMPT 21 2 ""
FLAGS "D"
END
STRING F11_DATI 50
BEGIN
PROMPT 2 3 "Area dati in Lire "
FLAGS "D"
END
STRING F11_DATIE 50
BEGIN
PROMPT 2 4 "Area dati in Euro "
FLAGS "D"
END
DATE F11_ADOZIONE
BEGIN
PROMPT 2 5 "Data adozione Euro "
USE ESC
INPUT D0 F11_ADOZIONE
DISPLAY "Codice Esercizio" CODTAB
DISPLAY "Inizio Esercizio" D0
DISPLAY "Fine Esercizio" D1
OUTPUT F11_ADOZIONE D0
CHECKTYPE SEARCH
ADD NONE
FLAGS "D"
END
GROUPBOX DLG_NULL 78 5
BEGIN
PROMPT 1 10 "@bOperazioni"
END
BOOLEAN F11_COPY
BEGIN
PROMPT 2 11 "Copia cespiti"
END
BOOLEAN F11_SALDI
BEGIN
PROMPT 2 12 "Conversione saldi e categorie 2001"
END
BOOLEAN F11_MOVIM
BEGIN
PROMPT 2 13 "Conversione movimenti 2001"
END
ENDPAGE
ENDMASK