campo-sirio/tc/tc1100a.uml
alex bb5905b448 Patch level : 10.958
Files correlati     :  tc1.exe
Ricompilazione Demo : [ ]
Commento            :

Modificato linvio dei clienti e delle fatture intra a zucchetti


git-svn-id: svn://10.65.10.50/branches/R_10_00@21806 c028cbd2-c16b-5b4b-a496-9718f37d4682
2011-03-17 13:46:39 +00:00

117 lines
1.4 KiB
Plaintext
Executable File

#include "tc1100a.h"
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_ELABORA 10 2
BEGIN
PROMPT -12 -11 "~Elabora"
PICTURE BMP_ELABORA
MESSAGE EXIT,K_ENTER
END
#include <helpbar.h>
ENDPAGE
PAGE "Invio dati contabilita' a Zucchetti" 0 2 0 0
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 7
BEGIN
PROMPT 2 4 "Dati da inviare"
END
BOOLEAN F_CAUSALI
BEGIN
PROMPT 3 5 "Causali"
FIELD CAUSALI
END
BOOLEAN F_CONTI
BEGIN
PROMPT 3 6 "Conti"
END
BOOLEAN F_CLIFOR
BEGIN
PROMPT 3 7 "Clienti/Fornitori"
END
BOOLEAN F_RECCLIFOR
BEGIN
PROMPT 3 8 "Ricodifica i clienti/Fornitoti"
END
BOOLEAN F_MOVCONT
BEGIN
PROMPT 3 9 "Movimenti contabili"
END
BOOLEAN F_MOVIVA
BEGIN
PROMPT 40 5 "Movimenti IVA"
END
BOOLEAN F_CORRISP
BEGIN
PROMPT 40 6 "Corrispettivi"
FLAGS "D"
END
BOOLEAN F_SALDACONTO
BEGIN
PROMPT 40 7 "Saldaconto"
FLAGS "D"
END
STRING F_PATH 256 39
BEGIN
PROMPT 2 12 "Cartella "
DSELECT
END
STRING F_FILE 18
BEGIN
PROMPT 2 14 "File "
END
NUMBER F_NUMEROINVIO 2
BEGIN
PROMPT 2 16 "Numero invio "
FLAGS "D"
END
DATE F_DATAINI
BEGIN
PROMPT 2 18 "Data iniz. "
END
DATE F_DATAFIN
BEGIN
PROMPT 42 18 "Data fin. "
END
ENDPAGE
ENDMASK