Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.
Comment: Macro name changed from html to html-bobswift during server to cloud migration processing.

...

Raising an SAP Event for z/OS JCL

Panel
Html bobswift
<pre>
//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

Html bobswift
 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

Html bobswift
 src=sol9 dest=SAP001 xfile=xuser1

attrib

Html bobswift
 dest createop=replace

cd

Html bobswift
 src=/opt/app/data

cd

Html bobswift
 dest=/input

#*****************************************************************\*
#* Copy the car data to SAP system for batch input processing.
#*****************************************************************\*

copy

Html bobswift
 src=cars.dat dest=cars.dat

# Raise SAP event to trigger processing job.

execsap

Html bobswift
 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

Html bobswift
 src=trucks.dat dest=trucks.dat

# Raise SAP event to trigger processing job.

execsap

Html bobswift
 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

Html bobswift
 src=boats.dat dest=boats.dat

# Raise SAP event to trigger processing job.

execsap

Html bobswift
 CF5 client=800 xfile=xsapuser1 type=event -
        eventid=UDM_TRANSFER_COMPLETE parm="boats.dat"

close

Html bobswift
 
/*
</pre>

Anchor
1036008
1036008
Components

...