#include "ca3300a.h" TOOLBAR "" 0 -3 0 3 BUTTON DLG_OK 10 2 BEGIN PROMPT -12 -11 "" END BUTTON DLG_QUIT 10 2 BEGIN PROMPT -22 -11 "" END ENDPAGE PAGE "Stampa bilancio" -1 -1 76 16 NUMBER F_CODDITTA 5 BEGIN PROMPT 2 1 "Ditta " FLAGS "FRD" USE LF_NDITTE KEY 1 CHECKTYPE REQUIRED INPUT CODDITTA F_CODDITTA DISPLAY "Codice" CODDITTA DISPLAY "Ragione sociale @50" RAGSOC OUTPUT F_CODDITTA CODDITTA OUTPUT F_RAGSOC RAGSOC END STRING F_RAGSOC 50 BEGIN PROMPT 2 2 "Ragione sociale " FLAGS "D" END DATE F_DATASTAMPA BEGIN PROMPT 48 1 "Data stampa " HELP "Data che verra' stampata sul bilancio" FLAGS "A" END NUMBER F_ANNO 4 BEGIN PROMPT 2 3 "Codice esercizio " HELP "Esercizio di cui si vuole ottenere il bilancio" USE ESC INPUT CODTAB F_ANNO DISPLAY "Codice" CODTAB DISPLAY "Data inizio esercizio" D0 DISPLAY "Data fine esercizio" D1 OUTPUT F_ANNO CODTAB FLAGS "Z" CHECKTYPE NORMAL WARNING "L'esercizio non esiste" ADD RUN cg0 -5 esc MESSAGE EMPTY SHOW,6@|HIDE,7@|K_SPACE,F_STAMPA MESSAGE HIDE,6@|SHOW,7@|K_SPACE,F_STAMPA END LIST F_BILANCIO 22 BEGIN PROMPT 2 4 "Tipo bilancio" HELP "Indicare il tipo di bilancio da stampare" ITEM "1|A sezioni contrapposte" MESSAGE HIDE,4@|RESET,4@|SHOW,3@ ITEM "2|Di verifica" MESSAGE SHOW,4@|HIDE,3@|K_SPACE,F_STAMPA END LIST F_STAMPA 22 BEGIN PROMPT 41 4 "Tipo stampa" HELP "Indicare il tipo di stampa" ITEM "1|Per date limite" MESSAGE SHOW,5@|K_SPACE,F_BILANCIO ITEM "2|All'ultima immissione" MESSAGE HIDE,5@|RESET,5@ END GROUPBOX DLG_NULL 40 3 BEGIN PROMPT 0 5 "@bData operazione" GROUP 6 END GROUPBOX DLG_NULL 40 3 BEGIN PROMPT 0 5 "@bData competenza" GROUP 7 END DATE F_DATADA BEGIN PROMPT 2 6 "Dal " HELP "Data dalla quale iniziare la stampa" GROUP 4 5 END DATE F_DATAA BEGIN PROMPT 20 6 "Al " GROUP 5 END LIST F_STAMPAMPROV 20 BEGIN PROMPT 41 6 "Bilancio " ITEM "1|Preventivo" ITEM "2|Consuntivo" ITEM "3|Raffronto" GROUP 3 END LIST F_STAMPAV 20 BEGIN PROMPT 41 6 "Tipo stampa" ITEM "1|Movimentati" ITEM "2|Con saldo <> da 0" ITEM "3|Tutti" GROUP 4 END BOOLEAN F_CODICI BEGIN PROMPT 2 8 "Non stampare codici conti " HELP "Indicare se non si devono stampare i codici dei conti" GROUP 4 END GROUPBOX DLG_NULL 78 6 BEGIN PROMPT 0 9 "@bDa:" END GROUPBOX DLG_NULL 78 6 BEGIN PROMPT 0 15 "@bA:" END STRING F_REPORT 256 64 BEGIN PROMPT 1 21 "Report " END ENDPAGE PAGE "Selezioni" -1 -1 74 20 SPREADSHEET F_RIGHE -1 -2 BEGIN PROMPT 0 2 "" ITEM "Cdc 1" ITEM "Cdc 2" ITEM "Cdc 3" ITEM "Cdc 4" ITEM "Cms 1" ITEM "Cms 2" ITEM "Cms 3" ITEM "Cms 4" ITEM "Fas 1" ITEM "Fas 2" ITEM "Fas 3" ITEM "Fas 4" END ENDPAGE ENDMASK PAGE "Riga" -1 -1 78 19 STRING S_CDC1 20 BEGIN PROMPT 1 2 "Cdc1" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC2 20 BEGIN PROMPT 21 2 "Cdc2" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC3 20 BEGIN PROMPT 41 2 "Cdc3" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC4 20 BEGIN PROMPT 61 2 "Cdc4" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC5 20 BEGIN PROMPT 1 3 "Cdc5" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC6 20 BEGIN PROMPT 21 3 "Cdc6" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC7 20 BEGIN PROMPT 41 3 "Cdc7" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC8 20 BEGIN PROMPT 61 3 "Cdc8" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC9 20 BEGIN PROMPT 1 4 "Cdc9" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC10 20 BEGIN PROMPT 21 4 "Cdc10" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC11 20 BEGIN PROMPT 41 4 "Cdc11" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END STRING S_CDC12 20 BEGIN PROMPT 61 4 "Cdc12" FLAGS "B" CHECKTYPE NORMAL GROUP 1 END BUTTON DLG_OK 10 2 BEGIN PROMPT -13 -1 "" END BUTTON DLG_DELREC 10 2 BEGIN PROMPT -23 -1 "" END BUTTON DLG_CANCEL 10 2 BEGIN PROMPT -33 -1 "" END ENDPAGE ENDMASK