Corretta maschera tabella Ulteriore Classificazione e tabella Condizioni

di pagamento.


git-svn-id: svn://10.65.10.50/trunk@299 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1994-09-30 17:50:15 +00:00
parent 511e70cae9
commit ba280a1c47
2 changed files with 21 additions and 15 deletions

View File

@ -138,15 +138,18 @@ BEGIN
ITEM "8|Altro pagamento" ITEM "8|Altro pagamento"
END END
STRING 104 2 STRING 104 1
BEGIN BEGIN
PROMPT 4 7 "Ulteriore classificazione " PROMPT 4 7 "Ulteriore classificazione "
FIELD %RPG->S1 FIELD %RPG->S1
USE %CLR USE %CLR
INPUT CODTAB 104 INPUT CODTAB[1,1] 103 SELECT
DISPLAY "Codice" CODTAB INPUT CODTAB[2,2] 104
DISPLAY "Tipo pagamento" CODTAB[1,1]
DISPLAY "Classificazione" CODTAB[2,2]
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT 104 CODTAB OUTPUT 103 CODTAB[1,1]
OUTPUT 104 CODTAB[2,2]
CHECKTYPE NORMAL CHECKTYPE NORMAL
HELP "Scegliere uno dei codici della tabella, oppure lasciare il campo vuoto" HELP "Scegliere uno dei codici della tabella, oppure lasciare il campo vuoto"
END END
@ -169,4 +172,4 @@ END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

View File

@ -15,13 +15,14 @@ BEGIN
SHEET "Cod|Descrizione@60" SHEET "Cod|Descrizione@60"
INPUT F_CODICERATA INPUT F_CODICERATA
OUTPUT F_CODICERATA OUTPUT F_CODICERATA
ITEM " |Totale documento ripartito tra tutte le rate" ITEM "1|Rimessa diretta o contanti"
ITEM "1|Tutte le imposte sulla prima rata" ITEM "2|Tratta"
ITEM "2|Tutte le spese sulla prima rata" ITEM "3|Ricevuta Bancaria"
ITEM "3|Imposte e spese sulla prima rata" ITEM "4|Cessione"
ITEM "4|Spese e merce sulla prima rata, l'imposta su tutte le altre" ITEM "5|Paghero'"
ITEM "5|Merce e imposte sulla prima rata, le spese su tutte le altre" ITEM "6|Lettera di accredito"
ITEM "6|La merce sulla prima rata, imposte e spese su tutte le altre" ITEM "7|Tratta accettata"
ITEM "8|Altro pagamento"
END END
STRING F_CODICEALFA 1 STRING F_CODICEALFA 1
@ -30,9 +31,10 @@ BEGIN
FIELD %CLR->CODTAB[2,2] FIELD %CLR->CODTAB[2,2]
KEY 1 KEY 1
USE %CLR USE %CLR
INPUT CODTAB[1,1] F_CODICERATA INPUT CODTAB[1,1] F_CODICERATA
INPUT CODTAB[2,2] F_CODICEALFA INPUT CODTAB[2,2] F_CODICEALFA
DISPLAY "Codice" CODTAB DISPLAY "Tipo pagamento" CODTAB[1,1]
DISPLAY "Classificazione" CODTAB[2,2]
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_CODICERATA CODTAB[1,1] OUTPUT F_CODICERATA CODTAB[1,1]
OUTPUT F_CODICEALFA CODTAB[2,2] OUTPUT F_CODICEALFA CODTAB[2,2]
@ -48,7 +50,8 @@ BEGIN
USE %CLR USE %CLR
INPUT S0 F_DESCR INPUT S0 F_DESCR
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB DISPLAY "Tipo pagamento" CODTAB[1,1]
DISPLAY "Classificazione" CODTAB[2,2]
OUTPUT F_CODICERATA CODTAB[1,1] OUTPUT F_CODICERATA CODTAB[1,1]
OUTPUT F_CODICEALFA CODTAB[2,2] OUTPUT F_CODICEALFA CODTAB[2,2]
OUTPUT F_DESCR S0 OUTPUT F_DESCR S0