Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

File aid control card error

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools
View previous topic :: :: View next topic  
Author Message
varalakshmi.G

New User


Joined: 04 Jun 2007
Posts: 55
Location: Hyderabad

PostPosted: Fri Nov 16, 2007 9:46 pm    Post subject: File aid control card error
Reply with quote

hi

//SYSIN DD *
$$DD01 COPY IF=(1,EQ,C'0'),
AND=((2,7,NE,C'MASKING'),
OR=(2,6,NE,C'SORTED'),
OR=(2,6,NE,C'USERID'),
OR=(2,4,NE,C' '))
REPL=(1,C' ')
/*

above control card has an error with file aid utility.this is for replacing the 1st charector with space if the conditions are satisfying.

please correct it na.........
Back to top
View user's profile Send private message

Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Fri Nov 16, 2007 10:17 pm    Post subject: Re: file aid control card
Reply with quote

varalakshmi.G wrote:
hi

//SYSIN DD *
$$DD01 COPY IF=(1,EQ,C'0'),
AND=((2,7,NE,C'MASKING'),
OR=(2,6,NE,C'SORTED'),
OR=(2,6,NE,C'USERID'),
OR=(2,4,NE,C' '))
REPL=(1,C' ')
/*

above control card has an error with file aid utility.this is for replacing the 1st charector with space if the conditions are satisfying.

please correct it na.........

It would be helpful if you would show us the error message, job output, etc. and please use code to maintain the spacing.
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Fri Nov 16, 2007 11:13 pm    Post subject: Reply to: file aid control card
Reply with quote

They probably should looks something like:

Code:

//SYSIN DD *
$$DD01 COPY IF=(1,EQ,C'0'),
  AND=(2,7,NE,C'MASKING'),
  AND=(2,6,NE,C'SORTED'),
  AND=(2,6,NE,C'USERID'),
  AND=(2,4,NE,C'    '),
  REPL=(1,C' ')
/*


The logic for NE (not equal to) should be connected with AND, not IF.

If you said position 1 NE C'A' OR position 1 NE C'B', the OR implies that either condition can be TRUE to select a record. If you had a C'B' in position 1, then it is NE (not equal) to C'A' and the record would be selected.

If you said position 1 NE C'A' AND position 1 NE C'B', then if either an C'A' or C'B' is in position 1 of a record, it would not be selected.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Converting Variable block file to Fix... bhavana yalavarthi DFSORT/ICETOOL 10 Tue May 16, 2017 2:20 pm
No new posts Getting error while opening a variabl... apandey1 COBOL Programming 5 Fri May 05, 2017 12:22 pm
No new posts Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am
No new posts File processing vishwakotin Mainframe Interview Questions 9 Fri Apr 28, 2017 11:38 am
No new posts Occurrence of various strings within ... TS70363 JCL & VSAM 1 Thu Apr 27, 2017 8:18 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us