× 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.



I think it was a bug, that's fixed by the SI27953 PTF:

http://www-01.ibm.com/support/docview.wss?rs=0&dc=DB530&dc=DA600&q1=SI27953&;
uid=nas3756c443b2a85d17186257344004ce2db&loc=en_US&cs=UTF-8&lang=all

Elvis

Celebrating 11-Years of SQL Performance Excellence on IBM i, i5/OS and
OS/400
www.centerfieldtechnology.com

-----Original Message-----
Subject: Having problems with CL V5R4 DCL STG(*DEFINED) DEFVAR

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




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.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 on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.