AE et BS2000

Cette rubrique donne un aperçu sur la manière d'utiliser BS2000 dans votre système AE. Elle décrit la manière de télécharger, transporter et extraire des fichiers BS2000 vers votre système. L'agent BS2000, qui prend en charge toutes les fonctions de transfert de fichiers, vous permet de définir des attributs spécifiques et d'utiliser des appels de fonction à distance. Des exemples vous montrent comment exécuter des commandes BS2000 via des objets Script.

Cette rubrique contient les sujets suivants :

Programme BS2-TAR et archive de texte BS2000 (fichier TAR)

Le lien https://downloads.automic.com/ permet de télécharger les fichiers de l'agent BS2000 et de l'application CallAPI BS2000 au format archive de texte BS2000 (fichier TAR). Cette archive de texte regroupe les fichiers BS2000 susceptibles d'inclure divers types de fichiers, tels que SAM, ISAM, PAM et PLAM. Vous pouvez utiliser cette archive de texte pour transporter les fichiers BS2000 fournis vers votre système. Le programme BS2-TAR permet ensuite de les extraire.

Téléchargez et extrayez le programme BS2-TAR

BS2-TAR est accessible dans IMAGE:TOOLS\BS2_TAR. Ce programme extrait l'archive de texte vers votre propre ID utilisateur et est requis pour tous les transferts de fichiers effectués avec des archives de texte.

Deux options sont disponibles pour utiliser BS2-TAR :

BS2-TAR.BIN

Ce fichier contient le programme BS2-TAR. Ce programme a été transféré vers le dossier d'image via FTP en mode binaire et vous pouvez le retransférer vers BS2000 via FTP de la manière suivante :

FTP

OPENBS2000 computer

user id (TSOS)

password

account

BIN

PUT BS2-TAR.BIN

BYE

Dans BS2000 :

/CAT BS2-TAR.BIN,BS2-TAR,STATE=U,SHARE=YES,ACCESS=READ

BS2-TAR.TAR

Ce fichier contient la dernière version du programme BS2 TAR au format TAR. Pour l'utiliser, BS2-TAR doit être déjà installé sur l'ordinateur BS2000.

Le fichier est transféré vers BS2000 en mode texte via n'importe quel transfert de fichier, puis décompressé avec BS2-TAR de la manière suivante :

/FILE BS2-TAR.TAR,LINK=TAR
/EXEC BS2-TAR

Utiliser le programme BS2-TAR

Les fichiers TAR fournis dont le nom contient NK4 correspondent aux pubsets NK4. Un fichier TAR peut être extrait avec les commandes suivantes :

/FILEfrom file, LINK=TAR
/EXEC BS2-TAR

Agent BS2000 - Support du transfert de fichier

L'agent BS2000 prend en charge toutes les fonctions de transfert de fichier comme le transfert de fichiers textes et binaires ou le transfert de fichier avec des caractères génériques.

Attributs du fichier pour la destination du transfert de fichier

Lors de la définition d'un objet transfert de fichier, il est possible de spécifier des attributs de fichier pour la destination, dans la page Transfert de fichier. Vous pouvez utiliser tous les attributs de fichier qui correspondent à la commande de fichier. Saisissez-les dans le champ Attributs fichier de la section Paramètres destination. Si vous spécifiez plusieurs attributs de fichiers, vous devez les séparer par des virgules. Les attributs suivants sont utilisés par défaut :

Mode texte

FCB=SAM,LINK=UCEXSAM,SPACE=(300,300)

Mode binaire

SPACE=(300,300),BLKSIZE=STD,BLKCTRL=NO,FCB=PAM

Les attributs spécifiés remplacent les valeurs par défaut ou sont ajoutés à la commande ci-dessus.

Important ! Vous pouvez utiliser un transfert de fichiers pour créer des fichiers ISAM.

Exemple :

FCB=ISAM,BLKCTRL=DATA,RECFORM=V,KEYPOS=5,KEYLEN=8

Éléments de bibliothèque en tant que source et cible

Les éléments des bibliothèques LMS (PLAM) peuvent être la source et la cible d'un transfert de fichier.

Les éléments de bibliothèque peuvent être transférés entre deux bibliothèques LMS.
Un élément de bibliothèque peut être transféré en tant que fichier vers n'importe quel système cible.
Les fichiers texte de n'importe quel système de destination peuvent être transférés vers une bibliothèque LMS.

Utilisez le format suivant pour spécifier l'élément :

*LIB(bibliothèque,élément(version),type)

La version de l'élément est optionnelle. Si vous ne définissez pas de version, le fichier source lit la version la plus récente ou le fichier cible écrit la version @.

Exemples :

*LIB($RS.LMS.LIB,MY.ELEMENT,S)

*LIB($RS.LMS.LIB,MY.*,S)

Conserver les attributs d'origine

Pour reprendre les attributs des fichiers source pour les fichiers cibles, utilisez l'option Conserver les attributs d'origine du fichier dans les paramètres de destination de la page Transfert de fichier. De plus, la source doit correspondre à la plateforme cible.

Important ! Si vous utilisez ce paramètre, vous ne devez inclure aucun attribut supplémentaire pour le fichier de destination car cela provoquerait une erreur.

Les attributs de fichier suivants peuvent être conservés dans les transferts de fichiers BS2000 :

Attributs du catalogue de macro
- ACCESS
- ACLPROT
- BASACL
- BACKUP
- CCS
- DESTROY
- EXDATE
- GROUPAR
- GUARDS
- LARGE
- OTHERAR
- OWNERAR
- RETPD
- SHARE
Attributs du fichier de macro
- BLKCTRL
- BLKSIZE
- DUPEKY
- FCBTYPE
- KEYLEN
- KEYPOS
- RECFORM
- RECSIZE
- RETPD
- SPACE

Limitations lors du transfert de fichiers PAM

Important !

Lorsque l'agent BS2000 envoie le fichier : Toutes les pages sont lues si le fichier PAM est disponible au format Non-Key (NK) sans marque de fin.
Lorsque l'agent BS2000 reçoit le fichier : Lors de l'écriture d'un fichier PAM, une marque de fin (un bloc logique supplémentaire) est attachée. Ce bloc peut détruire certaines structures de fichier.

Programme de service pour tâches RFC (Remote Function Call)

Les fichiers fournis pour l'agent BS2000 contiennent le programme de service UCYBRFC? pour les tâches RFC.

Le fichier INI de l'agent contient la section [RFC] avec le paramètre LOGON. Vous pouvez y définir le paramètre 1 afin que l'ID utilisateur soit pris en compte dans le transfert de fichier. Dans ce cas, l'agent génère un job batch pour cet ID utilisateur. Ce job batch appelle le programme de service UCYBRFC? qui se connecte à TCP/IP via le port défini dans la section [RFC] avec le paramètre PORT. Cette connexion permet à l'agent de vérifier les droits d'accès de l'utilisateur spécifié sur le fichier en question.

La création de ce job batch cause une perte de performance pour l'agent. Les tâches RFC sont donc laissées disponibles pour d'autres transferts de fichiers. La tâche RFC se termine automatiquement au bout d'un certain temps (paramètre TIMEOUT=) s'il ne reçoit plus de requêtes. Lorsque l'agent s'arrête, toutes les tâches RFC correspondantes également.

Important ! Le fichier UCYBRFC? doit être partageable lorsque le mécanisme RFC est activé.

Exemple de commandes BS2000

Commande SE BS2000

Créer, former et traiter une séquence de données est un processus complexe exigeant une étroite coopération entre les fonctions et instructions de scripts, et certains objets. L'exemple ci-dessous illustre une commande SE BS2000 exécutée à partir d'un objet Script. Le résultat est écrit dans le rapport d'activation, ligne par ligne.

Lancez l'objet Script SC.PROCESS.BS2000CMD avec le script suivant :

:SET &HND# = PREP_PROCESS ('C70', 'BS2000CMD',,'CMD=/STA P','UC_LOGIN=Admin')

:PROCESS &HND#

: SET &LINE# = GET_PROCESS_LINE (&HND#)

: PRINT &LINE#

: ENDPROCESS

Ce script appelle la fonction PREP_PROCESS qui prépare le traitement de la séquence de données. Les paramètres affectés sont les suivants :

Host
Nom de l'agent où un job Événement est exécuté, dans ce cas : C70.
EventJob
Job à exécuter, dans ce cas EVENT.BS2000CMD.
La spécification de BS2000CMD implique le démarrage du job EVENT.BS2000CMD.
Remarque : Par défaut, le client 0000 inclut les jobs Événement suivants dans le dossier PREP_PROCESS de la perspective Conception des processus : EVENT.BS2000CMD, EVENT.BS2000UCON, EVENT.UNIXCMD, EVENT.UNIXFS et EVENT.WINCMD. Vous pouvez les utiliser tels quels ou les adapter à vos propres jobs Événement.
Filter
Ce paramètre n'est pas utilisé. C'est donc la valeur par défaut "*" qui est utilisée et toutes les lignes de sortie de la commande de console sont prises en compte.
Action
La valeur /STA P est affectée à la variable de script &CMD du job Événement.
UC_LOGIN=
Le job Événement exécute cette commande en utilisant l'objet Login ADMIN.

Le job EVENT.BS2000CMD démarre.

Important ! Dans cette page Attributs du job, cochez la case Afficher dialogue d'attributs dans la section Paramètres d'exécution. Cette action garantit la lecture de l'objet Include ATTRDIA.BS2000. Tous les attributs listés dans le script de l'objet Include ATTRDIA.BS2000 peuvent alors obtenir des valeurs. La boîte de dialogue Attribut ne s'affiche pas, car le contenu des variables est transmis en interne.

Le job EVENT.BS2000CMD peut alors se connecter pour exécuter la commande de la console.
- La commande planifiée /STA P est enregistrée dans la variable de script &CMD.
- SYSOUT est redirigé vers un fichier de sortie et la commande est exécutée.

Le fichier de sortie est transféré vers Automation Engine, puis est disponible sous forme de séquence de données. L'exécution du job EVENT.BS2000CMD est terminée.

Dans l'objet Script SC.PROCESS.BS2000CMD, la fonction de script PREP_PROCESS renvoie alors une valeur. Elle fait référence aux données d'administration de la séquence de données à traiter.

Cette valeur est transmise à l'instruction de script :PROCESS sous forme de paramètre de démarrage. :PROCESS et :ENDPROCESS forment une boucle de traitement qui s'exécute jusqu'à la fin de la séquence de données. À chaque itération, une nouvelle ligne de cette séquence de données est lue dans la mémoire. Grâce à la valeur actuelle, la fonction de script GET_PROCESS_LINE peut récupérer le contenu de la ligne de la séquence de données.

Le script écrit la ligne de console actuelle dans le rapport d'activation.

Commande de console BS2000

Créer, former et traiter une séquence de données est un processus complexe exigeant une étroite coopération entre les fonctions et instructions de scripts, et certains objets. L'exemple ci-dessous illustre une commande de console BS2000 exécutée à partir d'un objet Script. Le résultat est écrit dans le rapport d'activation, ligne par ligne.

Important : Pour exécuter une commande de console BS2000, il faut que l'utilitaire UCYEBXXZ soit installé sur l'hôte. Voir Installer l'agent pour BS2000.

Lancez l'objet Script SC.PROCESS.BS2000UCON avec le script suivant :

:SET &HND# = PREP_PROCESS ('C70', 'BS2000UCON',,'CMD=BCDSIP DISP=O')