[sqr-users] Trouble with an array

["Laura Mayer" <lmayer@gw.housing.umass.edu>]

Afternoon,

I have an array that I am having a problem with. I only want to see the it once 
for each person, what's happening is if the person has two roommates it repeats 
the iteration again so each person with two roommates gets listed twice. 

I've posted the if statement that drives it below if someone could offer some 
insight on how to fix this that would be great. Thanks in advance.

Laura

Do Print_Data

if $Type <> 'No Roomate'
Let $PriEMPLID = &MA.UMH_PREF_ROOMMATE1
let $InputIdRM1=&MA.UMH_PREF_ROOMMATE1
Do Get_Name_OfPerson
if $Period <> $parm_proc_cd
 let $printPeriod='('|| $Period || ')'
else
 let $printPeriod=' '
end-if
let $RoommateName1=$Name || ' ' || $printPeriod
if isBlank(&MA.UMH_PREF_ROOMMATE2) or isnull(&MA.UMH_PREF_ROOMMATE2)
 let $InputIdRM2=&MA.UMH_PREF_ROOMMATE2
Let $InputIdRM2 = ''
Let $RoommateName2 = ''
Do Print_Roommate_Name
else 
Let $PriEMPLID = ''
Let $InputIdRM2 = ''
Let $RoommateName2 = ''
Let $PriEMPLID = &MA.UMH_PREF_ROOMMATE2
let $InputIdRM2=&MA.UMH_PREF_ROOMMATE2
Do Get_Name_OfPerson
let $RoommateName2=$Name || ' ' || $printPeriod
Do Print_Roommate_Name
end-if
else 
Print 'No Roommate'  (+1,1) Bold
Print '=' (+1,1,140) fill
end-if



_______________________________________________
sqr-users mailing list
sqr-users@sqrug.org
http://www.sqrug.org/mailman/listinfo/sqr-users