...
Panel |
---|
//UDMEXSAP JOB CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID //****************************************************************\* //* Description //* ----------- //* This sample opens a three-party transfer session between hosts //* sol9 and SAP001. Three files are transferred from sol9 to //* SAP001. After each file is transferred, execsap is called to //* raise an SAP event in the specified SAP system. //* //* Presumably, there are jobs in the SAP scheduling system that //* are waiting to be triggered by the events fired from this job. //* // JCLLIB ORDER=#SHLQ.UNV.SUNVSAMP //* //STEP1 EXEC UDMPRC //UNVSCR DD * # # Transfer vehicle data to SAP server for batch input processing. # open src=sol9 dest=SAP001 xfile=xuser1 attrib dest createop=replace cd src=/opt/app/data cd dest=/input #*****************************************************************\* #* Copy the car data to SAP system for batch input processing. #*****************************************************************\* copy src=cars.dat dest=cars.dat # Raise SAP event to trigger processing job. execsap CF5 client=800 xfile=xsapuser1 type=event - eventid=UDM_TRANSFER_COMPLETE parm="cars.dat" #*****************************************************************\* #* Copy the truck data to SAP system for batch input processing. #*****************************************************************\* copy src=trucks.dat dest=trucks.dat # Raise SAP event to trigger processing job. execsap CF5 client=800 xfile=xsapuser1 type=event - eventid=UDM_TRANSFER_COMPLETE parm="trucks.dat" #*****************************************************************\* #* Copy the boat data to SAP system for batch input processing. #*****************************************************************\* copy src=boats.dat dest=boats.dat # Raise SAP event to trigger processing job. execsap CF5 client=800 xfile=xsapuser1 type=event - eventid=UDM_TRANSFER_COMPLETE parm="boats.dat" close /* |
...