Jay, make sure your sub-prog does not have "DYNAMIC" as a $CONTROL option. Rather, you want "ANSISUB" or "SUB". If you have DYNAMIC, then your WS area is initialized every time the program is called. Hope this helps, Ray S. > -----Original Message----- > From: Jay Chandru [SMTP:[log in to unmask]] > Sent: Sunday, December 16, 2001 11:44 PM > To: [log in to unmask] > Subject: Retention of switch value in called program > > Hi All, > > Scenario: HP3000 and COBOL > I have a main program and a sub program. The subprogram is called for > every record in the main program. (i.e) if there are 10 records to be > processed, the subprogram will be called 10 times from the main program. > > I have a switch in the sub program which is set to Y in the declaration. > > This switch is set to N for the first record and should remain N for the > subsequent records. but the issue is that this switch resets to Y for > every call to the subprogram. > > Can anyone point me as to where i am going wrong or is there something > which i should do for the value of switch to be retained. > > Thanks & Regards > Jay > > > _________________________________________________________________ > MSN Photos is the easiest way to share and print your photos: > http://photos.msn.com/support/worldwide.aspx > > * To join/leave the list, search archives, change list settings, * > * etc., please visit http://raven.utc.edu/archives/hp3000-l.html * * To join/leave the list, search archives, change list settings, * * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *