How to transfer a set of text files to a PDS as individual members in the IBM PCOM session
Mainframe Tips, Tricks And Tutorials
by
1w ago
To transfer a set of text files to a PDS as individual members, we need to create a batch file. Let us transfer two text files to PDS USERID.DDF.TOOL. So, put the below two lines in a file and save the batch file with “srl” extension. C:\Downloads\ASMEXIT.JCL text~'USERID.DDF.TOOL(ASMEXIT)'C:\Downloads\BUCKETS.JCL text~'USERID.DDF.TOOL(BUCKETS)' In the Mainframe IBM PCOM session ..read more
Visit website
Exclusive control over datasets in JCL
Mainframe Tips, Tricks And Tutorials
by
1M ago
When any step of a job requests exclusive control of a data set, with an exception of when the job is allowed to downgrade ENQs via the DSENQSHR specification, the system converts all requests for shared control of that data set within that job (DISP=SHR) to requests for exclusive control. One of two methods can be used to request exclusive control: DISP=NEW, DISP=MOD, or ..read more
Visit website
Difference between EXIT PROGRAM, GOBACK, STOP RUN in COBOL
Mainframe Tips, Tricks And Tutorials
by
2M ago
Let us assume we have a Batch JOB step which executes MAIN-PGM. Let us assume job step has below call chain. MAIN-PGM --> SUB-PGM1 --> SUB-PGM2 --> SUB-PGM3That is MAIN-PGM calls SUB-PGM1SUB-PGM1 program inturn calls SUB-PGM2SUB-PGM2 program inturn calls SUB-PGM3A run unit is a running set of one or more programs that communicate with each other by COBOL static or dynamic CALL ..read more
Visit website
Changing the order of GDG concatenation
Mainframe Tips, Tricks And Tutorials
by
3M ago
GDGORDER keyword specifies the order in which the individual generation data sets (GDSs) will be concatenated.   The values of Parameter are USECATLG, LIFO and FIFO.   USECATLG - The GDS concatenation is ordered as specified in the GDG data set catalog entry. When the GDGORDER keyword is not specified, the concatenation order from the catalog definition of the GDG data set is used.& ..read more
Visit website
Complete Video tutorials for a Mainframe Developer
Mainframe Tips, Tricks And Tutorials
by
5M ago
A typical mainframe Developer needs expertise in TSO/ISPF, JCL, VSAM, COBOL, DB2, CICS, Debugger such as Xpeditor, IBM debugger, REXX, MQ, SCM tools such as Endevor and Changeman,   Job schedulers such Control-M, OPC, ESP Below are videos from various youtube channels which will help anyone to become Mainframe developer. Mainframe Basics What is a Mainframe https ..read more
Visit website
Assembler program to process SMF 30 subtype records 2 and 3
Mainframe Tips, Tricks And Tutorials
by
6M ago
 Assembler program to process SMF 30 subtype records 2 & 3 are given below. The input SMF file is in VBS record format. Format of the output record is given below. Between each field, there is a blank inserted.  LPAR system id       – 4 bytesInterval start time – 19 bytes (Format CCYY/MM/DD HH:MM:SS)Interval end time   - 19 bytes (Format CCYY/MM/DD HH:MM:SS)Jobname             - 08 bytesJobid ..read more
Visit website
Easytrieve program has beaten SYNCSORT in the CPU performance
Mainframe Tips, Tricks And Tutorials
by
6M ago
Recently I tried to replace an Easytrieve program with SYNCSORT for performance reasons.The below Easytrieve program was running for 6 minutes and it issued 1,051,382 EXCP’s and consumed 15.84 CPU seconds.The input file had about 60 million records.FILE FILEIN                     IN-REC          1  244  A   IN-FIELD1     212    1  A       IN-FIELD2     213   11  N 4  ..read more
Visit website
How to copy VSAM KSDS, Alternate Index AIX, PATH files without using IDMCAS in an easy way
Mainframe Tips, Tricks And Tutorials
by
7M ago
Suppose you want to copy VSAM KSDS, AIX, PATH files for your testing needs. This involves following steps 1. Defining the KSDS file2. Load the data to the base cluster 3. Define the alternate index and corresponding path 4. Build the alternate index  The below sample job uses IBM supplied utility ADRDSSU to dump the PROD.* files and restore them under TEST qualifier.  The end result is PROD ..read more
Visit website
How to use COBOL occurs depending on working storage section table in a SQL query
Mainframe Tips, Tricks And Tutorials
by
1y ago
Let us say we have below COBOL working storage section table and we want to match all the employee numbers from this array to a DB2 table.01 W-EMP-COUNT   PIC S9(04) COMP.01 W-EMP-LIST.   05 W-EMP-NUM OCCURS 1 TO 50 TIMES DEPENDING ON W-EMP-COUNT                 PIC X(05).Below SQL does exactly that WITH TEMP(IDX, T_EMP_NUM) AS (SELECT 1, LEFT(:W-EMP-LIST,5)     FROM SYSIBM.SYSDUMMY1    UNION ..read more
Visit website
Find and replace using using TSO batch utility
Mainframe Tips, Tricks And Tutorials
by
1y ago
Below job does find and replace using TSO batch utility. //STEP01 EXEC PGM=IKJEFT01//SYSTSPRT DD SYSOUT=*//SYSPRINT DD SYSOUT=*//SYSTSIN  DD *  EDIT 'MY.DATA.SET' OLD NONUM CNTL  VERIFY ON  TOP  C * 9999999 'LOG NO' 'LOG YES' ALL  TOP  C * 9999999 'INTO TABLE' 'RESUME YES INTO TABLE' ALL  TOP  C * 0000001 'RESUME YES INTO TABLE' 'REPLACE INTO TABLE'  SAVE ..read more
Visit website

Follow Mainframe Tips, Tricks And Tutorials on FeedSpot

Continue with Google
Continue with Apple
OR