> Tech > Une nouveauté sur l’affichage WRKACTJOB

Une nouveauté sur l’affichage WRKACTJOB

Tech - Par Stacy Benfield - Publié le 24 juin 2010
email

En V5R4, vous observerez quelque chose de différent sur l’affichage WRKACTJOB (Work with Active Jobs). Sur la vue initiale, il y aura désormais une colonne Current User appelée à remplacer la colonne User.

Quel en est l’intérêt et pourquoi ce changement ? Rappelons que la colonne User contient l’information sur le profil utilisateur sous lequel le job a démarré. C’est la portion utilisateur du nom du job.

Par Julian Monypenny

La commande CPYF (Copy File) sert normalement à copier un fichier entier. Mais elle est aussi très intéressante pour extraire des sous-ensembles de données à des fins de production et de test. En effet, avec CPYF, on peut extraire :
 • un intervalle de numéros d’enregistrements
• un ensemble de valeurs de clés
• un ensemble d’enregistrements
• un ensemble de champs

Le tout peut être combiné à volonté. Les quelques exemples suivants vous aideront à démarrer. Pour plus d’informations, lisez le texte d’aide de la commande CPYF. Tous les exemples utilisent un fichier Item Class (ITMCLS) indexé sur Class Number (CLSNUM) et Subclass Number (SUBCLSNUM). CLSNUM et SUBCLSNUM sont tous deux de type numérique zoné à trois chiffres.

Pour extraire les numéros d’enregistrements de 1 à 10, utilisez les paramètres FROMCD et TORCD :

CPYF FROMFILE(ITMCLS) TOFILE(ITMCLS@)
MBROPT(*REPLACE)
FROMCD(1) TORCD(10)

Pour extraire l’ensemble de valeurs clés pour CLSNUM 10 et SUBCLSNUM 120, utilisez les paramètres FROMKEY et TOKEY :

CPYF FROMFILE(ITMCLS) TOFILE(ITMCLS@)
MBROPT(*REPLACE)
FROMKEY(2 (‘010120’))
TOKEY(2 (‘010120’))

La première valeur des paramètres KEY définit le nombre de champs clés (key). La seconde est une chaîne de caractères qui définit la valeur de la clé ; pour le numérique packé et autres types de champs spéciaux, il faut spécifier un littéral hexadécimal.

Les paramètres KEY vous permettent aussi de construire des valeurs de clés à partir de chaînes séparées pour chaque champ clé :

CPYF FROMFILE(ITMCLS) TOFILE(ITMCLS@)
MBROPT(*REPLACE)
FROMKEY(*BLDKEY (‘010’ ‘120’))
TOKEY(*BLDKEY (‘010’ ‘120’))

Pour extraire un ensemble d’enregistrements incluant la chaîne de caractères ‘010’ en position 1 de l’enregistrement, utilisez le paramètre INCCHAR :

CPYF FROMFILE(ITMCLS) TOFILE(ITMCLS@)
MBROPT(*REPLACE)
INCCHAR(*RCD 1 *EQ ‘010’)

Pour extraire l’ensemble d’enregistrements qui inclut la relation champ de CLSNUM égal à 10, utilisez le paramètre INCREL :

 CPYF FROMFILE(ITMCLS) TOFILE(ITMCLS@)
MBROPT(*REPLACE)
INCREL((*IF CLSNUM *EQ 10))

Vous pouvez définir des relations complexes avec INCREL:

CPYF FROMFILE(ITMCLS) TOFILE(ITMCLS@)
MBROPT(*REPLACE)
INCREL((*IF CLSNUM *EQ 10)
                (*AND SUBCLSNUM *EQ 120)
                (*OR CLSNUM *EQ 20)
                (*AND SUBCLSNUM *EQ 240))

Téléchargez gratuitement cette ressource

Comment cerner la maturité digitale de votre entreprise ?

Comment cerner la maturité digitale de votre entreprise ?

Conçu pour les directions IT et Métiers, ce guide vous permettra d'évaluer précisément vos processus de communication client, d'identifier vos lacunes et points d'inflexion pour établir un plan d’actions capable de soutenir durablement votre évolution. Bénéficiez maintenant d'une feuille de route complète.

Tech - Par Stacy Benfield - Publié le 24 juin 2010