Author: abdulrafi
Subject: Splitting of single report to seperate reports using XMITIP
Posted: Mon Mar 27, 2017 3:59 pm (GMT 5.5)
Hi,
I do have the below jcl to split the file based on a key and send it to mail id's. But because of carriage return I am unable to get it.
Key here is 21805 and 21809 which is present at top left of the file. I need to get two separate attachments in my mail one with 21805 data and other with 21809.
Could you please help me how to resolve it.
Control card used:
job log error:
If I give the SEPLOC AS 1/5 only I get output as,
rest of the few lines which corresponds to 21805 are missing.
I am not sure where it went wrong. Is it because I do not have any carriage return in my input file.
_________________
Thanks,
Abdul Rafi
Subject: Splitting of single report to seperate reports using XMITIP
Posted: Mon Mar 27, 2017 3:59 pm (GMT 5.5)
Hi,
I do have the below jcl to split the file based on a key and send it to mail id's. But because of carriage return I am unable to get it.
Key here is 21805 and 21809 which is present at top left of the file. I need to get two separate attachments in my mail one with 21805 data and other with 21809.
Could you please help me how to resolve it.
Code: |
//T040C4TX JOB (P904020,T040,99,99),'EXPORTTS-TEST1', // NOTIFY=&SYSUID,MSGCLASS=Q,TIME=(02,00),REGION=0M //REPSPLIT EXEC XMITIP //INPUT1 DD DSN=NVSTN.PR.IMAGE4.TEST.EDIT1,DISP=SHR //INPUTC DD DSN=NVSTN.XMIT.INVSUMM,DISP=SHR //XMCC DD * FROM b.abdulrafi@gmail.com FORMAT TXT MSGT 'ATTACHED ARE THE INVOICE SUMMARY' SUBJECT 'INVOICE SUMMARY REPORT' /* //SYSTSIN DD * %XMITIPSP DD:INPUT1 DD:INPUTC //***TROL DD DSN=T040BK8.PDS.CNTL2(XMITCC),DISP=SHR //SYSPRINT DD SYSOUT=* |
Code: |
21805 INVOICE SUMMARY DOCUMENTS SENT: 03/21/17 INVOICE MODEL YEAR MODEL TMSORDER FREIGHT UNITS INSURANCE FOB CIF --------------------------------------------------------------------------------------------------------------------------------------------------------- CASH MANAGMENT DATE: _______________DEPOSIT BANK: _______________ AMOUNT: _______________SOURCE OF INFO: _______________ 21805 INVOICE SUMMARY DOCUMENTS SENT: 03/21/17 INVOICE MODEL YEAR MODEL TMSORDER FREIGHT UNITS INSURANCE FOB CIF --------------------------------------------------------------------------------------------------------------------------------------------------------- 21809 INVOICE SUMMARY DOCUMENTS SENT: 03/21/17 INVOICE MODEL YEAR MODEL TMSORDER FREIGHT UNITS INSURANCE FOB CIF CASH MANAGMENT DATE: _______________DEPOSIT BANK: _______________ AMOUNT: _______________SOURCE OF INFO: _______________ 21809 INVOICE SUMMARY DOCUMENTS SENT: 03/21/17 INVOICE MODEL YEAR MODEL TMSORDER FREIGHT UNITS INSURANCE FOB CIF --------------------------------------------------------------------------------------------------------------------------------------------------------- |
Control card used:
Code: |
SEPLOC=1/5/1 KEYV=21805 KEYMAIL=b.abdulrafi@gmail.com MERGEMAIL KEYV=21809 KEYMAIL=b.abdulrafi@gmail.com MERGEMAIL SUBJECT=INV SUMMARY XMITIPCONFIG=DD:XMCC FILENAME=INVOICE_SUMMARY_&SEPVAL.TXT |
job log error:
Code: |
Error: SEPLOC ROW requested with input data lacking carriage control in the DCB RECFM. |
If I give the SEPLOC AS 1/5 only I get output as,
Code: |
21805 INVOICE SUMMARY DOCUMENTS SENT: 03/21/17 INVOICE MODEL YEAR MODEL TMSORDER FREIGHT UNITS INSURANCE FOB CIF --------------------------------------------------------------------------------------------------------------------------------------------------------- |
rest of the few lines which corresponds to 21805 are missing.
I am not sure where it went wrong. Is it because I do not have any carriage return in my input file.
_________________
Thanks,
Abdul Rafi