campo-sirio/tc/tc9200a.uml
luca 793b3a85b0 Patch level :4.0 649
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :modulo TC; tc1 e tc9 sostituiscono cg7


git-svn-id: svn://10.65.10.50/trunk@15013 c028cbd2-c16b-5b4b-a496-9718f37d4682
2007-03-07 15:04:34 +00:00

81 lines
1011 B
Plaintext
Executable File

#include "tc9200a.h"
PAGE "Invio dati contabilita'" -1 -1 78 20
GROUPBOX DLG_NULL 76 3
BEGIN
PROMPT 2 1 "@bDitta corrente"
END
NUMBER F_CODDITTA 5
BEGIN
PROMPT 3 2 "Codice "
FLAGS "FD"
USE LF_NDITTE
INPUT CODDITTA F_CODDITTA
OUTPUT F_RAGSOC RAGSOC
CHECKTYPE REQUIRED
END
STRING F_RAGSOC 50
BEGIN
PROMPT 23 2 ""
FLAGS "D"
END
GROUPBOX DLG_NULL 76 4
BEGIN
PROMPT 2 4 "Dati da inviare"
END
BOOLEAN F_CLIFOR
BEGIN
PROMPT 3 5 "Clienti/Fornitori"
END
BOOLEAN F_MOVCONT
BEGIN
PROMPT 3 6 "Movimenti"
MESSAGE TRUE,ENABLE F_DATAFIN
END
LISTBOX F_TIPOINVIO 20
BEGIN
PROMPT 2 8 "Invio a "
ITEM "S|Sispac/Cosmo"
END
STRING F_DESTINAZIONE 20
BEGIN
PROMPT 2 9 "Destinazione "
END
NUMBER F_NUMEROINVIO 2
BEGIN
PROMPT 2 10 "Numero invio "
END
DATE F_DATAINI
BEGIN
PROMPT 20 10 "Data iniz. "
END
DATE F_DATAFIN
BEGIN
PROMPT 44 10 "Data fin. "
END
BUTTON DLG_OK 9 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 9 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK