Intercepted Jobs

ABAP - Job Management

JAVA

---

Anwendungsreturncode von SAP-Steps auswerten

Ein SAP-Job-Step kann auch einen Anwendungsrückgabewert aufweisen.

Sie können an den folgenden Stellen auf ihn Zugriff nehmen:

Über ein Script-Sprachmittel

R3_GET_APPLICATION_RC kann den Anwendungsrückgabewert eines oder mehrerer Job-Steps prüfen und den AE-Job gegebenenfalls abbrechen.

Über den Steplisten-Report

Dieser spezielle Reporttyp enthält Informationen zu den Steps und damit auch den Anwendungsrückgabewert. Lesen Sie den Wert mit Hilfe der XML-Script-Sprachmittel aus.

Beispiel:

:SET &xmlreport# = XML_OPEN(REPORT,,SSTP) 

! Reading the first element
:SET &job# = XML_GET_FIRST_CHILD(&xmlreport#)
:SET &name# = XML_GET_NODE_NAME(&job#)
:PRINT "First element: &name#"
! Reading the second element
:SET &child# = XML_GET_FIRST_CHILD(&step#)
! Reading the step's children
:WHILE &child# <> ""
:SET &name# = XML_GET_NODE_NAME(&child#)
! Reading the application return code
:IF &name# = "RC"
: SET &applrc# = XML_GET_NODE_TEXT(&child#)
: PRINT "Applicationreturncode: &applrc#"
:ENDIF
:SET &child# = XML_GET_NEXTSIBLING(&child#)
:ENDWHILE

:XML_CLOSE

Über den Jobreport

Informationen zu SAP-Job-Steps werden im Jobreport protokolliert. Dazu gehört auch der Anwendungsrückgabewert, wenn Sie die AE-Schnittstelle verwenden.

Wenn ein Step keinen Anwendungsrückgabewert besitzt wird im Jobreport "Appl-RC n/a" vermerkt.

Mit der Script-Funktion PREP_PROCESS_REPORT können Sie die Anwendungsrückgabewerte auslesen und weiter verarbeiten.

Im folgenden Beispiel wird ein ABAP namens ZZ_TEST_APPL_RC einmal im Job aufgerufen. Sein Anwendungsrückgabewert soll ausgelesen werden.

! Select the line containing ABAP and the application return code.
:SET &HND# = PREP_PROCESS_REPORT(,,REP,"*ZZ_TEST_APPL_RC*Appl-RC*")
:PROCESS &HND#
:   SET &ZEILE# = GET_PROCESS_LINE(&HND#)
!   Find the exact position in a line where the "Appl RC" starts.
:   SET &POS_STR# = STR_FIND(&ZEILE#,"Appl-RC")
!   The application return code is located after 8 characters.
:   SET &POS_ARC# = ADD(&POS_STR#,8)
!   Read the application return code.
:   SET &ARC# = STR_CUT(&ZEILE#,&POS_ARC#)
!   Check if the step really supplies an application return code.
:   IF &ARC# <> "n/a"
!      The read value is a string and must therefore be converted to a number.
:      SET &ARC# = CINT(&ARC#)
!      Beyond this point there are any script statements which further process the application return code.
:      PRINT &ARC#
:   ENDIF
:ENDPROCESS

Beachten Sie, dass der Anwendungsrückgabewert nicht bei der XBP-Schnittstelle verfügbar ist.