View previous topic :: View next topic
|
Author |
Message |
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
Code: |
//SEARCH EXEC PGM=ISRSUPC,
// PARM=(SRCHCMP,
// 'ANYC')
//NEWDD DD DSN=SGCVPGS.V823.ALPHA.PROCLIB,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP081006,DISP=SHR ----->This is the PDS has that string now in 2nd position
// DD DSN=SGCVPGS.V823.PROCLIB,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP071208,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP080419,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP081205,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP090417,DISP=SHR
// DD DSN=SGCVPGS.V823.ALPHA.PARMLIB,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB.SP071208,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB.SP080419,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB.SP081006,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB.SP081205,DISP=SHR
//OUTDD DD SYSOUT=(A)
//SYSIN DD *
SRCHFOR '&ASMFN'
SPOOL
NP DDNAME StepName ProcStep DSID Owner C Dest Rec-Cnt Page
JESMSGLG JES2 2 UGCG1VD X LOCAL 18
JESJCL JES2 3 UGCG1VD X LOCAL 21
JESYSMSG JES2 4 UGCG1VD X LOCAL 50
OUTDD SEARCH 102 UGCG1VD A LOCAL 1,446 -----> Chnage in the rec-cnt
//SEARCH EXEC PGM=ISRSUPC,
// PARM=(SRCHCMP,
// 'ANYC')
//NEWDD DD DSN=SGCVPGS.V823.ALPHA.PROCLIB,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP081006,DISP=SHR -----> When the PDS is at third position or after that i'm unable to find that string
// DD DSN=SGCVPGS.V823.PROCLIB.SP071208,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP080419,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP081205,DISP=SHR
// DD DSN=SGCVPGS.V823.PROCLIB.SP090417,DISP=SHR
// DD DSN=SGCVPGS.V823.ALPHA.PARMLIB,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB.SP071208,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB.SP080419,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB.SP081006,DISP=SHR
// DD DSN=SGCVPGS.V823.PARMLIB.SP081205,DISP=SHR
//OUTDD DD SYSOUT=(A)
//SYSIN DD *
SRCHFOR '&ASMFN'
SPOOL
NP DDNAME StepName ProcStep DSID Owner C Dest Rec-Cnt Page
JESMSGLG JES2 2 UGCG1VD X LOCAL 18
JESJCL JES2 3 UGCG1VD X LOCAL 21
JESYSMSG JES2 4 UGCG1VD X LOCAL 50
OUTDD SEARCH 102 UGCG1VD A LOCAL 1,207 -----> Chnage in the rec-cnt |
Function-
1.im concatenating few dataset and searching the particular string.
2.The number of PDS concatenated are same and there is no edit/change done.
3.When i have changed the position of one of the PDS the rec- count has changed.Why?
4.Also i'm not able to get the right result when the Particular PDS is at another position apart from 1 and 2 of concatenation.Why?
5.Is there any issue/limit with SUPC?
The LRECL=80 and BLOCKSIZE=27920 |
|
Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007 Posts: 2146 Location: At my coffee table
|
|
|
|
1,446 vs 1,207
Quote: |
3.When i have changed the position of one of the PDS the rec- count has changed.Why? |
Have you looked at the printouts to see what the difference is?
The counts include headers and footers, so the difference may just be that.
Quote: |
4.Also i'm not able to get the right result when the Particular PDS is at another position apart from 1 and 2 of concatenation.Why? |
What means "the right result"? |
|
Back to top |
|
|
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
Quote: |
3.When i have changed the position of one of the PDS the rec- count has changed.Why?
Have you looked at the printouts to see what the difference is?
The counts include headers and footers, so the difference may just be that. |
Thank you CICS Guy the above doubt is clear.
Quote: |
4.Also i'm not able to get the right result when the Particular PDS is at another position apart from 1 and 2 of concatenation.Why?
What means "the right result"? |
There is one string which is starting with (&asmfn..aac1....)Present in the PDS "SGCVPGS.V823.PROCLIB.SP081006" if i keep the PDS in second or first position the particular string mentioned is picked, but if the PDS is concatenated at 3 rd or later the string is not picked. What is causing this issue?Could you please assist? |
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
If a member appears in more than one PDS, it is searched only once, in the 1st PDS where it appears.
When you change the concatenation order, it will be another member (but with the same name) that will be searched, so this may lead to different results.
If you want, you can use option SDUPM:
Quote: |
SDUPM Search duplicate members. Searches all members found in concatenated PDS data sets, even if the members have the same name and are at a higher level. Search duplicate names even if the search is for a single member or if members are specified using the SELECT process statement. |
|
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
Also, you can check your output:
When using concatenated datasets, SuperC tells you in which dataset the member was found:
In the listing:
Code: |
CMDEFHAY CONCAT#(3) ----------- STRING(S) FOUND ----------------
12INXQO CONCAT#(4) ----------- STRING(S) FOUND ---------------- |
In the summary:
Code: |
THE FOLLOWING "SRH" FILE CONCATENATED DATA SETS WERE SPECIFIED:
(1) SGCVPGS.V823.PROCLIB
(2) SGCVPGS.V823.PROCLIB.SP071208
(3) SGCVPGS.V823.PROCLIB.SP080419
(4) SGCVPGS.V823.PROCLIB.SP081205 |
|
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Marso,
were you born knowing that - info on parms, etc...
or did you learn that by reading documentation, PF1 Help screens, etc??? |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Sounds like a "been there before" . . .
d |
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
No, when I can't sleep I just open my "ABCs of z/OS System Programming".
After a few pages I sleep like a baby...
Seriously now, I got a lot of help from the IBM Library Reader. It's one of my favorite tools. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
BTDTGTTS!
For real fun, have a programmer concatenate a PROCLIB to a STEPLIB -- in the middle of the concatenation mind you -- and the main programs calls a program with the same name as one of the procedures, so the PROCLIB member gets read as a load module. I forget the exact message generated but the ABEND is not at all clear about where the problem is ... much less what the problem is. |
|
Back to top |
|
|
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
Hi Marso,
Thanks a lot it woked perfectly fine!!!
This is how i used SDUPM.
Code: |
//SEARCH EXEC PGM=ISRSUPC,
// PARM=( 'SDUPM') |
In the result i was able to find the string for which i raised the question.But was still seeing the concatenation.
Code: |
THE FOLLOWING "SRH" FILE CONCATENATED DATA SETS WERE SPECIFIED:
(1) SGCVPGS.V823.ALPHA.PROCLIB
(2) SGCVPGS.V823.PROCLIB
(3) SGCVPGS.V823.PROCLIB.SP071208
(4) SGCVPGS.V823.PROCLIB.SP080419 |
Code: |
XM0LDL01 CONCAT#(13) ----------- STRING(S) FOUND -------------------
2 &VMXFN..XM0L.&VMXES - |
Does that mean if there are duplicate mem name in pds it has searched in the first member still after using SDUPM? |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
SDUMP will search all files and all members in the concatenation.
How do you get a hit on concatenation(13) but you only show 4 as concatenated ?
Gerry |
|
Back to top |
|
|
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
Wanted to save space so posted only few PDS there are total of 13 PDS being concatenated.
So when we use SDUPM it will search in the duplicate members as well right? |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
yes
Check this line in your output. Run your job with and without SDUPM and see the difference.
Code: |
LINES-FOUND LINES-PROC MEMBERS-W/LNS MEMBERS-WO/LNS COMPARE-COLS
|
Gerry |
|
Back to top |
|
|
himanshu7
Active User
Joined: 28 Aug 2007 Posts: 131 Location: At Desk
|
|
|
|
Thank you Gerry?
Experience certainly plays an important role.
Even i did see this code (posted above by gerry) but never thought about it...... |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
testing also helps
Gerry |
|
Back to top |
|
|
|