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



On 10/21/2016 2:00 PM, Jeff Young wrote:
Using the information provided, I created a test command and program to
determine what data is passed:
This is my CL program:
PGM PARM(&p01)
dcl &p01 *char 26
chgvar &p01 &p01
return
ENDPGM

Using the default values, I get this in my input parm:
Time period for log output:
Start time and date:
Beginning time . . . . . . . . *AVAIL Time, *AVAIL
Beginning date . . . . . . . . *CURRENT Date, *CURRENT, *BEGIN
End time and date:
Ending time . . . . . . . . . *AVAIL Time, *AVAIL
Ending date . . . . . . . . . *CURRENT Date, *CURRENT, *END
EVAL &p01
&P01 = ' 2359590040000 000'
EVAL &p01 :x
00000 00020015 00060002 F2F3F5F9 F5F9F0F0 - ........23595900
00010 F4F0F0F0 F00002F0 F0F0.... ........ - 40000..000......

What am I missing?

ELEM creates a list; that's what those binary values are in front of the
parameter. (x'0002', x'0015', x'0006', x'0002') The sample Glenn
provided is a list of lists, so there are multiple offsets.

PERIOD is made up of a list (E01C5)
E01C5 is made up of a list of E01FF and a list of E0272 (outer list)
E01FF is made up of a list of a *TIME and a *DATE (inner list 1)
E0272 is made up of a list of a *TIME and a *DATE (inner list 2)

All that stuff is in here: 'Defining CL commands'
http://www.ibm.com/support/knowledgecenter/ssw_ibm_i_72/rbam6/defcm.htm

In particular, an explanation of the offsets is here: 'Using CL or other
HLLs for lists within lists'
http://www.ibm.com/support/knowledgecenter/ssw_ibm_i_72/rbam6/defdlclhll.htm

--buck


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.