Use JOBONCSF to find FTP jobs in SubDelay status in ESP Workload Automation

Products

• ESP Workload Automation

Issue/Introduction

How to check the JOBONCSF output for an FTP job in SubDelay status, and force complete the job?

Environment

Component: ESP WORKLOAD AUTOMATION 
Release:   12.0

Resolution

Code an ESP TASK in the same procedure that contains the FTP job:

Note: PNODE field contains "SubDelay".

  APPL appname 
  FTP_JOB jobname1 
    AGENT agentname                           
    FTPFORMAT A                                  
    LOCALFILENAME '<path>\<filename>' 
    REMOTEFILENAME '''<your dsn>''' 
    SERVERADDR #.#.#.#                     
    SERVERPORT ####                             
    TRANSFERDIRECTION U                         
    USER username                                 
   RUN NOW                                     
ENDJOB  

  JOB jobname2 TASK                                       
    RUN NOW                                          
    EARLYSUB NOW PLUS 1 MINUTES                      
    REXXON PROC                                      
      J = JOBONCSF('jobname1','X')                         
     DO I = 1 TO J                                    
       IF XAPPLG.I =  CLANGVAR('%ESPAPGEN') THEN       
        DO                                              
         IF XPNODE.I = 'SubDelay' THEN DO              
           "ESPNOMSG AJ jobname1 COMPLETE APPL(%ESPAPPL..%ESPAPGEN)" 
        END                                                     
    END 
  REXXOFF                                                      
  ENDJOB