#include "scselmsk.h" #include "sc2400a.h" PAGE "Stampa solleciti" -1 -1 68 17 NUMBER F_CODDITTA 5 BEGIN PROMPT 1 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 15 1 "R.S. " FLAGS "D" END GROUPBOX DLG_NULL 68 7 BEGIN PROMPT 0 2 "" END NUMBER F_CODPROF 4 BEGIN PROMPT 1 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 DISPLAY "Descrizione@50" DESC OUTPUT F_CODPROF CODPROF[1,4] OUTPUT F_LINPROF CODPROF[5,5] OUTPUT F_DESPROF DESC CHECKTYPE REQUIRED FIELD ANTICLEAR WARNING "Codice profilo o lingua errato" END STRING F_LINPROF 1 BEGIN PROMPT 18 3 "" USE %LNG INPUT CODTAB F_LINPROF DISPLAY "Codice" CODTAB DISPLAY "Descrizione@50" S0 OUTPUT F_LINPROF CODTAB CHECKTYPE NORMAL END STRING F_DESPROF 50 40 BEGIN PROMPT 25 3 "" FLAGS "D" END DATE F_DATALIMSOL BEGIN PROMPT 1 4 "Data limite sollecito " FLAGS "A" VALIDATE DATE_CMP_FUNC <= F_DATASEND WARNING "La data limite sollecito deve essere specificata e non puņ essere superiore alla data di invio" CHECKTYPE REQUIRED END NUMBER F_IMPORMIN 18 BEGIN PROMPT 1 5 "Importo minimo " END RADIOBUTTON F_RIFIMPMIN 10 BEGIN PROMPT 45 4 "" ITEM "P|Partita" ITEM "C|Cliente" END BOOLEAN F_STAMPESP BEGIN PROMPT 1 6 "Stampa esposizione" END STRING F_LUOGOSEND 50 32 BEGIN PROMPT 1 7 "Luogo d'invio " END DATE F_DATASEND BEGIN PROMPT 50 7 "Data " FLAGS "A" CHECKTYPE REQUIRED END RADIOBUTTON SC_SORTCF 40 BEGIN PROMPT 1 9 "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 50 10 "~Selezione" END BUTTON SC_RESET 10 1 BEGIN PROMPT 50 11 "~Azzera" END NUMBER SC_CFCODFR 5 BEGIN PROMPT 1 13 "Da codice " GROUP 1 END BUTTON SC_CFBUTFR 2 1 BEGIN PROMPT 31 13 "" GROUP 1 PICTURE 109 END NUMBER SC_CFCODTO 5 BEGIN PROMPT 36 13 "a codice " GROUP 1 END BUTTON SC_CFBUTTO 2 1 BEGIN PROMPT 51 13 "" PICTURE 109 GROUP 1 END STRING SC_CFDESFR 50 30 BEGIN PROMPT 1 13 "Da ragione sociale " GROUP 2 FLAGS "H" END BUTTON SC_CFDESBUTFR 2 1 BEGIN PROMPT 51 13 "" PICTURE 109 GROUP 2 FLAGS "H" END STRING SC_CFDESTO 50 30 BEGIN PROMPT 2 14 "A ragione sociale " GROUP 2 FLAGS "H" END BUTTON SC_CFDESBUTTO 2 1 BEGIN PROMPT 51 14 "" PICTURE 109 GROUP 2 FLAGS "H" END NUMBER SC_NSEL 3 BEGIN PROMPT 59 13 "N. " FLAGS "D" END BUTTON DLG_PRINT 10 2 BEGIN PROMPT -12 -1 "" MESSAGE EXIT,K_ENTER END BUTTON DLG_QUIT 10 2 BEGIN PROMPT -22 -1 "" END ENDPAGE ENDMASK