From 7e2210bf5edc0e8053cff541d9925949cd76d6ed Mon Sep 17 00:00:00 2001 From: angelo Date: Fri, 10 Nov 1995 15:26:46 +0000 Subject: [PATCH] DISGEN, DISIRG : cambiato il message _UFFCSERVoUFFIIDD, ora e' obbligatorio specificare almeno un parametro identificatore del campo nel quale scrivere la stringa del centro di servizio DELIIRCF, DELIIG, DELRITCF : cambiata la JOIN per ricercare esattamente la provincia del codice CAB. git-svn-id: svn://10.65.10.50/trunk@2128 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ba/deliig.frm | 3 ++- ba/deliircf.frm | 2 +- ba/delritcf.frm | 2 +- ba/disgen.frm | 11 ++++++++--- ba/disirg.frm | 7 ++++++- 5 files changed, 18 insertions(+), 7 deletions(-) diff --git a/ba/deliig.frm b/ba/deliig.frm index b0b846646..b7d476477 100755 --- a/ba/deliig.frm +++ b/ba/deliig.frm @@ -10,6 +10,7 @@ JOIN 7 TO 16@ ALIAS 17 INTO CODANAGR=CODANAGR JOIN %BAN ALIAS 14 INTO CODTAB==S7 JOIN %BAN ALIAS 24 INTO CODTAB==S7+S8 JOIN 13 TO 17@ ALIAS 413 INTO COM==COMCOST +JOIN 13 TO 24@ ALIAS 513 INTO COM==S5 END DESCRIPTION BEGIN @@ -53,7 +54,7 @@ STRINGA 3 BEGIN KEY "PROVINCIA Dipendenza" PROMPT 129 6 "" - FIELD 313@->PROVCOM + FIELD 513@->PROVCOM END GRUPPO 4 diff --git a/ba/deliircf.frm b/ba/deliircf.frm index d07272a0b..61cccff02 100755 --- a/ba/deliircf.frm +++ b/ba/deliircf.frm @@ -6,7 +6,7 @@ JOIN 13 TO 8 ALIAS 113 INTO COM==COMNASC JOIN 13 TO 6 ALIAS 213 INTO COM=COMRF(COMRES) JOIN %BAN ALIAS 14 INTO CODTAB==S7 JOIN %BAN ALIAS 24 INTO CODTAB==S7+S8 -JOIN 13 TO 24@ ALIAS 313 INTO COM=S5 +JOIN 13 TO 24@ ALIAS 313 INTO COM==S5 JOIN 13 TO 7 ALIAS 413 INTO COM==COMCOST END diff --git a/ba/delritcf.frm b/ba/delritcf.frm index 2d16977d5..6c82dac99 100755 --- a/ba/delritcf.frm +++ b/ba/delritcf.frm @@ -6,7 +6,7 @@ JOIN 13 TO 8 ALIAS 113 INTO COM=COMNASC JOIN 13 TO 6 ALIAS 213 INTO COM=COMRF(COMRES) JOIN %BAN ALIAS 14 INTO CODTAB==S7 JOIN %BAN ALIAS 24 INTO CODTAB==S7+S8 -JOIN 13 TO 24@ ALIAS 313 INTO COM=S5 +JOIN 13 TO 24@ ALIAS 313 INTO COM==S5 JOIN 13 TO 7 ALIAS 413 INTO COM=COMCOST END diff --git a/ba/disgen.frm b/ba/disgen.frm index 33f0069be..a20084422 100755 --- a/ba/disgen.frm +++ b/ba/disgen.frm @@ -400,12 +400,17 @@ END STRINGA 37 BEGIN - KEY "CENTRO SERVIZI: Provincia e Denominazione" - PROMPT 77 56 "" - MESSAGE _CENSERoUFFIMP,213@,16@,501 + KEY "CAMPO PER MESSAGGIO" + MESSAGE _CENSERoUFFIMP,213@,16@,501,502 END STRINGA 501 +BEGIN + KEY "CENTRO SERVIZI: Provincia e Denominazione" + PROMPT 77 56 "" +END + +STRINGA 502 BEGIN KEY "CENTRO SERVIZI: Codice" PROMPT 122 56 "" diff --git a/ba/disirg.frm b/ba/disirg.frm index 0b93a3d58..39b233d23 100755 --- a/ba/disirg.frm +++ b/ba/disirg.frm @@ -298,10 +298,15 @@ BEGIN END STRINGA 32 +BEGIN + KEY "CAMPO PER MESSAGGIO" + MESSAGE _CENSERoUFFIMP,113@,16@,501 +END + +STRINGA 501 BEGIN KEY "CENTRO SERVIZI: Provincia e Denominazione" PROMPT 74 51 "" - MESSAGE _CENSERoUFFIMP,113@,16@ END DATA 33