Search the web
Sign In
New User? Sign Up
os390andmvs · OS390 and MVS - For z/OS, OS/390 and MVS System Programmers
? Already a member? Sign in to Yahoo!

Yahoo! Groups Tips

Did you know...
Want to share photos of your group with the world? Add a group photo to Flickr.

Best of Y! Groups

   Check them out and nominate your group.
Having problems with message search? Fill out this form to ensure your group is one of the first to be migrated to the new message search system.

Messages

  Messages Help
Advanced
ISPF copy issue:   Message List  
Reply | Forward Message #587 of 637 |
Hello Ken,

what I have till now:

Assuming datasets of the type

HLQ.TEST%.BACKUP with % = 1,2,3 and
the following MBR List in HLQ.TEST1.BACKUP
A
A1
A1BC
A2DE
B
B1
C
C234C
MN1CBE
M1BD
M1BEF
M2CE

and an INPUT DS: XXX.USER.CNTL(BACKUPIN) with the content:
DS: TEST1.CNTL TEST3.BACKUP
A
B
DS: 'HLQ.TEST1.BACKUP' TEST2.BACKUP
A
B
%%%%
%1
%1*
*C
M*
*B*

you could invoke an (upt now incomplete) REXX procedure, which would tell you:

'HLQ.TEST1.CNTL' was not found in catalog.

Following masks would have been processed:

MASK.1 = A


MASK.2 = B

Input DS: 'HLQ.TEST1.BACKUP'
Output DS: TEST2.BACKUP


MASK.1 = A
A

MASK.2 = B
B

MASK.3 = %%%%
A1BC
A2DE
M1BD
M2CE

MASK.4 = %1
A1
B1

MASK.5 = %1*
A1
A1BC
B1
M1BD
M1BEF

MASK.6 = *C
A1BC
C
C234C

MASK.7 = M*
MN1CBE
M1BD
M1BEF
M2CE

MASK.8 = *B*
A1BC
B
B1
MN1CBE
M1BD
M1BEF
***


BTW: The output DS is not fully qualified, assuming that HLQ would be the Prefix
of the Userid invoking the REXX-procedure, which is true for me because I used
my own USERID as HLQ for testing purposes.

If you are interested, just let me know and I could:
1. make the procedure actually copy the members and
2. send it to you.

Just to play safe, this would be just an example on an as is basis, without any
responsability or guarantee neither from me nor from my company.
Just fyi: The coding up to now is 63 lines, without any documentation :-( but it
proved to be more challenging than I originally thought...

If you have questions, more requirements or suggestions, just let me know, in
case I missed something :-)

Regards


Mit freundlichen Grüßen

Peter Keldenich
Zentrales Rechenzentrum BPM

Telefon: (0228) 920-68239
mobil (0160) 901 33 702
Fax: (0228) 920-63228

Internet: Peter.Keldenich@...

Postbank Systems AG
Baunscheidtstraße 8
53113 Bonn

Sitz Bonn,Amtsgericht Bonn, HRB 8867

Vorstand: Klaar de Graaf, Vorsitzender
Manfred Löw, Dr. Thomas Mangel, Richard Moormann

Aufsichtsrat: Dirk Berensmann, Vorsitzender
______________________________


Diese Nachricht ist nur für den vorgesehenen Empfänger bestimmt. Sollten Sie
nicht der vorgesehene Empfänger dieser E-Mail und ihres Inhalts sein oder diese
E-Mail irrtümlich erhalten haben, bitten wir Sie, den Absender unverzüglich
darüber zu informieren und diese Nachricht und all ihre Anhänge vollständig von
Ihrem Computer zu löschen.
Jede Form der unbefugten Nutzung, Veröffentlichung, des Kopierens oder der
Offenlegung des Inhalts dieser E-Mail ist nicht gestattet.

This message is intended for the addressee only. If you are not the intended
recipient of this e-mail message and its content or have received this e-mail in
error, please notify the sender immediately and delete this message and all its
attachments.
Any form of unauthorized use, publication, copying or disclosure of the content
of this e-mail is prohibited.





Mon Aug 6, 2007 2:23 pm

peterkeldenich
Offline Offline
Send Email Send Email

Forward
Message #587 of 637 |
Expand Messages Author Sort by Date

Hello Ken, what I have till now: Assuming datasets of the type HLQ.TEST%.BACKUP with % = 1,2,3 and the following MBR List in HLQ.TEST1.BACKUP A A1 A1BC A2DE B ...
Peter Keldenich
peterkeldenich
Offline Send Email
Aug 6, 2007
2:29 pm
Advanced

Copyright © 2009 Yahoo! Inc. All rights reserved.
Privacy Policy - Terms of Service - Guidelines - Help