Process needs new eyes

vinsnash

We have a process here with two rules. Rule2 gets by the "REPORT ERROR" but "ENTER NEW NEXCOM WITH .... USING MAIN" produces a display of "MAIN" with no values. Can anybody see what I'm not seeing? We are using a similar process with a non persisted object but with a simple not complex condition.

"MemberValidation" is not persisted.

Thanks

Rule1

ENTER NEW MemberValidation USING MAIN

Rule2

IF NOT (EXISTS NSCPers WHERE (CHARS_FROM_RIGHT(NSCPers.SocialSecurityNumber,4) =MemberValidation.LastFour AND
NSCPers.LastName=MemberValidation.LastName AND
NSCPers.BirthDate = MemberValidation.BirthDate))

Then REPORT ERROR 'Invalid Entry'

ELSE

IF EXISTS NSCPers WHERE (CHARS_FROM_RIGHT(NSCPers.SocialSecurityNumber,4) =MemberValidation.LastFour AND
NSCPers.LastName=MemberValidation.LastName AND
NSCPers.BirthDate = MemberValidation.BirthDate)

Then

FIND NSCPers WHERE (CHARS_FROM_RIGHT(NSCPers.SocialSecurityNumber,4) =MemberValidation.LastFour AND
NSCPers.LastName=MemberValidation.LastName AND
NSCPers.BirthDate = MemberValidation.BirthDate)

ENTER NEW NEXCOM WITH NEXCOM.Address=NSCPers.Address, NEXCOM.City=NSCPers.City, NEXCOM.FirstName=NSCPers.FirstName, NEXCOM.LastName=NSCPers.LastName, NEXCOM.State=NSCPers.State, NEXCOM.ZIP=NSCPers.ZIP USING Main

rocketman

Have you set Membervalidation as the source of input for rule 2

rocketman

Also.... Do you really need the first "if not exists"

Why not If exists ... Then

Find ....

Enter new .....

Else report error ..

vinsnash

I can see where you can set a source for a process but not for a particular rule of a process. In any event I changed rule2 as follows with the same result. If I enter invalid credentials the "REPORT ERROR" executes otherwise I get the NEXCOM MAIN form with no values. On the other hand the "NewEnrollment" process belwos with three similar rules works fine. There is no "source" stipulated for the NewEnrollment process either and SSNCheck is not persisted

NSCPers Main displays with the values from SSNCheck.SSN and SSNCheck.UIC

Rule2

FIND NSCPers WHERE (CHARS_FROM_RIGHT(NSCPers.SocialSecurityNumber,4) =MemberValidation.LastFour AND
NSCPers.LastName=MemberValidation.LastName AND
NSCPers.BirthDate = MemberValidation.BirthDate)

ELSE

REPORT ERROR 'Invalid Entry'

NewEnrollment

Rule1

Enter New SSNCheck Using Main

Rule2

IF EXISTS NSCPers WHERE (NSCPers.SocialSecurityNumber=SSNCheck.SSN) THEN REPORT ERROR
'Social Security Number Already Exists!'

Rule3

ENTER NEW NSCPers WITH
NSCPers.SocialSecurityNumber = SSNCheck.SSN,
NSCPers.UnitCode=SSNCheck.UIC
USING Main