More Emailing huge text file as a ZIP file



JES, JES2, JCL utilities, IDCAMS, Compile & Run JCLs, PROCs etc...

More Emailing huge text file as a ZIP file

Postby surya4ug » Tue Apr 27, 2010 12:54 am

hello,

I tried the following ZIPping code which sends a PKZIP attachment, but when i try to open it, i receive an error that says " The open archieve command failed". Any clue about fixing this problem?

thanks in advance

Surya
surya4ug
 
Posts: 11
Joined: Mon Mar 29, 2010 3:47 am
Has thanked: 0 time
Been thanked: 0 time

Re: Emailing huge text file as a ZIP file

Postby surya4ug » Tue Apr 27, 2010 12:54 am

//STEP020 EXEC PGM=PKZIP
//STEPLIB DD DSN=TECHPRD.PKZIP.LOADLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//INFL1 DD DSN=TVDT.N2.VROL.RUA5AV00,DISP=SHR
//INFL2 DD DSN=TVDT.N2.VROL.BUA5AV00,DISP=SHR
//OUTFL1 DD DSN=TVDT.N2.VROL.UA5AV00,
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(CYL,(10,20),RLSE),DCB=(RECFM=FB,LRECL=80)
//SYSIN DD *
-ARCHIVE_OUTFILE(OUTFL1)
-ZIPPED_DSN(TVDT.N2.VROL.RUA5AV00,RUA5AV00)
-ZIPPED_DSN(TVDT.N2.VROL.BUA5AV00,BUA5AV00)
-INFILE(INFL1)
-INFILE(INFL2)
surya4ug
 
Posts: 11
Joined: Mon Mar 29, 2010 3:47 am
Has thanked: 0 time
Been thanked: 0 time

Re: Emailing huge text file as a ZIP file

Postby dick scherrer » Tue Apr 27, 2010 12:56 am

Hello,

You need to post the informational output from the zip execution. Do not choose what to post. Just copy/paste the generated output fro pkzip.

Where did you try to open the file?
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: Emailing huge text file as a ZIP file

Postby surya4ug » Tue Apr 27, 2010 12:58 am

hello,

I tried the following ZIPping code which sends a PKZIP attachment, but when i try to open it, i receive an error that says " The open archieve command failed". Any clue about fixing this problem? i think i posted this question as a reply to another one by mistake..
//STEP020 EXEC PGM=PKZIP
//STEPLIB DD DSN=TECHPRD.PKZIP.LOADLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//INFL1 DD DSN=TVDT.N2.VROL.RUA5AV00,DISP=SHR
//INFL2 DD DSN=TVDT.N2.VROL.BUA5AV00,DISP=SHR
//OUTFL1 DD DSN=TVDT.N2.VROL.UA5AV00,
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(CYL,(10,20),RLSE),DCB=(RECFM=FB,LRECL=80)
//SYSIN DD *
-ARCHIVE_OUTFILE(OUTFL1)
-ZIPPED_DSN(TVDT.N2.VROL.RUA5AV00,RUA5AV00)
-ZIPPED_DSN(TVDT.N2.VROL.BUA5AV00,BUA5AV00)
-INFILE(INFL1)
-INFILE(INFL2)



thanks in advance

Surya
surya4ug
 
Posts: 11
Joined: Mon Mar 29, 2010 3:47 am
Has thanked: 0 time
Been thanked: 0 time

Re: Emailing huge text file as a ZIP file

Postby surya4ug » Tue Apr 27, 2010 1:05 am

Hello,

I emailed the zip folder to myself....opened it from the outlook as an attachment. also saved it on my desktop and opened with PKZIP ver 8, and ended up with the same error...
surya4ug
 
Posts: 11
Joined: Mon Mar 29, 2010 3:47 am
Has thanked: 0 time
Been thanked: 0 time

Re: Emailing huge text file as a ZIP file

Postby surya4ug » Tue Apr 27, 2010 1:08 am

Here are the information statements resultant from the zipping code.



ZPAM000I VOLUME INFO LIST FULL, ADDITIONAL VOLUME INFO ENTRIES DISCARDED.     
ZPAM030I OUTPUT Archive opened:  TVDT.N2.VROL.UA5AV00                     
ZPAM000I VOLUME INFO LIST FULL, ADDITIONAL VOLUME INFO ENTRIES DISCARDED.     
ZPAM253I ADDED     File TVDT.N2.VROL.RUA5AV00                               
ZPAM254I   as FIL2                                                           
ZPAM255I   (DEFLATED 94%/94%)  DATA SIZE 11,328,000; ZIP SIZE 640,444         
ZPAM253I ADDED     File TVDT.N2.VROL.BUA5AV00                                 
ZPAM254I   as FIL1                                                           
ZPAM255I   (DEFLATED 93%/93%)  DATA SIZE 17,525,000; ZIP SIZE 1,299,633       
ZPAM140I FILES:       ADDED  EXCLUDED  BYPASSED  IN ERROR    COPIED           
ZPAM140I                  2         0         0         0         0   



and here is the emailing code. I used SAS here so that multiple attachments could be sent.

//STEP03 EXEC SASMSTR,REGION=32K,WORK='2000,1000'                       
//FT11F001 DD  SYSOUT=*                 SAS LOG                         
//FT12F001 DD  SYSOUT=*                 SAS PRINT                       
//FT13F001 DD  SYSOUT=*                 SAS PUNCH                       
//REPORT1 DD DSN=USERID.MYFILE1.CSV,DISP=SHR                   
//REPORT2 DD DSN=USERID.MYFILE2.CSV,DISP=SHR                   
//SYSIN DD *                                                           
  %LET MAILFILE1 = %SYSFUNC(PATHNAME(REPORT1));                         
  %LET MAILFILE2 = %SYSFUNC(PATHNAME(REPORT2));                         
  DATA _NULL_;                                                         
  CALL SYMPUT("FDATE",LEFT(PUT("&SYSDATE"D-1,WORDDATE.)));             
  FILENAME LNOTE EMAIL                                                 
       from=("username@domain.com")               
       to=("username@domain.com")                 
  SUBJECT ="EWR REPORT - &SYSDATE"                                     
  ATTACH =                                                             
  ("&MAILFILE1" EXTENSION='CSV' TYPE='TEXT/CSV' NAME="REPORT1"         
   "&MAILFILE2" EXTENSION='CSV' TYPE='TEXT/CSV' NAME="REPORT2");       
  DATA _NULL_;                                                         
  FILE LNOTE ;
surya4ug
 
Posts: 11
Joined: Mon Mar 29, 2010 3:47 am
Has thanked: 0 time
Been thanked: 0 time

Re: Emailing huge text file as a ZIP file

Postby dick scherrer » Tue Apr 27, 2010 1:40 am

Hello,

I emailed the zip folder to myself....
How did you do this? Did you specify BINARY (rather than something else) for the transfer?

Suggest you unzip the fle on the mainframe to make sure it is built correctly. Make sure that the original files are not destroyed - you might want them . . .
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

More Emailing huge text file as a ZIP file X

Postby surya4ug » Tue Apr 27, 2010 1:49 am

sure...while i try to do that...... please let me know where the BINARY is specified. I've posted the code that i used in the posts above, not sure what you were referring to........when i said the zip folder was emailed to myself, i meant i've used the SAS code mentioned above and just inputted my email address.

please let me know if i misinterpretted ur msg....
surya4ug
 
Posts: 11
Joined: Mon Mar 29, 2010 3:47 am
Has thanked: 0 time
Been thanked: 0 time

Re: Emailing huge text file as a ZIP file

Postby dick scherrer » Tue Apr 27, 2010 1:54 am

Hello,

CONTENT-TYPE: TEXT/PLAIN;
I don't do SAS, but i believe this will cause the problem. Your file is no longer a plain text file - it is now a binary file.

please let me know if i misinterpretted ur msg....
I believe we are "in sync" :)
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: More Emailing huge text file as a ZIP file

Postby surya4ug » Tue Apr 27, 2010 2:54 am

Hmm..got it...

But i dont have any sample code that sends mutiple attachments to users using IEBGENER...in zipped format...

can you guide me or point me to some document that'll help me know the specifics of the code to work on it ?

thanks!
surya4ug
 
Posts: 11
Joined: Mon Mar 29, 2010 3:47 am
Has thanked: 0 time
Been thanked: 0 time

Next

Return to JCL

 


  • Related topics
    Replies
    Views
    Last post