Objets Include (JOBI)
Les objets Include stockent des blocs de scripts. Si vous êtes développeur et concepteur d'objets, vous pouvez les utiliser pour conserver ceux dont vous avez fréquemment besoin. Vous pouvez ensuite les réutiliser dans l'éditeur de script des objets exécutables, en appelant l'objet Include avec l'instruction :INCLUDE. Les objets Include vous permettent de garantir la cohérence de vos scripts, tout en allégeant votre travail de conception et de maintenance.
Conseil : Vous devrez peut-être restreindre l'accès en écriture aux objets Include s'ils sont utilisés dans différentes tâches par différentes personnes.
Classe de l'objet : Objet passif
Type d'objet / nom court : JOBI
Cette rubrique contient les sujets suivants :
La définition d'un objet Include se compose des pages suivantes :
- Pages standard toujours accessibles, quel que soit le type d'objet à définir :
- La Pages Traitement
Le script que vous écrivez dans la page Traitement est le bloc de lignes de script que vous pouvez réutiliser en l'insérant dans d'autres objets.
Pour plus d'informations :
-
Variables dans des objets Include
Si votre objet Include contient des variables, assurez-vous que ces variables sont également définies et initialisées dans l'objet appelant. Sinon, vous ne pourrez pas transmettre la variable de l'objet Include à l'objet appelant. -
Fonctions de script dans des objets Include
Les fonctions de script contenues dans le script Include se réfèrent à l'objet dans lequel vous avez appelé l'objet Include. Par exemple, la fonction de script SYS_ACT_ME_NAME indique le nom de l'objet dans lequel l'objet Include a été inséré et non le nom de l'objet Include lui-même. -
Imbriquer des objets Include
Vous pouvez imbriquer jusqu'à cinq niveaux d'objets Include. -
JCL dans des objets Include
Vous pouvez inclure des lignes JCL (Job Control Language) si l'objet Include est appelé dans un objet Job. Pour plus d'informations, voir Utiliser des objets Include dans des objets Job.
Insérer des objets Include dans des scripts
Appelez l'objet Include depuis un script que vous écrivez dans les pages Traitement de l'objet où vous souhaitez insérer le script inclus. Pour plus d'informations sur l'appel d'objets Include et le mode d'insertion et de résolution des scripts, voir :INCLUDE.
Le script de l'objet Include est inséré dans le script de l'objet appelant dès que l'objet appelant est activé. Voir Réutiliser des composants de script pour un simple exemple.
Configurer des objets Include pour des appels d'interpréteurs externes
Le client système 0000 intègre deux objets que vous pouvez utiliser dans vos scripts pour définir des interpréteurs externes et leurs scripts :
REGISTER_VARIABLE.WINDOWS
REGISTER_VARIABLE.UNIX
Vous pouvez appeler ces objets avec l'instruction :REGISTER_VARIABLE
. Cette instruction doit être combinée avec les instructions :BEGIN_EXT_INTERPRETERS
et :END_EXT_INTERPRETERS
de la page Traitement de l'objet Job (JOBS). Ces deux instructions sont disponibles sous Windows et Unix.
Important ! Contactez votre administrateur pour configurer ces deux objets dont les paramètres sont accessibles dans tout le système.
Script par défaut (Windows)
L'objet Include REGISTER_VARIABLE.WINDOWS
contient le script par défaut suivant :
: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
Script Perl en tant qu'interpréteur externe sur Windows
Si vous souhaitez utiliser Perl en tant qu'interpréteur externe sous Windows, vous devez saisir le script suivant dans le script Windows par défaut (voir exemple ci-dessus) entre les instructions :IF
et :ENDIF
définissant la 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
Script par défaut sous UNIX
L'objet Include REGISTER_VARIABLE.UNIX
contient le script par défaut suivant :
: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
Voir aussi :
- :BEGIN_EXT_INTERPRETERS... :END_EXT_INTERPRETERS
- :REGISTER_VARIABLE
- Mode d'utilisation d'un interpréteur externe
- Référence du script Automation Engine