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
 

 

Zip different GDGs in a single file using PKZIP

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
nitin_d

New User


Joined: 27 Oct 2005
Posts: 15
Location: Pune

PostPosted: Thu Oct 09, 2008 7:12 pm    Post subject: Zip different GDGs in a single file using PKZIP
Reply with quote

Hi,

I have two different GDGs, ABC.XYZ(0) and ABC.LMN(0). I need to zipp the files in a single. The file names in the zip file should be changed to "REPORT1.TXT" AND "REPORT2.TXT".

When the fully resolved GDG name is provided the pkzip utility works fine. However I am unable to use the relative generation level, it creates a hierarchy as ABC/XYZ/G001V00.txt.

My SYSIN card is as follows

Code:

-BINARY                                       
-DATA_DELIMITER(CRLF)                         
-DATA_TYPE(DETECT)                             
-FILE_TERMINATOR()                             
-ARCHIVE_OUTFILE(ARCHOUT)                     
-COMPRESSION_LEVEL(MAXIMUM)                                         
-ZIPPED_DSN(ABC.XYZ,-
           REPORT1.TXT)         
-ZIPPED_DSN(ABC.LMN,-
           REPORT2.TXT) 
-INFILE(ZIPIN1) ----> ABC.XYZ(0)                               
-ACTION(ADD)                                   
-INFILE(ZIPIN2) --> ABC.LMN(0)
-ACTION(ADD)                                   
-CRLF(Y)                                       
-SAVE_LRECL(N)                                 


Any help would be appreciated.
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8117
Location: East Dubuque, Illinois, USA

PostPosted: Thu Oct 09, 2008 8:14 pm    Post subject:
Reply with quote

Have you checked the PKZIP manual to see what it says about GDG processing?
Back to top
View user's profile Send private message
nitin_d

New User


Joined: 27 Oct 2005
Posts: 15
Location: Pune

PostPosted: Fri Oct 10, 2008 9:47 am    Post subject:
Reply with quote

Yes, I have... According to the Manual, we can specify relative generation level in INFILE command.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Oct 10, 2008 12:00 pm    Post subject:
Reply with quote

Hello,

Between the run that works and the run that does not, what changes are made to either the jcl or the control statements?

Also, please post the informational messages presented for each run.
Back to top
View user's profile Send private message
nitin_d

New User


Joined: 27 Oct 2005
Posts: 15
Location: Pune

PostPosted: Fri Oct 10, 2008 12:34 pm    Post subject:
Reply with quote

When a completely resolved GDG name is specified, the zip file is as expected. When the relational generation level is specified, the datasets are not renamed. The Zip file would have a folder ABC which contains folder XYZ, which in turn contains the file with name as G001V00.

In both cases the job doe not abend and the files are zipped, but as stated above the results are not as expected
Back to top
View user's profile Send private message
nitin_d

New User


Joined: 27 Oct 2005
Posts: 15
Location: Pune

PostPosted: Fri Oct 10, 2008 12:36 pm    Post subject:
Reply with quote

I Have also tried the command -SELECT_NOGDGALL, but with no success
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8117
Location: East Dubuque, Illinois, USA

PostPosted: Fri Oct 10, 2008 4:37 pm    Post subject:
Reply with quote

Sounds like it's time to contact the vendor to find out why the program is behaving in this way. It may be WAD, in which case you can accept the behavior or you can use fully qualified GDG names.
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 -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


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