#include "scselmsk.h" #include "sc2400a.h" TOOLBAR "" 0 0 0 2 #include ENDPAGE PAGE "Stampa solleciti" 0 0 0 0 NUMBER F_CODDITTA 5 BEGIN PROMPT 2 1 "Cod. " FLAGS "DFR" USE LF_NDITTE INPUT CODDITTA F_CODDITTA OUTPUT F_RAGSOC RAGSOC CHECKTYPE REQUIRED END STRING F_RAGSOC 50 46 BEGIN PROMPT 16 1 "R.S. " FLAGS "DP" END GROUPBOX DLG_NULL 68 8 BEGIN PROMPT 1 2 "" END NUMBER F_CODPROF 4 BEGIN PROMPT 2 3 "Profilo " FLAGS "Z" USE LF_FORM INPUT TIPOPROF BASE_EC_PROFILE INPUT CODPROF[1,4] F_CODPROF INPUT CODPROF[5,5] F_LINPROF DISPLAY "Codice" CODPROF[1,4] DISPLAY "Lingua" CODPROF[5,5] DISPLAY "Descrizione@50" DESC OUTPUT F_CODPROF CODPROF[1,4] OUTPUT F_LINPROF CODPROF[5,5] OUTPUT F_DESPROF DESC FIELD ANTICLEAR WARNING "Codice profilo o lingua errato" ADD RUN sc3 -0 END STRING F_LINPROF 1 BEGIN PROMPT 19 3 "" FLAGS "U" USE LF_FORM INPUT TIPOPROF BASE_EC_PROFILE INPUT CODPROF[1,4] F_CODPROF INPUT CODPROF[5,5] F_LINPROF DISPLAY "Codice" CODPROF[1,4] DISPLAY "Lingua" CODPROF[5,5] DISPLAY "Descrizione@50" DESC OUTPUT F_CODPROF CODPROF[1,4] OUTPUT F_LINPROF CODPROF[5,5] OUTPUT F_DESPROF DESC CHECKTYPE NORMAL WARNING "Codice profilo o lingua errato" END STRING F_DESPROF 50 40 BEGIN PROMPT 26 3 "" FLAGS "D" END DATE F_DATALIMOP BEGIN PROMPT 2 4 "Data limite operazione " END DATE F_DATALIMSOL BEGIN PROMPT 2 5 "Data limite sollecito " FLAGS "A" // VALIDATE DATE_CMP_FUNC <= F_DATASEND // WARNING "La data limite sollecito deve essere specificata e non puo' essere superiore alla data di invio" CHECKTYPE REQUIRED END CURRENCY F_IMPORMIN 18 BEGIN PROMPT 2 6 "Importo minimo " END RADIOBUTTON F_RIFIMPMIN 12 BEGIN PROMPT 50 5 "" ITEM "P|Partita" ITEM "C|Cliente" END BOOLEAN F_STAMPESP BEGIN PROMPT 2 7 "Stampa esposizione" END BOOLEAN F_STAMPSALDO BEGIN PROMPT 26 7 "Stampa saldo partita" END STRING F_LUOGOSEND 50 32 BEGIN PROMPT 2 8 "Luogo d'invio " END DATE F_DATASEND BEGIN PROMPT 51 8 "Data " FLAGS "A" CHECKTYPE REQUIRED END RADIOBUTTON SC_SORTCF 25 BEGIN PROMPT 1 10 "Ordinamento" ITEM "1|Per codice" MESSAGE HIDE,2@|SHOW,1@ ITEM "2|Per ragione sociale" MESSAGE HIDE,1@|SHOW,2@ END BUTTON SC_SELECT 10 1 BEGIN PROMPT 51 11 "S~elezione" END BUTTON SC_RESET 10 1 BEGIN PROMPT 51 12 "A~zzera" END NUMBER SC_CFCODFR 6 BEGIN PROMPT 2 14 "Da codice " FLAGS "B" GROUP 1 END NUMBER SC_CFCODTO 6 BEGIN PROMPT 37 14 "a codice " FLAGS "B" GROUP 1 END STRING SC_CFDESFR 50 40 BEGIN PROMPT 2 14 "Da ragione sociale " GROUP 2 FLAGS "HB" END STRING SC_CFDESTO 50 40 BEGIN PROMPT 3 15 "A ragione sociale " GROUP 2 FLAGS "HB" END NUMBER SC_NSEL 3 BEGIN PROMPT 60 13 "N. " FLAGS "D" END ENDPAGE ENDMASK