Home      Mainframe Forum      Mainfarme Tutorials      IBM Manuals      Mainframe Interview Questions      Mainframe Books      IT News     SiteMap     Downloads


     
 
MAINFRAME - TIP OF THE DAY : All available storage is assigned to the job or jobstep, If REGION is coded 0K or 0M

Google
 
Web mainframegurukul.com

Frequently used commands in FileAid.
Goto page 1, 2  Next
 
Post new topic   Reply to topic    mainframegurukul.com Forum Index -> FILE-AID
  View previous topic :: View next topic  
Author Message
Anuj Dhawan
Moderator


Joined: 09 Aug 2008
Posts: 1631
Location: Mumbai, India

Answer was approved by Question owner.
Useful Post
3 votes
Not an useful post
Greate Post!! Salute Author
8 salutes

PostPosted: Fri Dec 12, 2008 11:24 am    Post subject: Frequently used commands in FileAid. Reply with quote

Hello,

I have listed few commands, if anybody know any more commands with examples- please add on

File-Aid is a versatile utility that is basically used for re-formatting data while copying from another data set. Apart from several usage of this utility like copy data sets, concatenate datasets etc., FILEAID can also be used to check whether a file is empty or not. Below is the general structure of File-Aid batch processing JCL.

General Structure
Code:
//STEPNAME EXEC PGM=FILEAID
//DD01     DD DSN=INPUT.FILE,DISP=SHR
//DD01O    DD DSN=OUTPUT.FILE,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD *


Using different SYSIN control cards we can have different functions of FILEAID.

1. Check for empty files
Code:
//CHKEMPTY EXEC PGM=FILEAID
//DD01     DD DSN=G1SG00AT.INFILE,DISP=SHR
//DD01O    DD DSN=DUMMY,
//         DISP=(NEW,CATLG,DELETE),
//         UNIT=SYSDA
//SYSOUT   DD *
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD DUMMY

If the input file is empty then this step will give RC = '08'. Trapping the return code of this step one can say whether the input file was empty.

2. Copy dataset - one to one
Code:
//STEPCOPY EXEC PGM=FILEAID
//DD01     DD DSN=G1SG00AT.INPUT1,DISP=SHR
//DD01O    DD DSN=G1SG00AT.OUTPUT1,DISP=OLD
//DD02     DD DSN=G1SG00AT.INPUT2,DISP=SHR
//DD02O    DD DSN=G1SG00AT.OUTPUT2,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD DUMMY      or code COPY as instream

Here by default SYSIN parameter is 'COPY'. Copy is done from DD01 to DD01O although DD02 and DD02O are coded.

3. Copy dataset - many to many
Code:
//STEPCOPY EXEC PGM=FILEAID
//DD01     DD DSN=G1SG00AT.INPUT1,DISP=SHR
//DD01O    DD DSN=G1SG00AT.OUTPUT1,DISP=OLD
//DD02     DD DSN=G1SG00AT.INPUT2,DISP=SHR
//DD02O    DD DSN=G1SG00AT.OUTPUT2,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD *
$$DD01 COPY
$$DD02 COPY
/*
Here DD01 is copied to DD01O and DD02 is copied to DD02O

4. Conditional copy
Code:
$$DD01 COPY IF=(776,GE,P'2'),IF=(1311,EQ,C'1')
In this example, copy input file data only if 776th digit is greater than or equal to 2 in packed digit format or if 1131st character is equal to '1'.

5. Multiple if entries are coded within a single IF parameter. It is a format to code logical OR conditions. If input record contains characters 173 or 326 at the location 14 then only they are copied to the output file.
Code:
$$DD01  COPY IF=(8,EQ,C'275'),
             IF=(8,EQ,C'494'),
             ORIF=(8,EQ,C'195'),
             AND=(50,EQ,C'02')


6. Logical AND condition is coded using two contiguous IF statements. The combination of ORIF and AND creates another pair of logical AND condition.

Copy those records which has character '275' at location 8 and characters not equal to 'SU' at location 60 ro character '195' at location 8 and '0' at location 50.
Code:
$$DD01  COPY IF=(8,EQ,C'275'),
             AND=(60,2,NE,C'SU'),
             ORIF=(8,EQ,C'195'),
             AND=(50,EQ,C'0')


7.
Code:
$$DD01  COPY IF=(8,EQ,C'423'),OUT=5,PRINT=2

This is a combination of COPY, IF, OUT and PRINT. It copies the first 5 records that contain the string '423' at location 8 and prints the first 2 selected records. Here the printed records will go to DD name specified in SYSLIST.

8.
Code:
$$DD01  COPY MOVE=(1,10C'ABC')

Combination of COPY and MOVE. It copies ten repetition of the string to the output location 1 through 30.

9.
Code:
$$DD01  COPY OUT=60

Combination of COPY and OUT. It copies the first 60 records to the output data set.

10.
Code:
$$DD01  COPY PRINT=15

Combination of COPY and PRINT. It copies the input dataset while printing the first 15 records.
_________________
Regards,
Anuj
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.

Anuj Dhawan
Moderator


Joined: 09 Aug 2008
Posts: 1631
Location: Mumbai, India

Answer was approved by Question owner.
Useful Post
1 votes
Not an useful post
Greate Post!! Salute Author
4 salutes

PostPosted: Fri Dec 12, 2008 11:32 am    Post subject: Reply with quote

Hello again,

Some more..

11.
Code:
$$DD01 COPY SELECT=4,OUT=100,IF=(8,EQ,C'423')
Combination of COPY, SELECT, OUT and IF. It creates an extract file of every fourth input record that contains a value of '423' at location 8. A maximum of 100 such records are copied.

12.
Code:
$$DD01 DROP IF=(8,EQ,C'423'),OUT=10
Copy input dataset but drop records containing '423' at location 8. Also stop copying after 10 records.

13. Using pointer mechanism
Code:
//STEPNAME EXEC PGM=FILEAID
//DD01     DD DSN=INPUT.FILE,DISP=SHR
//DD01O    DD DSN=OUTPUT.FILE1,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD *
$$DD01  SPACE  IN=25
$$DD01  COPY OUT=6

The SPACE function is used to position the pointer at a specific record. The first control card places the pointer at the 25th record. The second control card copies the next 6 records.

14.
Code:
$$DD01  SPACE STOP=(8,4,C'423')
$$DD01  DUMP  IN=6

Combination of SPACE, STOP, DUMP and IN. it prints the record with '423' at location 8 and the next five records.

15. Replace
Code:
//STEPNAME EXEC PGM=FILEAID,PARM=TSO
//DD01     DD DSN=INPUT.FILE,DISP=SHR
//DD01O    DD DSN=OUTPUT.FILE1,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD *
$$DD01 COPYALL IF=(1,EQ,C'7,8'),
       REPL=(6,EQ,C'8000',C'8420'),
       REPL=(6,EQ,C'8001',C'8421'),
       REPL=(6,EQ,C'0405',C'8425'),
       REPL=(6,EQ,C'0406',C'8426'),
       REPL=(6,EQ,C'0407',C'8427'),
       REPL=(6,EQ,C'0408',C'8428')

In this example, if character '7' or '8' is found in column 1 of input file and characters '8000' is found in column 6 of input file then it is replaced by characters '8240' in output file from column 6 onwards.

16.
Code:
$$DD01  COPY RA=(1,60,C'ABCD',2C'XY')
Combination of COPY and REPLALL. It copies all input records while REPLALL parameter scans locations from 1 to 60 of each record and replaces all occurrences of the string 'ABCD' with 'XYXY'.

17.
Code:
$$DD01  COPY IF=(8,EQ,C'275'),
             ORIF=(60,EQ,C'SU'),
             REPL=(1,C'ABC')
Combination of COPY, IF, ORIF and REPLACE. It copies the records that have characters '275' at location 8 or 'SU' at location 60. If location 60 has characters 'SU' then it overlays the data at location 1 with 'ABC'.

18. Edit
Code:
//STEPNAME EXEC PGM=FILEAID,PARM=TSO
//DD01     DD DSN=INPUT.FILE,DISP=SHR
//DD01O    DD DSN=OUTPUT.FILE1,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD *
$$DD01 COPY  EDIT=(1,6,C'AAAA',C'BBBBBBBB')
Replaces the string 'AAAA' with the string 'BBBBBBBB'. When the longer new data is inserted then the fields are shifted and when required compressed for spaces.

19.
Code:
$$DD01  COPY EDITALL=(1,50,C'ABC,GHI',C' ')
Combination of COPY and EDITALL. This eliminates all occurrences of the string 'ABC' and 'GHI' because the new data is a NULL entry.

20.
Code:
$$DD01  UPDATE IN=100
$$DD01  UPDATE REPL=(55,EQ,C'EXGLA','AAAAA')
Combination of UPDATE, IN and REPLACE. It makes permanent changes to an existing data set. The first update places the pointer at a particular record and the second UPDATE replaces the data.
_________________
Regards,
Anuj
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Anuj Dhawan
Moderator


Joined: 09 Aug 2008
Posts: 1631
Location: Mumbai, India

Answer was approved by Question owner.
Useful Post
1 votes
Not an useful post
Greate Post!! Salute Author
4 salutes

PostPosted: Fri Dec 12, 2008 11:39 am    Post subject: Reply with quote

Hello once again,

Some more..

21. Accumulation and tallying
Code:
//STEPNAME EXEC PGM=FILEAID
//DD01     DD DSN=INPUT.FILE,DISP=SHR
//DD01O    DD DSN=OUTPUT.FILE1,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD *
$$DD01  ACCUM=(50,4,C,'TOTALS')
Accumulates the 4 byte field starting at position 50 and prints the total in SYSTOTAL and labels it as 'TOTALS'.

22.
Code:
$$DD01 TALLY IF=(8,EQ,C'275'),
 IF=(60,EQ,C'SU'),
 ACCUM=(50,4,C,'TOTAL'),
             IF=(55,EQ,C'EXGLA'),
 ACCUM=(15,1,C,'SUBTOTAL')
A combination of COPY, IF and ACCUM. the TALLY function binds the two ACCUM functions. It checks whether the first two IF conditions are satisfied. If so then the totals of the field from 50 to 54 are generated and labeled under the heading 'TOTALS'. For the second IF the field at location 15 is accumulated and labeled the heading as 'SUBTOTAL'.

23. Backward processing of records
Code:
//STEPNAME EXEC PGM=FILEAID
//DD01     DD DSN=INPUT.FILE,DISP=SHR
//DD01O    DD DSN=OUTPUT.FILE1,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD *
$$DD01  SPACEBACK  STOP=(8,0,C'423')
$$DD01  DUMPBACK  OUT=6
It uses the back function which provides the backward processing of the records. SPACEBACK will do the backward processing of the records and stops at the record which satisfies the particular condition provided in the STOP parameter. The DUMPBACK will also do the backward processing and print such 6 records.

24. User functions - split input file
Code:
//STEPNAME EXEC PGM=FILEAID
//DD01     DD DSN=INPUT.FILE,DISP=SHR
//FILE01   DD DSN=OUTPUT.FILE1,DISP=OLD
//FILE02   DD DSN=OUTPUT.FILE2,DISP=OLD
//FILE03   DD DSN=OUTPUT.FILE3,DISP=OLD
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST  DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//SYSIN    DD *
$$DD01 USER    IF=(28,EQ,C'BC4,BC9,BC5,DFC'),
               WRITE=FILE01,
               IF=(28,NE,C'BC4,BC9,BC5,DFC'),
               WRITE=FILE02
Here step checks 28th characters onwards in input file in characters mode. If field contains values 'BC4', 'BC9', 'BC5' or 'DFC' then output 1 is written else output 2 is written.

25.
Code:
$$DD01 USER WRITE=FILE02,
 IF=(55,EQ,C'EXGLA'),
       MOVE=(55,C'SSSSS'),
 WRITE=FILE02
Combination of USER, WRITE, IF and MOVE. The first WRITE parameter writes all the input records and if the selection criteria matches then it performs the MOVE and then repeats the records with the changed value in the output data set.
_________________
Regards,
Anuj
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Vamsi99
Active Member


Joined: 05 Nov 2008
Posts: 184

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Sun Dec 14, 2008 10:03 am    Post subject: Reply with quote

Thank you very much Anuj. It is really useful information.
Appreciate your efforts in posting many useful FILE-AID commands.
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Anuj Dhawan
Moderator


Joined: 09 Aug 2008
Posts: 1631
Location: Mumbai, India

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
1 salutes

PostPosted: Tue Dec 23, 2008 12:21 pm    Post subject: Reply with quote

Hi Vamsi99,
Vamsi99 wrote:
Thank you very much Anuj. It is really useful information.
You are welcome.. Smile.
Quote:
Appreciate your efforts in posting many useful FILE-AID commands.
Hope they'll help others as well. And please keep us posted if you also have some more tricks.
_________________
Regards,
Anuj
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
arrbee
Active Member


Joined: 24 Feb 2006
Posts: 146

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Thu Jan 29, 2009 9:07 pm    Post subject: Reply with quote

Hi, Anuj.

Excellent stuff.....

Thanks a lot.
_________________
Arr Bee
-------------
?My joy in learning is partly that it enables me to teach? - Seneca(Roman philosopher, mid-1st century AD)
Back to top
View user's profile Send private message Send e-mail
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Anuj Dhawan
Moderator


Joined: 09 Aug 2008
Posts: 1631
Location: Mumbai, India

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
1 salutes

PostPosted: Fri Jan 30, 2009 10:26 am    Post subject: Reply with quote

Hopefully they are helpful..and welcome back.. Smile

Ad
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
charan_Hyd
Member


Joined: 15 Sep 2009
Posts: 5
Location: Hyderabad

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Tue Sep 15, 2009 5:16 pm    Post subject: Reply with quote

Thanks Anuj for all the details

Could you please explain the below command in fileaid

$$DD02 USER PAD=x'40',IF=(1,NE,C'ZZ'),MOVE=(1,155,1),W=BKUP
_________________
Charan Sedimbi
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Gerry Ciccheti
Member


Joined: 30 Jul 2009
Posts: 17

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Thu Sep 17, 2009 6:00 am    Post subject: Reply with quote

Hi,

you should really try to read the manual,

$$DD02 is the input DDname

USER - allows grater control when writing output records and datasets

PAD or PADCHAR - specifies the value to be used for padding. The PAD value initializes output areas when creating records using the move parameter.
X'40' is just a blank

IF=(1,NE,C'ZZ') - when pos 1 to 2 is not equal to ZZ

MOVE=(1,155,1) - copies 155 bytes of information from position 1 of input to location 1 of output, ie. MOVE=(to-location,length,from-location)

W or WRITE - the write parameter is only used with the USER function,
WRITE=BKUP , BKUP is the user-defined name that matches the DD name in the JCL of the desired output dataset.

Gerry
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Anuj Dhawan
Moderator


Joined: 09 Aug 2008
Posts: 1631
Location: Mumbai, India

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Thu Sep 17, 2009 9:05 am    Post subject: Reply with quote

Hi Gerry -- You beat it to me. Thanks for the explanation and yes, Welcome here, have a nice stay Smile

Regards,
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
charan_Hyd
Member


Joined: 15 Sep 2009
Posts: 5
Location: Hyderabad

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Fri Sep 18, 2009 11:02 am    Post subject: Reply with quote

Thanks Gerry.

I have one more control card
$$DD02 US MS=ALL,OUT=0,
IF=(1,EQ,C'M'),MV=(2,3,2),W=JOBPREFX

means

from all the members of DD02 dataset.
if the first character is equal to 'M'
then 2 characters are moved from 3rd position to 2 postions and placed in the
2nd position of the output file and output file dd name is JOBPREFX.

correct me if i am wrong

Thanks,
_________________
Charan Sedimbi
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
arrbee
Active Member


Joined: 24 Feb 2006
Posts: 146

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
1 salutes

PostPosted: Thu Sep 24, 2009 9:25 am    Post subject: Reply with quote

Anuj, would you please give a detailed example to convert a PD to ZD using File-Aid?

Thanks.
_________________
Arr Bee
-------------
?My joy in learning is partly that it enables me to teach? - Seneca(Roman philosopher, mid-1st century AD)
Back to top
View user's profile Send private message Send e-mail
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Chanti
Member


Joined: 27 Nov 2008
Posts: 33

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Thu Sep 24, 2009 3:11 pm    Post subject: Reply with quote

Hi,

Conversion of PD to ZD/ZD to PD can be achieved by using the option EDIT in the FILE-AID

The EDIT parameter replaces character, packed, or hexadecimal data in a record with character, packed, or hexadecimal data of a different length. When EDIT is executed, File-AID shifts the remaining data to adjust for the change. The EDIT parameter only changes the first occurrence of matched compare-data in a record. To change more than one occurrence of compare-data, use multiple EDIT parameters. To change all Occurrences, use the EDITALL parameter.

Syntax:
EDIT=(location,{length },[dupl]compare-data,new-data)
{operator}
For Example:
EDIT=(1,3,P'123',C'123')
The data 123 in the form of PD at location 1 of length 3 bytes is converted to Zoned numeric value of 123.

Correct me if iam wrong

Thanks,
Chanti
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
roamranger
Member


Joined: 07 Jul 2014
Posts: 1

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Mon Jul 07, 2014 6:34 pm    Post subject: Reply with quote

I have been trying to figure out how to drop, remove, or delete a particular line within a JCL member while adding some lines. Can someone please help!!

I am successful adding some lines, but not successful deleting them. I using the following to add some lines and they work, I edited each line in a previous step with random word(s), so each line command below is not recongized as part of a previous JCL statement. This is so i can add following line commands. In the next step after this step below, I replaced the random word(s) to space " " that was done in the previous step (done before this step below) so now the JCL statements are now correct :

$$DD01 USER F=JCL,WRITE=FILE02,
IF=(1,20,C'//JOBLIB'),
MOVE=(1,80C' '),
MOVE=(1,C'// DISP=SHR'),
WRITE=FILE02,
IF=(1,20,C'//UPDTLINE'),
MOVE=(1,80C' '),
MOVE=(1,C'// DISP=SHR'),
WRITE=FILE02
//*

I am sort of novice, but you can see I know how minipulate the data to make the results I want.
Now, I have a line that has a text "DEL-LINE" within inside PDS members. How can I do this?
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Angelin
Member


Joined: 12 Feb 2016
Posts: 1

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Fri Feb 12, 2016 9:52 pm    Post subject: Reply with quote

This is an exact copy of this post: http://ibmmainframes.com/about494.html


Hello Anuj, you are copying other people's works here & in your site without giving them any credits. May I ask you why?
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Display posts from previous:   
Post new topic   Reply to topic    mainframegurukul.com Forum Index -> FILE-AID All times are GMT + 5 Hours
Goto page 1, 2  Next
Page 1 of 2



 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

Related topics
 Topics   Replies   Author   Views   Last Post 
No new posts Query For IEBPTPCH 3 padmajeet.gaikwad 13444 Mon Feb 01, 2016 10:56 pm
academyindia4 View latest post
No new posts Unable to achieve below scenario using ICETOOL 27 sirianangel 33681 Mon Feb 01, 2016 10:01 pm
academyindia4 View latest post
No new posts Need to put records a Sorting order as mentioned below. 14 Yash1911 12633 Mon Jan 25, 2016 9:50 pm
academyindia4 View latest post
No new posts how to deal with the below scenario using iebgener 7 mainframes_6002 11170 Wed Dec 07, 2011 10:34 am
DikDude View latest post
No new posts Coulu someone explain the parameters in the below code? 1 lovely sweety 11352 Thu Jun 09, 2011 3:50 pm
dbzTHEdinosauer View latest post
 


Cobol Tutorial
This cobol tutorial covers most of the important topics like STRING, UNSTRING, COMP, COMP-3.....
DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. Explains in simple language. Some Chapters are locked, Forum members have free access to these chapters
CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming...
JCL Tutorial
This is most popular JCL tutorial from mainframegurukul. It does contain important jcl ....
SORT Tutorial
This Tutorial covers all important aspects of DFSORT. Has more SORT examples
INTERVIEW Questions
This page covers important interview questions
Mainframe Jobs
Mainframe Jobs posted by members of mainframegurukul forum
FaceBook Page
MainframeGurukul FaceBook Page
LinkedIn Page
MainframeGurkul Linkedin Page

This widget requires Flash Player 9 or better







Go to top of the page
 

Online ABEND Reference ||  JCL References ||  COBOL References ||  VSAM References ||  Tutorials by Drona Series ||  SQL tutorial ||  BOOKS  ||  DB2 INTERVIEW QUESTIONS ||  COBOL INTERVIEW QUESTIONS  ||  JCL INTERVIEW QUESTIONS ||  JCL2 INTERVIEW QUESTIONS ||  VSAM INTERVIEW QUESTIONS ||  CICS INTERVIEW QUESTIONS  ||  Online tutorials ||  Online ABEND Reference ||  JCL References ||  COBOL References ||  VSAM References ||  Tutorials by Drona Series ||  SQL tutorial ||  BOOKS  ||  SiteMap  ||  Expeditor Tutorial  ||  FILE-AID Tutorial  ||  Changeman Tutorial  ||  COBOL   ||  DB2   ||  JCL  ||  CICS  ||  VSAM  ||  DB2 Interview Questions ( 110 )   || Simple JCL Tutorials  || JCL Tutorial from MainframeGurukul.com   || Simple JCL Tutorial - Chapter1 ;|| Mainframe Forum - Tutorials  || Mainframe Tutorials || Mainframe CICS tutorial|| Mainframe COBOL Tutorial

Drona Educational Forums - Mainframe Cobol DB2 CICS Board
Powered by phpBB

mainframetopic-3669.html