//USPBDC1  JOB CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID                     
//*****************************************************************
//* Description
//* -----------
//* This sample demonstrates the use of USAP's Batch Input 
//* Monitoring. 
//*
//* NOTE: This job requires that variant SBX1 exists for ABAP 
//* program RSBDCSUB.
//*
//* This sample will:
//* 1. Modify variant SBX1 with values required for this 
//*    job run (specifies the batch input session to be processed).
//* 2. Submit a new job to the SAP system. 
//* 3. Start the job.
//* 4. Monitor the submitted job and all session processing jobs 
//*    to completion.
//* 5. Return the job logs.
//* 6. Return the spool list.
//* 7. Prints a brief report indicating the status of all batch 
//*    input sessions processed
//* 
//         JCLLIB ORDER=\#SHLQ.UNV.SUNVSAMP                           
//*
//*****************************************************************
//* Modify variant 'SBX1' for ABAP program RSBDCSUB
//*****************************************************************
//STEP1    EXEC USPPRC                                               
//VARDEF   DD  * 
 /* Variant Header statement. */
 VARIANT\_NAME   = "SBX1"
    REPORT      = "RSBDCSUB";
 /* Session */
 SELNAME        = "MAPPE"
    KIND        = "P"
    SIGN        = ""
    OPTION      = ""
    LOW         = "SBX20100720"
    HIGH        = "";
//SYSIN    DD  *  
   -dest         CF5 
   -client       800 
   -userid       sapuid 
   -pwd          sappwd      
   -modify       VARDEF
/* 
//*****************************************************************
//* Run ABAP program RSBDCSUB to perform Batch Input processing 
//* using the variant that was modified in step 1.
//*
//* NOTE: This job requires that a variant SBX1 exists for ABAP 
//* program RSBDCSUB.
//*
//*****************************************************************
//STEP2    EXEC USPPRC                                               
//JOBDEF   DD  * 
 /* Job Header statement. */
 JOBNAME = "RSBDCSUB";
 /* ABAP Step statement. */
 ABAP_STEP            = "STEP 1"
    ABAP_PROGRAM_NAME = "RSBDCSUB_SBX1"
    VARIANT_NAME      = "SBX1";
//SYSIN    DD  * 
   -dest    CF5 
   -client  800 
   -userid  sapuid 
   -pwd     sappwd      
   -sub     JOBDEF          
   -start
   -bdcwait
/*