1995-03-24 11:46:05 +00:00
|
|
|
PAGE "Rata pagamento" -1 -1 50 8
|
|
|
|
|
|
|
|
|
|
DATE 101
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 1 1 "Scadenza "
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
NUMBER 102 8 3
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 1 2 "Percentuale "
|
|
|
|
|
PICTURE ".3"
|
|
|
|
|
FLAGS "R"
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
NUMBER 103 15
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 1 3 "Importo "
|
|
|
|
|
PICTURE "."
|
|
|
|
|
FLAGS "R"
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
NUMBER 104 2 0
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 1 4 "Tipo pagamento "
|
|
|
|
|
SHEET "Codice|Tipo pagamento@32"
|
|
|
|
|
INPUT 104
|
|
|
|
|
ITEM "1|Rimessa diretta o contanti"
|
|
|
|
|
ITEM "2|Tratta"
|
|
|
|
|
ITEM "3|Ricevuta Bancaria"
|
|
|
|
|
ITEM "4|Cessione"
|
|
|
|
|
ITEM "5|Paghero'"
|
|
|
|
|
ITEM "6|Lettera di credito"
|
|
|
|
|
ITEM "7|Tratta accettata"
|
|
|
|
|
ITEM "8|Altro pagamento"
|
|
|
|
|
OUTPUT 104
|
|
|
|
|
OUTPUT 105
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
STRING 105 32
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT 1 5 "Descrizione "
|
|
|
|
|
FLAGS "D"
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
BUTTON DLG_CANCEL 10 2
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT -12 -1 ""
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
BUTTON DLG_OK 10 2
|
|
|
|
|
BEGIN
|
|
|
|
|
PROMPT -22 -1 ""
|
|
|
|
|
END
|
|
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
ENDMASK
|
