Spiderzone

http://mainframetipstricks.blogspot.com/

 
   

Powered by Spiderizon, free backlinks.

   
   

Abend tips

Mainframes Abend Codes

System Abends:

1. S001: I/O error encountered by your cobol program during QSAM,VSAM, BDAM processing.

2. S002: File Record length and record length coded in cobol program is mismatch.

3.S806: Load module not found;incorrect STEPLIB, JOBLIB or load module name.

4.SB37/SE37/S837: Insufficient space in dataset.

5.S222: Job cancelled by Operator.

6.S322: Job cancelled by OS due to timeout.

7.S0CB-Divide by Zero error.

8.S0C7: Moving non numeric data into numeric variable.

9.S0C4: Array Subscript or Index out of range.

10.S0C1: JCL DD statement was invalid or attempting to open dataset already open.

Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/


   
    

CICS tips

Cool and very useful mainframes tips and tricks!!!

 Check out some useful CICS tips 


1. Instead of manually creating MAPS and MAPSETS use BMS map generator tool which automatically generates code for your map.


http://publib.boulder.ibm.com/infocenter/ratdevz/v8r0/index.jsp?topic=/com.ibm.etools.bmseditor.doc/gettingstarted/tbm000.html


2. Use FRSET parameter instead of FSET in map so that data traffic from CICS screen and memory
reduces.


3. Encourage use of DFHCOMMAREA so that your CICS program is pseudoconversational. It will also increase concurrency and multitasking thus making better use of resources.

Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/

TSO COMMANDS tips

Cool and very useful mainframes tips and tricks!!!

Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/

 Check out some useful TSO COMMANDS

TSO command	Meaning
TSO XMIT	Sending messages or data sets to users on your system or on another system.
TSO TERM	Listing or changing the operating characteristics of your terminal.
TSO SUB	Submitting a background job for processing.
TSO ST	Checking the progress of a job.
TSO SMC	Copying one data set to another
TSO SE	Sending messages to another terminal user or the system operator on your system.
TSO REN	Changing the name of a non-VSAM cataloged data set or a member of a partitioned data set, or creating an alias name for a member of a partitioned data set.
TSO RECEIVE	Receiving a transmitted message or data set.
TSO R	Compiling, loading, and executing source statements in a data set.
TSO PROF	Listing or changing your user profile.
TSO PR	Printing a data set on a system printer.
TSO OUT	Listing or directing held output.
TSO MVSSERV	Accessing host capabilities from a Personal Computer.
TSO LOGON	Accessing the system.
TSO LOGOFF	Ending a terminal session.
TSO LISTD	Listing certain attributes of data sets.
TSO LISTC	Listing the data sets beginning with your prefix or the data sets in a particular catalog
TSO LISTB	Listing mail and notices for your installation.
TSO LISTA	Listing the data sets that are currently allocated to the TSO/E session.
TSO H	Obtaining information about the function, syntax, and operands of commands and subcommands and information about certain messages.
TSO FREE	Releasing (deallocating) a previously allocated data set.
TSO E	Entering data into data sets, or directly modifying data that is already in a data set.
TSO DEL	Deleting one or more data set entries or one or more members of a partitioned data set.
TSO CANCEL	Halting a submitted job.
TSO CALL	Loading/executing programs.
TSO ALLOC	Allocating data sets.

REXX tips

Cool and very useful mainframes tips and tricks!!!

 Check out some useful REXX tips  

1. EXECIO command: EXECIO * is faster than EXECIO 1.

2. REXX in batch programming: To run a rexx program in batch mode, you can use the below sample JCL.

//JOB1 JOB < job parameters>

//*
//STEP1 EXEC PGM=IKJEFT01 
//SYSTSPRT  DD SYSOUT=*
//SYSOUT    DD SYSOUT=*
//SYSPRINT  DD SYSOUT=*
//SYSEXEC   DD DISP=SHR,DSN=REXX-LIBRARY
//SYSPROC   DD DISP=SHR,DSN=CLIST-LIBRARY
//STEPLIB   DD DISP=SHR,DSN=LOADLIB
//SYSTSIN   DD *
  REXX-PROGRAM-NAME

/*

3. To activate REXX programs in a PDS, give the following commands.
 
-1-> TSO ALTLIB
-2-> ACTIVATE
-3-> EXEC
-4-> '<PDS NAME CONTAINING REXX PROGRAM>'


Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/

VSAM tips

Cool and very useful mainframes tips and tricks!!!

 Check out some useful VSAM tips 


1. To access VSAM file in CICS as well as batch environment define as SHAREOPTION (2,3)

2. DEFINE PATH command creates alias for VSAM cluster.

3. Choosing control interval size(CI) correctly improves the performance. For sequential access use a large CI size. For Direct access use small CI size.

Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/

GDG tips

Cool and very useful mainframes tips and tricks!!!

 Check out some useful GDG tips  


1. You can create GDG bases(upto 8) using TSO command TSO GDGBLD.
2. To retain GDG datasets


Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/

CICS tips

CICS tips

Cool and very useful mainframes tips and tricks!!!

 Check out some useful CICS tips 


1. Instead of manually creating MAPS and MAPSETS use BMS map generator tool which automatically generates code for your map.


http://publib.boulder.ibm.com/infocenter/ratdevz/v8r0/index.jsp?topic=/com.ibm.etools.bmseditor.doc/gettingstarted/tbm000.html


2. Use FRSET parameter instead of FSET in map so that data traffic from CICS screen and memory
reduces.


3. Encourage use of DFHCOMMAREA so that your CICS program is pseudoconversational. It will also increase concurrency and multitasking thus making better use of resources.


Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/
 

DB2 tips

Cool and very useful mainframes tips and tricks!!!

 Check out some useful DB2 tips 

1. Break up SQL statements and avoid using joins to save CPU hours.
2. For DB2 variable of DECIMAL the COBOL program should have PIC S9(n-m)v9(m) COMP-3
3. When using CURSOR for only reading the database, use FOR FETCH ONLY option.
4. Use  ‘Move current-date to ……’ to obtain a date or to do a date calculation instead of  ‘SET CURRENT TIMESTAMP’.


Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/

COBOL tips

Cool and very useful mainframes tips and tricks!!!

 Check out some useful COBOL tips  


1. Use INITIALIZE verb to initialize variables. This will avoid invalid data move abends like S0C7.
Initialize verb intializes numeric variable to Zeroes, Alphanumeric and Alphabetic variables to spaces.


2. The PARM value passed from JCL to COBOL program can be fetched in the LINKAGE section variables but you have to define a variable of length 4 before which will contain the length of PARM string passed from JCL.



Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/

JCL tips

Cool and very useful mainframes tips and tricks!!!

 Check out some useful JCL tips  

1.  To receive a notification as soon as the job gets executed, code NOTIFY=&SYSUID in the job card.


e.g //JOBNM JOB (ACCT,ARIN), CLASS=A,MSGCLASS=R,NOTIFY=&SYSUID

2.  To delete a member in use by other user.
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDS DD DSN=libname,DISP=SHR
//SYSIN DD *
ALLOC DDN(INFILE) SHR REUSE DSN('libname ')
DELETE libname(membername) FILE(PDS)

3. To create GDG generation base, type TSO GDGBLD. It will open a new panel where you can list your GDG base names and create it.

4. To check errors in JCL, submit the JCL with TYPRUN=SCAN parameter. You can also type JEM or JSCAN for error listing.

5. For long running jobs which get abended due to timeout error(S322 abend)
, provide TIME parameter as follows.

TIME=NOLIMIT

or
TIME=1440

Then the job will run till its execution completes.

6. Maximum number of in stream procedures allowed in a job =15.

7. Maximum number of catalog procedures allowed=255.


Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/
 

ISPF panel tips

Cool and very useful mainframes tips and tricks!!!

Check out some useful ISPF tips  


 1. While working on multiple screens we get confused as to which screen we are referring to. For this you can give name to the screen with command  SCRNAME <name of the screen>. For e.g you are modifying a cobol program, you can give the command;

COMMAND ===> SCRNAME cobolpgm

Next time you want to refer to this screen you can simply type cobolpgm on command line and go to that screen.

2. To find the last 10 datasets  accessed :

   i.go to 3.4 option.
   ii. On the MENUBAR, Select REFLIST
   iii. Select first option.

Using this option we can find last 30 datasets accessed.


3.  To check the ISPF region you are working on(Test/staging/production) use command SARE.

4. Use 3.13 option to compare 2 datasets or 2 PDS members.

5. while retrieving archived datasets/PDS, screen cannot be used for other tasks. This can be avoided by using HR command which recalls your dataset in background process and keyboard is free for doing other tasks.


6. Sometimes you are not able to access a dataset as it is in use by some other user. To find out which user has your dataset accessed type TSO WHOHAS <DATASET_NAME>

e.g  COMMAND ===> TSO WHOHAS WPJCT.KK124.WORKFIL.TYPE


7. To search for a specific string in PDS members or datasets type SRCHFOR <Search term>
e.g COMMAND ===> SRCHFOR maser             This will search for word "maser" in all the pds members/datasets.


Check out more mainframe tips at http://mainframetipstricks.blogspot.com/

Check out our 100% free intraday share market tips at http://freesharemarkettips4u.blogspot.com/