#include "co1100a.h" TOOLBAR "topbar" 0 0 0 2 #include ENDPAGE PAGE "Stampa libro soci" 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 "F" 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 ENDPAGE ENDMASK