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