| View previous topic :: View next topic |
| Author |
Message |
Novice
Beginner
Joined: 27 Dec 2002
Posts: 46
Topics: 15
|
 Posted: Mon May 16, 2005 8:03 am Post subject: 3.14 search option |
 |
|
I have a PDS and need to search for the following string with quotes.
I tried the following options in the panel and none of them giving the correct results
''MILITARY'' - gives an error (Above string again put in SINGLE quotes)
"'MILITARY'" - gives an error (String put between Double quotes)
'"MILITARY"' - Worked but gave wrong result (single quote followed by string in Double quotes)
Did any one have worked on such requirement? Any inputs are appreciated
Thanks,
Novice |
|
| Back to top |
|
 |
Mervyn
Moderator
Joined: 02 Dec 2002
Posts: 415
Topics: 6
Location: Hove, England
|
| Posted: Mon May 16, 2005 8:14 am Post subject: |
|
|
Novice,
I've just had a quick look in the tutorial, and it looks as though you need three single quotes at each end.
Give it a try.
_________________
The day you stop learning the dinosaur becomes extinct |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Mon May 16, 2005 12:08 pm Post subject: |
|
|
Novice,
You can run the 3.14 or 3.15 in batch mode and you can specify the quote in hex mode. Run the following JCL.
| Code: |
//SEARCH EXEC PGM=ISRSUPC, *
// PARM=(SRCHCMP,
// '')
//NEWDD DD DSN=YOUR INPUT DATASET,
// DISP=SHR
//OUTDD DD SYSOUT=(*)
//SYSIN DD *
SRCHFOR X'7D'
SRCHFORC 'MILITARY',W
SRCHFORC X'7D'
/*
|
SRCHFORC is used as Continuation. X'7d' in hex translates to a single quote.
Hope this helps...
Cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Novice
Beginner
Joined: 27 Dec 2002
Posts: 46
Topics: 15
|
| Posted: Tue May 17, 2005 3:14 am Post subject: |
|
|
Thanks Mervyn. It worked
Kolusu, does W stands for "WORD" in your example ?
BTW when I used your approach for picking values '08' it picked up 08 also.
Here is the coded sample JCl and the result
SRCHFOR X'7D'
SRCHFORC '08',W
SRCHFORC X'7D'
Result:
| Code: |
ADSDP10D --------- STRING(S) FOUND -------------------
204 '06' '07' '08' '09' '10'
208 '06' '07' '08' '09' '10'
ADRC10A --------- STRING(S) FOUND -------------------
71 05 WS-AUDIT-START-DATE PIC X(10) VALUE '08/08/1988'.
73 05 WS-AUDIT-END-DATE PIC X(10) VALUE '08/08/1988'.
77 05 WS-LAST-CHG-DATE PIC X(10) VALUE '08/08/1988'.
AIAB02A --------- STRING(S) FOUND -------------------
AIAB22A --------- STRING(S) FOUND -------------------
291 04 LAST3845-SEG PIC X(08) VALUE '........'.
688 05 AUD-SEG-TRANS PIC X(08) VALUE 'BAIAB22A'.
|
Did I do some thing wrong here ?
Thanks for your time
Novice |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
