Recent content by RogerSpencer

If you go to http://www-1.ibm.com/support/docview.wss?uid=swg24003837 you can download two complete jobs illustrating how to call REXX programms from COBOL. The first is simpler to code and uses IRXJCL which only allows you to return a numeric value (return code) from your REXX to COBOL. If...

Executing IKJEFT01 in a batch job always ends with return code 0. Use IKJEFT1B instead. This will use the numeric value on the EXIT clause in your REXX as the step return code. Hope this helps, Roger Spencer

If you are using ObjREXX you can use the nonstandard (i.e. on Windows, Unix but not on MVS, VM etc.) changestr() function. Sorry, I should have thought of this in my first appends 8-) filedate = word(filedate, 1) filedate = changestr('-', filedate, '') /* above, '' = zero length string */...

Hallo K1ng, I have just read your posting once again and would like to point out the use of the Date() function with 3 arguments for converting from one date format to another. Also the use of 'B' (Base) format which returns the number of days since the arbitrary base date of 1 Jan 0001. This...

today=Date('S') returns the date in the format 'yyyymmdd'. I assume you are using IBM's ObjREXX under Windows, and so filedate = stream("filename.tmp", 'c', 'QUERY TIMESTAMP') returns the timestamp in the format 'yyyy-mm-dd hh:mm:ss'. You can extract the date from the timestamp and...

Without seeing your code it is difficult to say precisely, but as you mention "member" then you are presumabely using an MVS system. If that is the case, then I assume you read in the member with EXECIO and place the data on the data stack (i.e. you do not use the STEM operand on the...