I am trying to "Wean" off our programs that use the old Wang VSSUBS. These VSSUBS were created by Unicon years ago when we converted our programs form Wang to Microfocus. This one is "PUTPARM". This will basically create a Temp Area (Value = COMPCODE) that then can be accepted into other programs. I have included AR07.TXT that will create\\change the putparm value and here is the portion of the program that has the accept in it.
CALL "ACCEPT" USING
"COMPCODE" COMPCODE.
Any Ideas?