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

Corretto quadro BASER

Browse Source 
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
1 changed files with 12 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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