Discussion :

[aqua14]

Bonjour,

J'ai un soucis sur un etat quand il sort sur son imprimante. Je soupçonne un caractère de générer un saut de page.(testé sur différents modèles d'imprimante)
Quand je fais workoutq je vois mon état, je peux afficher l'état, le visualiser mais de là, je ne peux pas le modifier . J'ai essayé depuis iseries navigator idem, au mieux j'arrive à l'exporter sur un windows , le modifier mais je n'arrive pas à l' importer.
Est ce que c'est possible de modifier directement l'état dans un spooler ? Par un éditeur au même titre qu'on edite les membres d'un fichier ?

Je n'ai pas les sources du programme qui le génère donc avant de contacter le developpeur j'aimerai m'assurer que c'est bien le problème.

Merci

[K2R400]

Créés au préalable un fichier de la largeur de ton état + 1 ex :
CRTPF FILE(QTEMP/monfic) RCDLEN(133)

puis copie ton spool dans le fichier :
CPYSPLF FILE(QSYSPRT) TOFILE(QTEMP/Monfic) CTLCHAR(*FCFC)
faire F4 et mettre le bon Travail/User/N°

Maintenant tu peux modifier ton fichier (monfic) avec DFU ou SQL.
Puis tu regénères le spool en faisant un :
CPYF FROMFILE(QTEMP/MONFIC) TOFILE(*PRINT)

[Mercure]

Bonne idée. Tant que tu y es, modifies directement le chiffre-d'affaires en le multipliant par 10, ça fera plaisir à ton boss

[aqua14]

rebonjour,

quand je lui submit le second job j'ai fin anormale du travail, alors que je lui renseigne bien tous les champs avec la commande F4
QSYSPRT FILE(XGPG3B) TOFILE(QTEMP/Monfic) JOB(468585/DUPOND/EDITPF) CTLCHAR(*FCFC)

mon état d'origine fait 132 j'ai donc mis 133, c'est pourquoi le + 1 ?


Merci de votre aide.

[Green Hornet]

de mémoire c'est pour les attributs (souligné, gras ... etc) mais je peux me tromper

[aqua14]

Je l'ai fait de nouveau ce matin, je faisais une erreur hier parceque c'est bien passé.

Mon fichier se remplit bien.

En revanche nouveau probleme en essayant de le modifier par dfu, j'arrive directement sur :
Saisie de données - Fin

Nombre d'enregistrements traités

Ajoutés . . . . : 0
Modifiés . . . . : 0
Supprimés . . . : 0


Par iseries Navigator, editer, il me l'ouvre, je retrouve bien le contenu du fichier original avec une colonne à gauche avec des (1, 0 et -) par contre il me signale que le fichier est en lecture seule. Et effectivement quand je sauvegarde après ma modification, il me dit qu'il est en cours d'utilisation.

Si vous avez une idée du probleme.

Merci

[aqua14]

ok mon fichier destination n'était pas assez grand, du coup le traitement bloquait sur un message wait, c'est corrigé.
J'ai fait ma modification et je l'ai sauvegardé avec DFU.

J'en suis maintenant à la dernière commande :
CPYF FROMFILE(QTEMP/MONFIC) TOFILE(*PRINT)

J'ai remplacé le nom de ma bibliothèque et mon fichier, je lance ma commande et plus rien...
Je suis surpris de ne pas devoir préciser le nom du fichier destination et le spooler ? Je le retrouve ou mon nouveau fichier ?
La dernière commande est elle complète ?

Merci de votre aide.

[Hédhili Jaïdane]

Bonjour.

Dans les spools.

[aqua14]

dans les spools ???
Mais lequel ? J'ai une centaine d'imprimante déclarés en device et autant d'outq.
J'imagine que c'est le spool par défaut associé à mon profil mais je n'ai rien de précisé dedans
Voilà j'aimerai reprendre ce fichier ou à défaut préciser dans la dernière commande dans quel spooler je l'envoie.

Merci

[jump400]

...//...
mon état d'origine fait 132 j'ai donc mis 133, c'est pourquoi le + 1 ?

Le paramètre CTLCHAR(*FCFC) du CPYSPLF va mettre en premier caractère de chaque enregistrement de ton fichier de destination un code normalisé ANSI indiquant une action de saut avant impression de la ligne. Les valeurs sont :
blanc : Saut de ligne normal
0 : saut de 2 lignes
- : saut de 3 lignes
+ : pas de saut (pour faire de la "sur-impression"
1 : saut à la ligne n° 1 (provoque en général un saut de page)
2 : saut ligne 2
Etc ...
Ainsi le fichier de sortie ne conserve pas les lignes blanches et il est possible de reproduire le spool avec une pésentation similaire à l'original (espacements de lignes et pagination).

Par contre, à partir du fichier de sortie du CPYSPLF contenant ces codes, pour reproduire correctement le spool il faut faire :
OVRPRTF FILE(QSYSPRT) CTLCHAR(*FCFC)
CPYF FROMFILE(QTEMP/Monfic) TOFILE(QSYSPRT)

[Hédhili Jaïdane]

dans les spools ???
Mais lequel ? J'ai une centaine d'imprimante déclarés en device et autant d'outq.
J'imagine que c'est le spool par défaut associé à mon profil mais je n'ai rien de précisé dedans
Voilà j'aimerai reprendre ce fichier ou à défaut préciser dans la dernière commande dans quel spooler je l'envoie.

Merci

Dans les spools en faisant simplement WRKSPLF : fichier QSYSPRT, outq = celle du job (session), device = idem. Tu peux les modifier par CHGJOB mais pas dans le CPYF.

[aqua14]

ok ...retrouvé, je le renvoie dans son spooler mais quand je l'affiche ! Il s'est pris un coup le document !!! Je retrouve une partie mais avec des espaces qui n'y étaient pas.
D'ailleurs à l'impression ça ne passe pas il passe en RDY.
Quelle est l'étape qui manque et comment y remédier ?

Quand je fais au préalable OVRPRTF FILE(QSYSPRT) CTLCHAR(*FCFC)
il ne se passe rien
et quand je repasse la commande CPYF...

Attributs de fichier incorretcs pour sortie imprimée.

Merci

[jump400]

ok ...retrouvé, je le renvoie dans son spooler mais quand je l'affiche ! Il s'est pris un coup le document !!! Je retrouve une partie mais avec des espaces qui n'y étaient pas.
D'ailleurs à l'impression ça ne passe pas il passe en RDY.
Quelle est l'étape qui manque et comment y remédier ?

RDY veut dire que ton spool est prêt à être imprimer. S'il ne sort pas physiquement, je vois 2 cas possibles :

• L'imprimante est déjà occupée à imprimer autre chose
• Le spool est dans une file de sortie (OUTQ) qui n'est pas reliée à une imprimante (WRITER pour faire court)

Dans ce dernier cas il suffit de faire 2 devant le spool et de l'envoyer vers une outq reliée à une imprimante dispo

Quand je fais au préalable OVRPRTF FILE(QSYSPRT) CTLCHAR(*FCFC)
il ne se passe rien
et quand je repasse la commande CPYF...

Attributs de fichier incorretcs pour sortie imprimée.

Merci

Attention, avec l'ovrprtf :
OVRPRTF FILE(QSYSPRT) CTLCHAR(*FCFC)
le cpyf ne doit pas être fait sur *PRINT mais sur QSYSPRT :
CPYF FROMFILE(QTEMP/Monfic) TOFILE(QSYSPRT)

[aqua14]

ok j'y arrive enfin. Il reste encore deux points obscures :

1°
J'étais parti sur un nbre de colonne à 80 et je me retrouve en 130.
Pourtant à la création j'avais précisé 81.

2°
TOFILE(*PRINT)
TOFILE(QSYSPRT)

Quelle est la différence entre les deux, au final je retrouve bien l'état dans les deux cas dans wrksplf.
Et surtout pour être sur que je n'ai rien changé vu que l'as400 est en production quoique ce soit pour les utilisateurs , avec la commande ovrprtf.

Merci

[Hédhili Jaïdane]

ok j'y arrive enfin. Il reste encore deux points obscures :

1°
J'étais parti sur un nbre de colonne à 80 et je me retrouve en 130.
Pourtant à la création j'avais précisé 81.

2°
TOFILE(*PRINT)
TOFILE(QSYSPRT)

Quelle est la différence entre les deux, au final je retrouve bien l'état dans les deux cas dans wrksplf.
Et surtout pour être sur que je n'ai rien changé vu que l'as400 est en production quoique ce soit pour les utilisateurs , avec la commande ovrprtf.

Merci

Rien de grave.

1° et 2° - Ca vient du CPYF *PRINT qui utilise QSYSPRT, fais un OVRPRTF et change la largeur de la page avant CPYF *PRINT, remets le en place par DLTOVR

[aqua14]

ok le probleme de colonne eest aussi réglé en précisant comme tu me l'indiques PAGESIZE(*N 80) dans OVRPRTF
Mon état

Reste que la commande DLTOVR pour remettre en place ne fonctionne pas:
DLTOVR FILE(QSYSPRT)
Substitution non trouvée au niveau indiqué.

Merci

[Mercure]

Attention ! Le CPYSPLF perd la plupart des attributs du spool : gras, souligné, CPI, etc et ne les restitue pas à la recopie sur QSYSPRT.

[aqua14]

Finallement ça m'interesse beaucoup pour la résolution de mon probleme d'origine de refaire apparaitre le détail de la colonne action de saut (les 1 0 - etc...) dans l'édition.
Ce que OVRPRTF FILE(QSYSPRT) PAGESIZE(*N 80) CTLCHAR(*FCFC) m'a fait disparaitre.

Quelle commande pour revenir en arrière ?
si c'est DLTOVR pouvez vous me donner la syntaxe complète ?
Sachant que je souhaite que le fichier reste quand même sur 80 colonnes.

(DLTOVR FILE(QSYSPRT) donne :
Substitution non trouvée au niveau indiqué.

Merci

[Hédhili Jaïdane]

...Reste que la commande DLTOVR pour remettre en place ne fonctionne pas:
DLTOVR FILE(QSYSPRT)
Substitution non trouvée au niveau indiqué.

Merci

Par défaut OVRSCOPE de OVRPRTF est *ACTGRPDFN, normalement l'override est encore actif dans ton groupe d'activation. Si tu n'as rien trouvé tant mieux, mais fais gaffe si tu l'as fait dans une autre session. Je viens de le simuler, il faut bien passer par un DLTOVR si tu ne veux pas avoir des problèmes pour les commandes ou les appels suivants.

Bonne continuation.

[Hédhili Jaïdane]

Finallement ça m'interesse beaucoup pour la résolution de mon probleme d'origine de refaire apparaitre le détail de la colonne action de saut (les 1 0 - etc...) dans l'édition.
Ce que OVRPRTF FILE(QSYSPRT) PAGESIZE(*N 80) CTLCHAR(*FCFC) m'a fait disparaitre.
...Merci

Enlève le *FCFC dde l'OVRPRTF et je pense que tu dois les récupérer. A tester ?? Mais je ne vois l'intérêt, s'ils t'intéressent pour un pgm quelconque, ils sont dans le fichier DB.