×
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.
A variable of pic(8) comp-4 translates into a 4 byte field. Your call is
only passing one byte, so I suspect that might be part of the problem.
Try the call with X'00000050'.
Rich Loeber - @richloeber
Kisco Information Systems
[1]
http://www.kisco.com
SDG
--------------------------------------------------------------------------
On 7/20/2012 11:10 AM, Stone, Joel wrote:
How can I pass a the parm below "parm-length" from a CL pgm?
I am trying to get parm-length = 50 (length of parm-data in decimal)
Call PGMA (x'50' 'Jon Doe')
Doesn't work - any ideas?
Thanks
LINKAGE SECTION.
01 parm-length PIC 9(8) COMP-4.
01 parm-data PIC X(1000).
PROCEDURE division using parm-length
parm-data.
______________________________________________________________________
This outbound email has been scanned for all viruses by the MessageLabs Skyscan service.
For more information please visit [2]
http://www.symanteccloud.com
______________________________________________________________________
References
Visible links
1.
http://www.kisco.com/
2.
http://www.symanteccloud.com/
As an Amazon Associate we earn from qualifying purchases.