IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

PKZIP 10 files
IBM Mainframe Forums -> All Other Mainframe Topics
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
shankarm

Active User


Joined: 17 May 2010
Posts: 175
Location: India
PostPosted: Thu Nov 18, 2010 4:13 pm
 Reply with quote
I wanted to ZIP 10 files. Do i need to create 10 steps in JCL by using PKZIP utility or do we have any other option to change sysin card alone?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
PostPosted: Thu Nov 18, 2010 4:16 pm
 Reply with quote
What have you tried and what happened.
Have you searched the forum and google ?
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy
PostPosted: Thu Nov 18, 2010 7:07 pm
 Reply with quote
and above all, have You looked at the ZIP manuals ?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
PostPosted: Thu Nov 18, 2010 7:10 pm
 Reply with quote
Yes Enrico, I have,

It took me about 40 minutes to locate, download and read the relevant sections of the manuals, and about another 10 in testing and trying things out, and YES it can be done icon_eek.gif
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy
PostPosted: Thu Nov 18, 2010 7:13 pm
 Reply with quote
Well Expat,
I am sure that You would have done that,
not much about the average forumite icon_biggrin.gif
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
PostPosted: Thu Nov 18, 2010 7:22 pm
 Reply with quote
Enrico

"forumite"

Just love it
icon_lol.gif icon_lol.gif icon_lol.gif
Back to top
View user's profile Send private message
shankarm

Active User


Joined: 17 May 2010
Posts: 175
Location: India
PostPosted: Mon Nov 22, 2010 12:20 pm
 Reply with quote
Hi,

I understand that the question is silly,
I tried giving all the ten input files in ten DD statements and ten files for the output. All the ten input files are zipped into a single output.

Usually we access the manuals from our local repositary itself.
Unfortunately I dont have details about pkzip manual here in my Organization.

Here is what i tried,
Code:

 //ZIP      EXEC PGM=PKZIP                             
//SYSPRINT DD SYSOUT=*                                 
//OUT1     DD DSN=COG.DIVDMONT.DNBIY.ZIP1,             
//            DISP=(,CATLG,DELETE),                   
//            DCB=(BLKSIZE=0,RECFM=FB),               
//            UNIT=SYSDA,SPACE=(CYL,(100,0),RLSE)     
//OUT2     DD DSN=COG.DIVDMONT.DNBIY.ZIP2,             
//            DISP=(,CATLG,DELETE),                   
//            DCB=(BLKSIZE=0,RECFM=FB),               
//            UNIT=SYSDA,SPACE=(CYL,(100,0),RLSE)     
//OUT3     DD DSN=COG.DIVDMONT.DNBIY.ZIP3,             
//            DISP=(,CATLG,DELETE),                   
//            DCB=(BLKSIZE=0,RECFM=FB),               
//            UNIT=SYSDA,SPACE=(CYL,(100,0),RLSE)     
//OUT4     DD DSN=COG.DIVDMONT.DNBIY.ZIP4,             
//            DISP=(,CATLG,DELETE),                   
//            DCB=(BLKSIZE=0,RECFM=FB),               
//            UNIT=SYSDA,SPACE=(CYL,(100,0),RLSE)     
//OUT5     DD DSN=COG.DIVDMONT.DNBIY.ZIP5,             
//            DISP=(,CATLG,DELETE),                   
//            DCB=(BLKSIZE=0,RECFM=FB),               
//            UNIT=SYSDA,SPACE=(CYL,(100,0),RLSE)     
//OUT6     DD DSN=COG.DIVDMONT.DNBIY.ZIP6,             
//            DISP=(,CATLG,DELETE),                   
//            DCB=(BLKSIZE=0,RECFM=FB),               
//            UNIT=SYSDA,SPACE=(CYL,(100,0),RLSE)     
//INPUT1   DD DSN=COG.DIVDMONT.DNBIY.SASDATA1,DISP=SHR
//INPUT2   DD DSN=COG.DIVDMONT.DNBIY.SASDATA2,DISP=SHR
//INPUT3   DD DSN=COG.DIVDMONT.DNBIY.SASDATA3,DISP=SHR
//INPUT4   DD DSN=COG.DIVDMONT.DNBIY.SASDATA4,DISP=SHR
//INPUT5   DD DSN=COG.DIVDMONT.DNBIY.SASDATA5,DISP=SHR
//INPUT6   DD DSN=COG.DIVDMONT.DNBIY.SASDATA6,DISP=SHR
//SYSIN DD DSN=COG.DNBI.SAS(ZIPDATA1),DISP=SHR


ZIPDATA1:
Code:

  -ECHO             
 -TEXT             
 -ARCHOUTDD(OUT1) 
 -INDD(INPUT1)     
 -ARCHOUTDD(OUT2) 
 -INDD(INPUT2)     
 -ARCHOUTDD(OUT3) 
 -INDD(INPUT3)     
 -ARCHOUTDD(OUT4) 
 -INDD(INPUT4)


Am not sure where to find the answer, Please help me learn.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy
PostPosted: Mon Nov 22, 2010 12:31 pm
 Reply with quote
did You care to read and try to understand Expat' s reply icon_confused.gif
Quote:
It took me about 40 minutes to locate, download and read the relevant sections of the manuals, and about another 10 in testing and trying things out, and YES it can be done
looks like not icon_evil.gif


what about showing a bit of ingenuity and google for example for PKZIP MANUALS
in order to find ( guess what ? )
www.pkware.com/documents/manuals/PKMU-V5R5000.pdf
or lots of other pkzip related stuff at
www.pkware.com
www.pkware.com/support/zos

note that the current manuals are available for download to all licensed customers
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> All Other Mainframe Topics

 

Similar Topics
Topic Forum Replies
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts Merge two VSAM KSDS files into third ... JCL & VSAM 6
No new posts Joinkeys - 5 output files DFSORT/ICETOOL 7
No new posts How to append a PS file into multiple... JCL & VSAM 3
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us