How to open a ACYR file (FA.2005, CR.2005) with a multi-part key.



CRNT.FA.YEAR = 
$INSERT I_CR.ACYR FROM ST.SOURCE
$INSERT I_OPEN.CR.ACYR

KEY.CR.ACYR = V.CR.STUDENT.ID:"*":V.CR.CALC.RESULT.TYPE

V.STUDENT.ID = A.STUDENT.ID                             
V.AWARD.PERIOD = A.AWARD.PERIOD                
CRNT.FA.YEAR = A.ACAD.YEAR
                                             
$INSERT I_CR.ACYR FROM ST.SOURCE           
$INSERT I_OPEN.CR.ACYR     
KEY.ROF.ACYR = V.STUDENT.ID:"*":V.AWARD.PERIOD
FOR_THE REFERENCED ROF.STUDENT.ID                                          
  A.UNEARNED.AID = ROF.UPDATE                                              
  A.UNEARNED.AID = V.ROF.COMPLETED.DAYS          
* A.UNEARNED.AID = 'HI'                                                    
END_FOR ROF.STUDENT.ID
Hosted by www.Geocities.ws

1