root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Reso forced il campo valuta

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1885 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
pirro 1995-09-25 11:23:22 +00:00
parent 5f9b68430c
commit d6facca03b
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
ba/batbcam.uml
View File

@ -11,7 +11,7 @@ PAGE "Cambi giornalieri" -1 -1 78 12
STRING FLD_TABCAM_CODVAL 3 STRING FLD_TABCAM_CODVAL 3
BEGIN BEGIN
PROMPT 3 1 "Cod. valuta " PROMPT 3 1 "Cod. valuta "
FLAGS "UZ" FLAGS "UZ"
KEY 1 KEY 1
FIELD CAM->CODTAB[1,3] FIELD CAM->CODTAB[1,3]
USE %VAL KEY 1 USE %VAL KEY 1
@ -21,24 +21,24 @@ BEGIN
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Valuta@50" S0 DISPLAY "Valuta@50" S0
HELP "Codice della valuta" HELP "Codice della valuta"
CHECKTYPE REQUIRED CHECKTYPE FORCED
WARNING "Manca il codice valuta" WARNING "Valuta assente"
END END
DATE 200 DATE 200
BEGIN BEGIN
PROMPT 30 1 "" PROMPT 30 1 ""
FLAGS "D" FLAGS "D"
FIELD CAM->D0 FIELD CAM->D0
END END
DATE FLD_TABCAM_D0 DATE FLD_TABCAM_D0
BEGIN BEGIN
PROMPT 25 1 "Data " PROMPT 25 1 "Data "
FLAGS "GR" FLAGS "GR"
KEY 1 KEY 1
USE CAM KEY 1 USE CAM
FIELD CODTAB[4,11] FIELD CODTAB[4,11]
INPUT CODTAB[1,3] FLD_TABCAM_CODVAL INPUT CODTAB[1,3] FLD_TABCAM_CODVAL
INPUT CODTAB[4,11] FLD_TABCAM_D0 INPUT CODTAB[4,11] FLD_TABCAM_D0
DISPLAY "Valuta" CODTAB[1,3] DISPLAY "Valuta" CODTAB[1,3]
@ -48,7 +48,7 @@ BEGIN
OUTPUT FLD_TABCAM_CODVAL CODTAB[1,3] OUTPUT FLD_TABCAM_CODVAL CODTAB[1,3]
OUTPUT FLD_TABCAM_D0 D0 OUTPUT FLD_TABCAM_D0 D0
OUTPUT 200 D0 OUTPUT 200 D0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
MESSAGE COPY,200 MESSAGE COPY,200
WARNING "Data mancante" WARNING "Data mancante"
HELP "Data dell'ultimo cambio" HELP "Data dell'ultimo cambio"