Corretto quadro BASER

git-svn-id: svn://10.65.10.50/trunk@3787 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
nik 1996-10-17 13:41:10 +00:00
parent 8c6887be82
commit d81ad850e6

View File

@ -4,16 +4,17 @@ JOIN 9 TO 36 INTO CODDITTA=CODDITTA
JOIN 6 TO 9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR JOIN 6 TO 9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR
JOIN 7 TO 9 INTO CODANAGR=CODANAGR JOIN 7 TO 9 INTO CODANAGR=CODANAGR
JOIN 8 TO 6 ALIAS 118 INTO CODANAGR=CODANAGR JOIN 8 TO 6 ALIAS 118 INTO CODANAGR=CODANAGR
JOIN 13 TO 8 ALIAS 113 INTO COM=COMNASC JOIN 13 TO 8 ALIAS 113 INTO COM==COMNASC
JOIN 13 TO 6 ALIAS 213 INTO COM=COMRF JOIN 13 TO 6 ALIAS 213 INTO COM==COMRF
JOIN 13 TO 6 ALIAS 613 INTO COM=COMRES JOIN 13 TO 6 ALIAS 613 INTO COM==COMRES
JOIN 6 TO 36 ALIAS 216 INTO TIPOA=="F" CODANAGR==RAPPR JOIN 6 TO 36 ALIAS 216 INTO TIPOA=="F" CODANAGR==RAPPR
JOIN 8 TO 216@ ALIAS 218 INTO CODANAGR==CODANAGR JOIN 8 TO 216@ ALIAS 218 INTO CODANAGR==CODANAGR
JOIN 13 TO 218@ ALIAS 313 INTO COM==COMNASC JOIN 13 TO 218@ ALIAS 313 INTO COM==COMNASC
JOIN 13 TO 216@ ALIAS 413 INTO COM==COMRF(COMRES) JOIN 13 TO 216@ ALIAS 413 INTO COM==COMRF(COMRES)
JOIN 10 TO 9 INTO CODDITTA==CODDITTA CODATT==CODATTPREV JOIN 10 TO 9 INTO CODDITTA==CODDITTA CODATT==CODATTPREV
JOIN 6 TO 10 ALIAS 316 INTO TIPOA==TIPOADS CODANAGR==CODANGRDS JOIN 6 TO 10 ALIAS 316 INTO TIPOA==TIPOADS CODANAGR==CODANGRDS
JOIN 13 TO 10 ALIAS 513 INTO COM==COMCS JOIN 13 TO 10 ALIAS 513 INTO COM==COMCS
JOIN 13 TO 316@ ALIAS 713 INTO COM==COMRF(COMRES)
END END
DESCRIPTION DESCRIPTION
@ -197,7 +198,8 @@ STRINGA 17
BEGIN BEGIN
KEY "CAP" KEY "CAP"
PROMPT 122 7 "" PROMPT 122 7 ""
FIELD 116@->CAPRF FIELD 116@->CAPRF
FIELD 116@->CAPRES
GROUP 1 GROUP 1
END END
@ -708,16 +710,16 @@ STRINGA 79
BEGIN BEGIN
KEY "LUOGO CONSERVAZIONE S.C. - COM" KEY "LUOGO CONSERVAZIONE S.C. - COM"
PROMPT 25 39 "" PROMPT 25 39 ""
FIELD 613@->DENCOM FIELD 513@->DENCOM
FIELD 513@->DENCOM FIELD 713@->DENCOM
END END
STRINGA 80 STRINGA 80
BEGIN BEGIN
KEY "LUOGO CONSERVAZIONE S.C. - PROV" KEY "LUOGO CONSERVAZIONE S.C. - PROV"
PROMPT 92 39 "" PROMPT 92 39 ""
FIELD 613@->PROVCOM
FIELD 513@->PROVCOM FIELD 513@->PROVCOM
FIELD 713@->PROVCOM
END END
STRINGA 81 STRINGA 81