>LOCAL lnTableAPrimary_ID AS Integer > >SELECT TableA > >IF USED("csrPrimaryID") > USE IN csrPrimaryID >ENDIF > >IF USED("csrSecondaryID") > USE IN csrSecondaryID >ENDIF > >SCAN > lnTableAPrimary_ID = TableA.Primary_ID > > SELECT TOP 1 TableC.Primary_ID FROM TableC WITH(BUFFERING = .T.) INNER JOIN TableB WITH(BUFFERING = .T.) ON TableC.Primary_ID == TableB.TableC_FK_ID; > WHERE UPPER(ALLTRIM(TableC.Type)) == "PRIMARY" AND TableB.TableA_FK_ID == lnTableAPrimary_ID ORDER BY TableB.BeginDate DESC INTO CURSOR csrPrimaryID > > IF RECCOUNT("csrPrimaryID") > 0 > GO TOP IN csrPrimaryID > REPLACE TableC_ID_1 WITH csrPrimaryID.Primary_ID IN TableA > ENDIF >ENDSCAN > > > >SCAN > lnTableAPrimary_ID = TableA.Primary_ID > SELECT TOP 1 TableC.Primary_ID FROM TableC WITH(BUFFERING = .T.) INNER JOIN TableB WITH(BUFFERING = .T.) ON TableC.Primary_ID == TableB.TableC_FK_ID; > WHERE UPPER(ALLTRIM(TableC.Type)) == "SECONDARY" AND TableB.TableA_FK_ID == lnTableAPrimary_ID ORDER BY TableB.BeginDate DESC INTO CURSOR csrSecondaryID > > IF RECCOUNT("csrSecondaryID") > 0 > GO TOP IN csrSecondaryID > REPLACE TableC_ID_2 WITH csrSecondaryID.Primary_ID IN TableA > ENDIF >ENDSCAN > >IF USED("csrPrimaryID") > USE IN csrPrimaryID >ENDIF > >IF USED("csrSecondaryID") > USE IN csrSecondaryID >ENDIF >>