Page Comparison

...

Raising an SAP Event for z/OS JCL

//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

 
/*

Anchor
1036008 1036008

Components

...