campo-sirio/sc/sc2400a.uml
gianluca a4271cdf75 Aggiunta la stampa dei solleciti. Estratti alcuni oggetti dalla stampa
dell'estratto conto. Creata la relativa maschera.


git-svn-id: svn://10.65.10.50/trunk@2242 c028cbd2-c16b-5b4b-a496-9718f37d4682
1995-12-05 17:17:41 +00:00

155 lines
2.2 KiB
Plaintext
Executable File

#include "scselmsk.h"
#include "sc2400a.h"
PAGE "Stampa solleciti" -1 -1 68 16
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 7 ""
END
NUMBER F_CODPROF 4
BEGIN
PROMPT 1 8 "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
END
STRING F_LINPROF 1
BEGIN
PROMPT 18 8 ""
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 8 ""
FLAGS "D"
END
DATE F_DATALIMSOL
BEGIN
PROMPT 1 9 "Data limite sollecito "
FLAGS "A"
VALIDATE DATE_CMP_FUNC <= F_DATASEND
WARNING "La data limite sollecito non può essere superiore alla data di invio"
CHECKTYPE REQUIRED
END
NUMBER F_IMPORMIN 18
BEGIN
PROMPT 1 10 "Importo minimo "
END
RADIOBUTTON F_RIFIMPMIN 10
BEGIN
PROMPT 45 9 ""
ITEM "P|Partita"
ITEM "C|Cliente"
END
BOOLEAN F_STAMPESP
BEGIN
PROMPT 1 11 "Stampa esposizione"
END
STRING F_LUOGOSEND 50 32
BEGIN
PROMPT 1 12 "Luogo d'invio "
END
DATE F_DATASEND
BEGIN
PROMPT 50 12 "data "
FLAGS "A"
CHECKTYPE REQUIRED
END
RADIOBUTTON SC_SORTCF 40
BEGIN
PROMPT 1 2 "Ordinamento"
ITEM "1|Per codice"
ITEM "2|Per ragione sociale"
END
BUTTON SC_SELECT 10 1
BEGIN
PROMPT 50 3 "~Selezione"
END
BUTTON SC_RESET 10 1
BEGIN
PROMPT 50 4 "~Azzera"
END
NUMBER SC_CFCODFR 5
BEGIN
PROMPT 1 6 "Da codice "
END
NUMBER SC_CFCODTO 5
BEGIN
PROMPT 36 6 "a codice "
END
NUMBER SC_NSEL 3
BEGIN
PROMPT 59 6 "N. "
FLAGS "D"
END
BUTTON SC_CFBUTFR 2 1
BEGIN
PROMPT 31 6 ""
PICTURE 109
END
BUTTON SC_CFBUTTO 2 1
BEGIN
PROMPT 51 6 ""
PICTURE 109
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK