Includes (JOBI)

Verwenden Sie Include-Objekte, um Codeblöcke zu speichern, die Sie häufig benötigen und die Sie in mehreren Scripts wiederverwenden möchten. Include-Objekte helfen Ihnen dabei, sicherzustellen, dass Ihre Scripts konsistent sind. Sie reduzieren Ihren Entwurfs- und Wartungsaufwand. Sie können diese Codeblöcke wiederverwenden, indem Sie in den Scripts ausführbarer Objekte :INCLUDE oder :INC eingeben und ein Include-Objekt auswählen. Damit wird das Include-Objekt in das Script eingefügt. Weitere Informationen zur Verwendung von Include-Objekten im Script-Editor finden Sie unter Include-Objekte in Scripts verwenden.

Tipps:

Schränken Sie die Berechtigung zum Bearbeiten von Include-Objekten ein, wenn diese Objekte in unterschiedlichen Aufgaben von unterschiedlichen Benutzern verwendet werden
Ein Beispiel für die Wiederverwendung von Codezeilen finden Sie unter Script-Komponenten wiederverwenden

Objektklasse: Passives Objekt

Objekttyp/Kurzname: JOBI

Diese Seite beinhaltet Folgendes:

Include-Objekte definieren

Eine Include-Objektdefinition besteht aus den folgenden Seiten:

Standardseiten, die unabhängig von dem von Ihnen definierten Objekttyp zu jeder Zeit verfügbar sind:

Die Prozess-Seiten

Das Script, das Sie auf der Seite "Prozess" schreiben, sind die Script-Zeilen, die Sie wiederverwenden können, indem Sie sie in andere Objekte einfügen.

Wichtig!

Variablen in Include-Objekten

Wenn das Include-Objekt Variablen enthält, müssen die Variablen in dem Objekt, in das das Include eingefügt wird, definiert und initialisiert werden. Andernfalls können Sie die Variable nicht vom Include an das Objekt übergeben.
Script-Funktionen im Include-Objekt

Script-Funktionen im Include-Objekt beziehen sich auf das Objekt, in das Sie es eingefügt haben
Include-Objekte verschachteln

Sie können so viele Includes in Includes verschachteln, wie Sie benötigen
JCL in Include-Objekten

Sie können Job Control Language (JCL)-Zeilen verwenden, wenn das Include-Objekt in einen Job eingefügt wird. Weitere Informationen finden Sie unter Include-Objekte in Headern und Trailern.

Konfigurieren von Include-Objekten für externe Interpreter-Aufrufe

Mandant 0 beinhaltet zwei Objekte, die Sie in Ihren Scripts verwenden können, um externe Interpreter und deren Scripts zu definieren:

REGISTER_VARIABLE.WINDOWS
REGISTER_VARIABLE.UNIX

Rufen Sie diese Objekte mithilfe der Anweisung _REGISTER_VARIABLE auf. Diese Anweisung muss mit den Anweisungen :BEGIN_EXT_INTERPRETERS und :END_EXT_INTERPRETERS auf der Prozessseite des Jobs kombiniert werden. Beide Anweisungen sind unter Windows und UNIX verfügbar.

Wichtig! Kontaktieren Sie Ihren Administrator, um diese beiden Objekte zu konfigurieren, da ihre Einstellungen systemweit verfügbar sind.

Beispiele

Default-Script (Windows)

Das Include-Objekt REGISTER_VARIABLE.WINDOWS enthält das folgende Standard-Script:

:set &uc_register_varname = sys_last_registered_varname()
:set &uc_register_valuename = sys_last_registered_valuename()
:set &uc_register_otype# = sys_act_me_type()
:if &uc_register_otype# = 'JOBS'
: set &uc_windows_typ = get_att(win_typ)
: IF &UC_WINDOWS_TYP = "BAT"

&UC_JOBMD JNR=&UC_REALNR MNR=&UC_MANDANT PNR=&UC_IP_PORT IPA=&UC_IP_ADR TYP=V VTYPE=T NAME=&uc_register_varname VALUE=&uc_register_valuename
: ENDIF
!:DATA @set retcodemsg=%errorlevel%
!:DATA @set retcode=0
!:DATA @if NOT %retcodemsg% == 0 GOTO :MSGABORT
: ENDIF
:endif

Perl als externer Interpreter unter Windows

Wenn Sie Perl als externen Interpreter unter Windows verwenden möchten, geben Sie folgendes Script im Standard-Script für Windows (siehe Beispiel oben) zwischen den Anweisungen :IF und :ENDIF ein und definieren Sie die Variable &UC_WINDOWS_TYP:

: IF &$EXT_INTERPRETER# = 'PERL'
: SET &UC_PATH_JOBMD# = STR_SUB("&UC_JOBMD", "\", "\\")
system("&UC_PATH_JOBMD# JNR=&UC_REALNR MNR=&UC_MANDANT PNR=&UC_IP_PORT IPA=&UC_IP_ADR TYP=V VTYPE=T NAME=&uc_register_varname
VALUE=&uc_register_valuename");
: ELSE

Standard-Scripts für UNIX

Das Include-Objekt REGISTER_VARIABLE.UNIX enthält das folgende Standard-Script:

:set &uc_register_varname = sys_last_registered_varname()
:set &uc_register_valuename = sys_last_registered_valuename()
:set &uc_register_otype# = sys_act_me_type()
:if &uc_register_otype# = 'JOBS'
&UC_JOBMD JNR=&UC_REALNR MNR=&UC_MANDANT PNR=&UC_IP_PORT IPA=&UC_IP_ADDR TYP=V VTYPE=T NAME=&uc_register_varname VALUE=&uc_register_valuename
:endif

Siehe auch: