I'm trying to pass a parm into a free format program and I have it
prototyped as follows:

DRigsChk pr extpgm('@RIGSCHK')
D InDate 8
DClm3024R pi
D InDate 8

However when I try to check the value of Indate I get a MCH3601

What the heck am I doing wrong here?

Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2015 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact