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

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
@ -32,7 +33,8 @@ BEGIN
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