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

Splitting of single report to seperate reports using XMITIP


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Mon Mar 27, 2017 3:59 pm
Reply with quote

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.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Mon Mar 27, 2017 4:16 pm
Reply with quote

Quote:
with input data lacking carriage control in the DCB RECFM.


xmitip is complaining about the wrong DCB attributes

FBM/FM/FBA/FA

not about the carriage returns
Back to top
View user's profile Send private message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Mon Mar 27, 2017 4:25 pm
Reply with quote

yes I agree to your point. I have given correct DCB parameter though, but is there any way how could I get it resolved. I am trying but unable to accomplish what I am looking for.

Can you please suggest me any parameter has to be changed ?
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Mon Mar 27, 2017 9:24 pm
Reply with quote

Did you create the data with Carriage Control characters?
Back to top
View user's profile Send private message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Tue Mar 28, 2017 12:11 pm
Reply with quote

No I dint. But seeing to the error I thought we need carriage return in the file. Something like paging stuff in the reports. I placed the key towards the right most end and it worked. It splits up correctly.
Back to top
View user's profile Send private message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Mon Apr 03, 2017 3:59 pm
Reply with quote

Hi,

Need one more help. With same inputs and jcls, I have 2 control cards and am executing a XMITIP step to send the reports to users. Currently my XMITIP steps splits the single ESHP file to two seperate reports, one with data containing key vauke 21805 and other containing 21809.
Same applies with INVOICE SUMMARY as well.

I am able to achieve it by sending it in 2 seperate mails. But i need to send the reports in single mail. The challenge I am facing is, the keys are same for both files here. Hence i am unable to merge both.
Note: The layouts of both files are different.

Please let me know if there is a way to send the reports in single mail as attachments.

Below are the two control cards,
Code:

SEPLOC=102/5                                                     
KEYV=21805                                                       
KEYMAIL=abdul.rafi@gmail.com
MERGEMAIL                                                       
KEYV=21809                                                       
KEYMAIL=abdul.rafi@gmail.com
MERGEMAIL                                                       
SUBJECT=FILES &JOB                                   
XMITIPCONFIG=DD:XMCC                                             
FILENAME=ESHP_&SEPVAL.TXT                                       


SEPLOC=129/5                                                         
KEYV=21805                                                           
KEYMAIL=abdul.rafi@gmail.com     
MERGEMAIL                                                           
KEYV=21809                                                           
KEYMAIL=abdul.rafi@gmail.com   
MERGEMAIL                                                           
SUBJECT=INV SUMMARY &JOB                                       
XMITIPCONFIG=DD:XMCC                                                 
FILENAME=INVOICE_SUMMARY_&SEPVAL.TXT       
Back to top
View user's profile Send private message
abdulrafi

Active User


Joined: 14 Sep 2009
Posts: 184
Location: Coimbatore

PostPosted: Tue Apr 04, 2017 2:04 pm
Reply with quote

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

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Tue Apr 04, 2017 2:49 pm
Reply with quote

remember ..

we reply on our own time and free of charge

if nobody replies it means that
nobody has an in depth knowledge of the topic
nobody is interested in answering
Your benevolence factor is low (*)
nobody likes You icon_biggrin.gif

(*) and soliciting for answer will make it drop even more
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 -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts How to append a PS file into multiple... JCL & VSAM 3
No new posts Need help on formatting a report DFSORT/ICETOOL 14
No new posts Submit multiple jobs from a library t... JCL & VSAM 14
No new posts Creating Report using SORT DFSORT/ICETOOL 7
No new posts Convert single row multi cols to sing... DFSORT/ICETOOL 6
Search our Forums:

Back to Top