mainframetips.blogspot.com
Cool Mainframe Tips: VSAM
http://mainframetips.blogspot.com/2007/06/vsam.html
Sunday, June 10, 2007. One can speed up applications greatly by using memory to cut I/O when dealing with VSAM. For this VSAM Buffers can be enlarged. In the DD statement code AMP parameters = BUFNI(index), BUFND(data), BUFSP ( amount of. Increase number of Data buffers (BUFND) for sequential access. Increase number of Index buffers (BUFNI) for random access. IDCAMS Utility can't be executed without 2 DD Statements. They are SYSPRINT and SYSIN. DEFINE ALIAS command creates an alias for non-VSAM datasets.
mainframetips.blogspot.com
Cool Mainframe Tips: COBOL
http://mainframetips.blogspot.com/2007/06/cobol.html
Sunday, June 10, 2007. If you are accessing ESDS VSAM file, then in COBOL do you know. That SELECT clause has something different about it! SELECT FILE ASSIGN TO AS-DDNAME. Es, the DDNAMEs should be prefixed with AS- . If you are not doing that then an S213 ABEND might occur when. Attempting to open data set. When writing a COBOL program that is to be used as a CICS application program,do not use the. MERGE statement can have OUTPUT PROCEDURE but not INPUT PROCEDURE! Rule of the THUMB:. 2 For var iable o...
mainframetips.blogspot.com
Cool Mainframe Tips: SDSF
http://mainframetips.blogspot.com/2007/06/sdsf.html
Sunday, June 10, 2007. If you want to rearrange the columns in SDSF -. 2In command line type "arr? 3This will bring the complete list of SDSF column names. 4You can move the columns using "/" and "/ ". One Column in the SDSF that we can bring to the front position is the MAX-RC (which usual is. The last column in SDSF ) which shows the completion code or the abend code of the job. How to allow another user to browse my job? They use, OWNER urid and PRE urid* to browse your job. When I use "? When I use "...
mainframetips.blogspot.com
Cool Mainframe Tips: CICS
http://mainframetips.blogspot.com/2007/06/cics.html
Sunday, June 10, 2007. Use CALLs instead of LINKs in CICS. Establishes a new run unit. For all this activities, it executes 1400 machine code instructions. It executes around 12 machine code instructions. Just replacing EXEC CICS LINK with CALL statement on a case study, it was found that. Internal Transaction Response time improved 23 - 78 %. Total CPU Time improved 15 - 23 %. Dynamic storage use improved 11 - 30 %. CALL used in the study is STATIC CALL . COBOL refered here is VS COBOL II. The data-area...
mainframetips.blogspot.com
Cool Mainframe Tips: JCL
http://mainframetips.blogspot.com/2007/06/jcl.html
Sunday, June 10, 2007. If you prefer a dataset to be not deleted accidentally, then. USING IDCAMS USING JCL COMMENTS. TO(04365) LABEL=RETPD=04365 Will protect till end of 2004. FOR(30) LABEL=RETPD=10 Will protect for 30 days. If by chance of fate, you want to delete a dataset that is protected by the above method. Use IDCAMS DELETE command with PURGE option. DELETE TOP.SECRET.DATA -. Is it possible to execute a program from any library using the referback? The Answer is Yes! I have a JCL with 10 steps.
mainframetips.blogspot.com
Cool Mainframe Tips: ISPF
http://mainframetips.blogspot.com/2007/06/ispf.html
Sunday, June 10, 2007. Lets start with a generic and simpler one. Consider that you are editing a file/program and you want to know the changes you have done. Since the last SAVE command. How to find that? Give COMPARE SESSION on the command line. Further use of COMPARE commands. Can be used like 3.13 option. Usually the PDS or PS bears the ID of the creator or the ID of the person who modified it. Recently.But is it possible to change these ID values without leaving trace of one’s own ID? While trying t...
mainframetips.blogspot.com
Cool Mainframe Tips: SORT
http://mainframetips.blogspot.com/2007/06/sort.html
Sunday, June 10, 2007. Do you know COBOL Internal SORT and MERGE is actually done by DFSORT? If you SORT or MERGE with COBOL, the compiler automatically generates a SORT or. MERGE control statement for you with the correct DFSORT descriptions for the COBOL fields. How can I replace all the low-values in a file to spaces? Use ALTSEQ CODE . Here's an example of how you could change all low values (X'00') to spaces (X'40'), in an FB. Data set with an LRECL of 80:. OUTREC FIELDS=(1,80,TRAN=ALTSEQ).
mainframetips.blogspot.com
Cool Mainframe Tips: FILEAID
http://mainframetips.blogspot.com/2007/06/fileaid.html
Sunday, June 10, 2007. The Easiest and Coolest way to locate bad data is thru File-Aid's FIND command. 1OPEN the file in FILE-AID (in either browse or edit mode). 4Then issue ,. The control will take you to the first invalid data record for the given field. The FILE has 3 fields namely NAME,AGE,COUNTRY. If you want to find the invalid data in the age field, then issue. We always face a s ituation such that when we have opened a File in FI LEAI. To help us in this type of s ituation. COMMAND = = GO EDI T.
mainframetips.blogspot.com
Cool Mainframe Tips: June 2007
http://mainframetips.blogspot.com/2007_06_01_archive.html
Sunday, June 10, 2007. Use the OS/390 – MVS solution ‘Move current-date to ……’ to obtain a date or. To do a date calculation instead of DB2’s ‘SET CURRENT TIMESTAMP’. Avoid joins that involve more than two TABLES. Break it up into multiple SQL statements. In a case study, a 5-table join used 4190 CPU hours in a month for a weekly process. Breaking it up dropped the usage to 9 CPU hours per month! If using CURSOR SQL for read only, use FOR FETCH ONLY in the SQL. COLLID NAME CONTOKEN OWNER CREATOR TIMESTAMP.
