|
View previous topic :: View next topic
|
| Author |
Message |
shankarm
Active User
Joined: 17 May 2010
Posts: 175
Location: India
|
|
|
|
Hello,
I am trying to understand what the below code is doing. i dont have manual for this utility.
If the below is (5,11,eq,c'start duns') then we can say that we are checking an equal to condition but we dont have 'eq' in the below what does it signify?
| Code: |
//P010 EXEC PGM=FILEAID
//SYSPRINT DD SYSOUT=(,)
//SYSLIST DD SYSOUT=(,)
//SYSTOTAL DD SYSOUT=(,)
//DD01O DD SYSOUT=(,)
//DD01 DD DISP=SHR,DSN=RDB.APIC.WB&FILE1
//SYSIN DD *
$$DD01 COPY IF=(5,11,C'START DUNS')
/*
|
|
|
| Back to top |
|
 |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
| what happens when You run it ? |
|
| Back to top |
|
|
shankarm
Active User
Joined: 17 May 2010
Posts: 175
Location: India
|
|
|
|
nothing happends it just goes thuorgh successfully with rc 0. is it a check for empty file?
one more thing, i cannot see the content of the input file. i dont have access. |
|
| Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL
|
|
|
|
| If you don't have the manual for File-AID, perhaps you should be using something else. |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
If you don't have access to the input file, how are you able to run the job?
If your organization ls licensed to use the product, you can download the documentation from Compuware Support (it may even be generally available, but i have not checked).
If someone is going to work on this, they need access to the data and the manual(s). |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
other than not being able to see the contents of the file
and
not having any manuals at your site
your site is also filled with really stupid code.
why have
$$DD01 COPY IF=(5,11,C'START DUNS'
position 5 (for 11) for a 10 char literal?
maybe change the 11 to 10
or
change the literal from
to
and are you sure it is supposed to be all caps?
man, if i worked at your site,
i would insist that they pay me in cash, daily.
by the way, what happened with this thread? |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
I realize that this has gone on for a bit and feel somewhat remiss in not suggesting you edit a member in one of your "work" datasets and put in some values that contain the START DUNS in different positions and run your batch job abd see what happens. . .
Shouldn't need documentation or access to some restricted file. . . |
|
| Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA
|
|
|
|
FIle Aid defaults to EQ for operator if not specified. The given condition checks 11 bytes starting in byte 5 for the characters 'START DUNS' (which actually can only start in byte 5 or 6) and copies the record to DD01O if the match is found. If a match is not found, then File Aid ignores the record.
If your site is licensed for Fail Aid, you have access to the manuals -- whether hard copy at your site, soft copy from an internal web site, or by accessing the vendor support site and downloading them yourself. |
|
| Back to top |
|
|
shankarm
Active User
Joined: 17 May 2010
Posts: 175
Location: India
|
|
|
|
My client is very very big.. (am not supposed to disclose my clients name) and am sure they have license for every single thing they use. The problem is that the software manuals and installations are supported by another and not us.
The RACF is supported by another .. so it will be months before i get access and manuals.
we have identified an issue with the file-aid utility itself... teams are working on this... i will keep the forum updated...
Thanks all.. |
|
| Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL
|
|
|
|
| shankarm wrote: |
| My client is very very big.. (am not supposed to disclose my clients name) and am sure they have license for every single thing they use. The problem is that the software manuals and installations are supported by another and not us. |
The same is true of my client. The solution is escalation: go to your coordinator, your team lead, your delivery manager, your service manager, and so on up the food chain until you're told "Shut up or you're fired". And if you still can't do your job, you walk. Being blindfolded and wearing boxing gloves is not a tolerable condition of doing the job. |
|
| Back to top |
|
|
|
|
