Patch level :10.0 883
Files correlati :cg2100b.msk cg2100c.msk Ricompilazione Demo : [ ] Commento : sistemate lunghezze codici CUP git-svn-id: svn://10.65.10.50/branches/R_10_00@21418 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
38d104c13a
commit
991889a26d
@ -316,12 +316,12 @@ BEGIN
|
||||
WARNING "Fornitore inesistente sulla riga contabile"
|
||||
END
|
||||
|
||||
STRING CG_CUP 22
|
||||
STRING CG_CUP 15
|
||||
BEGIN
|
||||
PROMPT 1 12 "CUP "
|
||||
USE %CUP
|
||||
INPUT CODTAB CG_CUP
|
||||
DISPLAY "Codice@22" CODTAB
|
||||
DISPLAY "Codice@15" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT CG_CUP CODTAB
|
||||
OUTPUT CG_DCUP S0
|
||||
@ -336,7 +336,7 @@ BEGIN
|
||||
USE %CUP KEY 2
|
||||
INPUT S0 CG_DCUP
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice@22" CODTAB
|
||||
DISPLAY "Codice@15" CODTAB
|
||||
COPY OUTPUT CG_CUP
|
||||
GROUP 64
|
||||
END
|
||||
|
Loading…
x
Reference in New Issue
Block a user