I'm trying to create a file that records value changes to more than one field by using an object. The code below is being used instead of a CASE statement because I discovered that after the first TRUE condition is encountered, all other CASE conditions that return a value of TRUE are ignored.

THE PROBLEM is that the values are copied to the object file when the first IF condition is TRUE, but the SCATTER command is not working to retrieve the values if the second (or third, etc.) IF condition is TRUE. Any assistance that can be offered to resolve this would really be appreciated.

PROC UPDTCAMPAIGN

SELE CURRDATA
CLOSE INDE

SELE Edcpgntmpl
PACK && REMOVES RECORDS DELETED TO TO ERROR VALIDATIONS
INDE ON SCID TAG SCID

SELE CURRDATA
IF RECCOUNT() = 0
    APPE FROM EDCPGNTMPL
ELSE
    SCATTER FIELDS BRAND,SCID,BOUNCES,OPENS,TOTALCLICKS,UNIQUECLICKS,;
    OPTOUTS,TOTALMAILED,NETMAILED NAME UPDRECS BLANK 
    STORE " " TO LCUPDT
    STORE 0 TO LNUPDREC
    1
    SCAN 
       STORE SCID TO LNSCID
       IF SEEK(LNSCID,'EDCPGNTMPL')

	 IF BOUNCES <> EDCPGNTMPL.BOUNCES
	    REPL BOUNCES WITH EDCPGNTMPL.BOUNCES
	    SCATTER FIELDS BRAND,SCID,BOUNCES NAME UPDRECS ADDI
	    DO RECORDUPDATES
	    LCUPDT= "Y"
	 ELSE
	    LCUPDT= ""
	 ENDIF

          IF OPENS <> EDCPGNTMPL.OPENS
	    REPL OPENS WITH EDCPGNTMPL.OPENS
	    SCATTER FIELDS BRAND,SCID,OPENS NAME UPDRECS ADDI
	    DO RECORDUPDATES
	    LCUPDT= "Y"
          ELSE
	    LCUPDT= ""
          ENDIF

       ENDIF
       
       IF !EMPT(LCUPDT)
          LNUPDREC= LNUPDREC+1
       ENDIF
    ENDSCAN

WAIT WIND ALLT(STR(LNUPDREC))+" RECORD(S) WERE UPDATED IN THE CAMPAIGN MASTER FILE" TIME 1
ENDIF

ENDPROC

********************************************************

PROC RECORDUPDATES

IF USED('CAMPAIGNUPDATES')
	SELE CAMPAIGNUPDATES
ELSE 
	USE CAMPAIGNUPDATES IN 0 EXCL
	SELE CAMPAIGNUPDATES
ENDIF
APPEND BLANK
GATHER NAME UPDRECS
REPL ALL DATE WITH DATE() FOR EMPT(DATE)
REPL ALL FILEDATE WITH VAL(PCFILENAME) FOR EMPT(FILEDATE)

ENDPROC