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

Trasferimento a Zucchetti


git-svn-id: svn://10.65.10.50/trunk@19931 c028cbd2-c16b-5b4b-a496-9718f37d4682
2010-01-15 12:44:48 +00:00

154 lines
2.0 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
TOOLBAR "" 0 -2 0 2
STRING DLG_PROFILE 50
BEGIN
PROMPT 9 0 "Profilo "
PSELECT
END
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 6
BEGIN
PROMPT 2 4 "Dati da inviare"
END
BOOLEAN F_CAUSALI
BEGIN
PROMPT 3 5 "Causali"
END
BOOLEAN F_CONTI
BEGIN
PROMPT 3 6 "Conti"
END
BOOLEAN F_CLIFOR
BEGIN
PROMPT 3 7 "Clienti/Fornitori"
END
BOOLEAN F_MOVCONT
BEGIN
PROMPT 3 8 "Movimenti contabili"
MESSAGE TRUE,ENABLE F_DATAFIN
END
BOOLEAN F_MOVIVA
BEGIN
PROMPT 40 5 "Movimenti IVA"
MESSAGE TRUE,ENABLE F_DATAFIN
END
BOOLEAN F_CORRISP
BEGIN
PROMPT 40 6 "Corrispettivi"
MESSAGE TRUE,ENABLE F_DATAFIN
END
BOOLEAN F_SALDACONTO
BEGIN
PROMPT 40 7 "Saldaconto"
FLAGS "D"
END
LISTBOX F_TIPOINVIO 20
BEGIN
PROMPT 2 10 "Invio a "
ITEM "Z|Zucchetti"
END
STRING F_DESTINAZIONE 20
BEGIN
PROMPT 2 11 "Destinazione "
END
BOOLEAN F_TRCAU
BEGIN
PROMPT 2 12 "Trascodifica causali"
END
BOOLEAN F_TRCON
BEGIN
PROMPT 2 13 "Trascodifica conti"
END
BOOLEAN F_TRIVA
BEGIN
PROMPT 2 14 "Trascodifica codici IVA"
END
BOOLEAN F_TRBAN
BEGIN
PROMPT 2 15 "Trascodifica banche"
END
NUMBER F_NUMEROINVIO 2
BEGIN
PROMPT 2 16 "Numero invio "
END
DATE F_DATAINI
BEGIN
PROMPT 20 16 "Data iniz. "
END
DATE F_DATAFIN
BEGIN
PROMPT 44 16 "Data fin. "
END
BUTTON F_RIPRISTINA 20
BEGIN
PROMPT 2 18 "Annulla invio"
MESSAGE SHOW,F_DATARIPRISTINO|ENABLE,F_DATARIPRISTINO
END
DATE F_DATARIPRISTINO
BEGIN
PROMPT 25 18 "Annulla invio fino al "
FLAGS "HD"
END
ENDPAGE
ENDMASK