#include "tc9200a.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 ENDPAGE TOOLBAR "" 0 -2 0 2 STRING DLG_PROFILE 50 BEGIN PROMPT 9 0 "Profilo " PSELECT FLAGS "H" END ENDPAGE PAGE "Invio dati contabilita'" 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 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 ENDMASK