#include "cg3800a.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Stampa lista fatture doppie" 0 2 0 0 GROUPBOX DLG_NULL 62 4 BEGIN PROMPT 1 0 "@bDitta" END NUMBER F_CODDITTA 5 BEGIN PROMPT 2 1 "Codice " FLAGS "DFR" USE LF_NDITTE INPUT CODDITTA F_CODDITTA OUTPUT F_RAGSOC RAGSOC CHECKTYPE REQUIRED END STRING F_RAGSOC 50 BEGIN PROMPT 2 2 "Rag.Soc. " FLAGS "D" END DATE F_DADATA BEGIN PROMPT 2 4 "Dal " CHECKTYPE REQUIRED END DATE F_ADATA BEGIN PROMPT 2 5 "Al " VALIDATE DATE_CMP_FUNC >= F_DADATA WARNING "Data finale non valida" END ENDPAGE ENDMASK