×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Hi folks,
Here is a snippet of some code:
PGM PARM(&SAVF)
DCL VAR(&SAVF) TYPE(*CHAR) LEN(20) /* name & +
library */
DCL VAR(&SAVFNAME) TYPE(*CHAR) STG(*DEFINED) +
LEN(10) DEFVAR(&SAVF 1)
DCL VAR(&SAVFLIB) TYPE(*CHAR) STG(*DEFINED) +
LEN(10) DEFVAR(&SAVF 11)
When testing this program, I passed in a save file name of SAVFNAME1 and a save file library of SAVFLIB1.
Here are the values at runtime using debug:
&SAVF = 'SAVFNAME1 SAVFLIB1 '
&SAVFNAME = 'SAVFNAME1 '
&SAVFLIB = 'SAVFNAME1 '
As you can see, &SAVFLIB is not correct and I can't figure out why.
Any help would be appreciated.
Tks,
Glenn Gundermann
Manager, IT Application Management (Tor ZI-A)
Kuehne + Nagel Ltd.
5800 Hurontario Street, 12th Floor
Mississauga, Ontario
Canada L5R 4B6
Tel: (905) 501-6596
Fax: (905) 501-6668
Cell: (416) 317-3144
glenn.gundermann@xxxxxxxxxxxxxxxx<mailto:glenn.gundermann@xxxxxxxxxxxxxxxx>
________________________________
To learn more about Kuehne + Nagel Ltd, please visit our website at: www.kuehne-nagel.com<
http://www.kuehne-nagel.com> For the Kuehne + Nagel email disclaimer, visit:
http://www.kn-portal.com/material/Electronic_Email_Disclaimer_English_French.pdf
Visitez le site internet de Kuehne + Nagel Lt?e: www.kuehne-nagel.com<
http://www.kuehne-nagel.com> Notre d?charge de responsabilit? est disponible comme suit:
http://www.kn-portal.com/material/Electronic_Email_Disclaimer_English_French.pdf
midrange.com
