What I'm Thinking

Here is the way to find the last 10 datasets that you have accessed. GO TO ISPF 3.4 option. On the top, there is a MENUBAR. Select REFLIST Select Option 1 in it. Using this option you can find out the last 30 datasets that you have accessed.
When a Job abends at a program due to bind error with SQL code of -805 or -818 then generally there is issue with consistency token (often referred as CONTOKEN). These kind of abends can be easily fixed if we can find where the CONTOKEN mismatch occurs. STEP1:- CONTOKEN in Package RUN the following query: SELECT NAME, CONTOKEN, COLLID, PDSNAME FROM SYSIBM.SYSPACKAGE WHERE NAME=‘MODULE’ AND COLLID=‘COLLID’ Provide the name of the module in “NAME” and Collection name in “COLLID”. ... Read More
You need to know what date is 150 days from today (and this kind of stuff happens more often than you’d think)? Convert today to an integer date, add 150 to it and convert it back. No more checking which months you’re going through to see if it’s a 30 day or 31 day month. No more leap year calculations. Some sample COBOL Date Example: 01 WS-TODAY PIC 9(8). 01 WS-FUTURE-DATE PIC 9(8). ... Read More

Filtering Jobs in Spool
18 January 2012

There is a possibility to list only the jobs which has ABENDED, leaving out all other jobs in the spool. For such a kind of listing, use the primary command FILTER on the command line as given in the examples below. FIL MAX AB* - shows jobs that has ABENDS Other Examples are: Shows jobs that has JCL errors: FIL MAX ‘JCL ERROR’ Shows jobs with “exceptional conditions”: ... Read More

Rearrage SDSF Columns
18 January 2012

If you want to rearrange the columns in SDSF. Go to SDSF;ST. In command line type “arr ?”. This will bring the complete list of SDSF column names. You can move the columns using “/” and “//”. One Column in the SDSF that we can bring to the front position is the MAX-RC (which usually is the last column in SDSF) which shows the completion code or the abend code of the job. ... Read More