Anfang des Inhaltsbereichs

Programmbeispiel: Sofort-Start mit JOB_CLOSE  Dokument im Navigationsbaum lokalisieren

*
* Job zur Verarbeitung übergeben: Sofort-Start
*
CALL FUNCTION 'JOB_CLOSE'
EXPORTING
JOBCOUNT = JOBNUMBER " Job-Identifikation: Nummer
JOBNAME = JOBNAME " und Name.
STRTIMMED = 'X' " Plant Job für Sofort-Start
" ein. Der Job wird nur
" sofort gestartet, wenn der
" Benutzer die Berechtigung
" RELE hat, die für die
" Freigabe eines Jobs
" erforderlich ist.
IMPORTING
JOB_WAS_RELEASED = JOB_RELEASED " Wenn der Benutzer eine
" Freigabeberechtigung hat,
" wird der Job bei der Ein-
" planung automatisch frei-
" gegeben. Das Feld ist auf
" 'x' gesetzt, wenn der Job
" freigegeben wurde.
" Andernfalls wird der Job
" zwar eingeplant, muß aber
" von einem Verwalter frei-
" gegeben werden, damit er
" gestartet werden kann.
EXCEPTIONS
* CANT_START_IMMEDIATE Nicht mehr verwendet. Wurde ersetzt
* durch IMPORTING-Parameter
* JOB_WAS_RELEASED.
INVALID_STARTDATE = 01
JOBNAME_MISSING = 02
JOB_CLOSE_FAILED = 03
JOB_NOSTEPS = 04
JOB_NOTEX = 05
LOCK_FAILED = 06
OTHERS = 99.

IF SY-SUBRC > 0.
<Fehlerverarbeitung>
ENDIF.