I am trying to provide users with a way of converting dates from Julian to USA format and vice-versa.
All works well until I input a USA date and attempt to convert to Julian.
Below is some code
WHEN SUBSTR(INDATE,3,1) = "/" THEN DO
OGREG = INDATE...
Thank you both, Marc and Tony, for your guidance and sharing of your knowledge. While I haven't yet accomplished what I wanted, I believe I now have the resources to get there.
I have been unsuccessful in finding much documentation for the )INIT section of a panel definition. I am wanting to do some security checking before allowing access to the panel. Could someone point me in the direction of some documentation or explain the basic format of the IF statement...
I too am trying to get the Job Number, but can only find it mapped by SSOB and SSIB which appear to require issuing an IEFSSREQ for which I haven't found much documentation.
Please post if you are successful, and I will be all too happy to do likewise.
It seems to me I ran into a similar problem when we upgraded to one of the later releases of OS/390. We had displacements hardcoded.
I believe ASCBJBNI points to the address of the jobname (offset 172)
The following code returns the JOBNAME on Z/OS 1.4
EXTRACT...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.