> Tech > Sortir de l’OS/400

Sortir de l’OS/400

Tech - Par Renaud ROSSET - Publié le 24 juin 2010
email

WSCST traite parfaitement les tables de traduction (d'EBCDIC en ASCII, par exemple). Les commandes PCL commencent toutes par le caractère ESC (Escape). L'OS/400 sait qu'il est inimprimable et le remplace par un blanc par défaut. Pour contourner cette « commodité » incommode, vous devez sélectionner un caractère rarement utilisé -

Sortir de l’OS/400

tilde (~) – et le traduire en valeur
ESC ASCII via une table de traduction
WSCST. Vous pouvez insérer le
code exemple de la figure 3 dans votre
texte WSCST juste après le
tag :EINDFNT pour effectuer cela.

Observons que le caractère ~ est
un A1 hexadécimal en EBCDIC et dans
la table il est traduit en un 1B hexadécimal
; qui est le caractère ESC. Après
avoir ajouté ce code, vous pouvez intégrer
du code PCL dans un programme
RPG ou autre HLL (High Level
Language), ou même dans un fichier
d’impression. Je peux, par exemple,
utiliser les cartes D de la figure 4 pour
définir des constantes PCL dans du
code ILE RPG. Les cartes O de la figure
5 illustrent la sortie des commandes
PCL en RPG. La sortie semble
polluée si on l’affiche sur l’écran, mais
quand elle atteint une imprimante de
type PCL, celle-ci transforme le code
PCL et exécute le texte restant comme
des commandes. Dans cet exemple, j’ai changé les polices et même LPI pour
créer une instruction de facturation de
téléphone cellulaire.

Téléchargez cette ressource

Guide de technologie 5G pour l’entreprise

Guide de technologie 5G pour l’entreprise

Pourquoi la 5G est-elle faite pour votre entreprise ? La 5G peut améliorer la vitesse, la fiabilité et la capacité de votre réseau, permettant ainsi une meilleure collaboration, une productivité accrue et une prise de décision plus rapide. Notre livre blanc " The Big Book of Enterprise 5G" vous fournit les informations stratégiques dont vous avez besoin pour prendre des décisions éclairées et préparer votre entreprise à prospérer dans l'ère de la 5G. Cradlepoint, part of Ericsson est le leader mondial des solutions de réseau sans fil 4G LTE et 5G fournies via le cloud. Connectez vos employés, lieux et objets avec la 4G LTE et la 5G pour un WAN sans fil d'entreprise.

Tech - Par Renaud ROSSET - Publié le 24 juin 2010