campo-sirio/dt/dt0300a.uml
alex d8cfba9e4f Patch level : 2.2 no patch
Files correlati     :  ci1.exe
Ricompilazione Demo : [ ]
Commento            :

Aggiunto modulo dt


git-svn-id: svn://10.65.10.50/trunk@13191 c028cbd2-c16b-5b4b-a496-9718f37d4682
2005-06-10 12:55:53 +00:00

98 lines
1.3 KiB
Plaintext
Executable File

#include "dt0300a.h"
TOOLBAR "" 0 -2 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -11 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -11 ""
END
ENDPAGE
PAGE "Configurazione modulo" -1 -1 60 21
SPREADSHEET F_SHEETCONFIG
BEGIN
PROMPT 1 2 ""
ITEM "Causale"
ITEM "Tipo doc. DT"
ITEM "Cod. num."
ITEM "Tipo doc."
ITEM "Stato"
END
ENDPAGE
ENDMASK
PAGE "" -1 -1 75 10
STRING F_S_CAUS 4
BEGIN
PROMPT 1 1 "Causale "
FLAGS "U"
CHECKTYPE NORMAL
END
STRING F_S_TIPODOCDT 4
BEGIN
PROMPT 1 2 "Tipo doc. DT "
FLAGS "U"
CHECKTYPE NORMAL
END
STRING F_S_CODNUM 4
BEGIN
PROMPT 1 4 "Codice numerazione "
FLAGS "U"
USE %NUM
INPUT CODTAB F_S_CODNUM
DISPLAY "Cod. Num." CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_S_CODNUM CODTAB
CHECKTYPE NORMAL
END
STRING F_S_TIPODOC 4
BEGIN
PROMPT 1 5 "Tipo documento "
FLAGS "UB"
USE %TIP
INPUT CODTAB F_S_TIPODOC
DISPLAY "Cod. Num." CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_S_TIPODOC CODTAB
CHECKTYPE NORMAL
END
STRING F_S_STATO 1
BEGIN
PROMPT 1 6 "Stato "
USE %STD
INPUT CODTAB F_S_STATO
DISPLAY "Stato" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_S_STATO CODTAB
CHECKTYPE NORMAL
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK