#include "ps0830100a.h" PAGE "Esportazione listino" -1 -1 78 8 GROUPBOX DLG_NULL 75 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 75 4 BEGIN PROMPT 2 4 "Esportazione" END STRING F_PATH 255 40 BEGIN PROMPT 3 5 "Cartella " DSELECT FLAGS "M" CHECKTYPE REQUIRED FIELD PATH WARNING "Selezionare una cartella valida!" END STRING F_NAME 30 BEGIN PROMPT 3 6 "Nome file " FLAGS "M" CHECKTYPE REQUIRED FIELD NAME END ENDPAGE TOOLBAR "topbar" 0 0 0 2 BUTTON DLG_PREVIEW 9 2 BEGIN PROMPT -13 -1 "~Anteprima" PICTURE TOOL_PREVIEW END #include ENDPAGE ENDMASK