Découper un spool sans l'option TER
Différence entre versions
(Balise : Éditeur visuel) |
|||
Ligne 1 : | Ligne 1 : | ||
;DECOUPAGE SPOOL VOLUMINEUX | ;DECOUPAGE SPOOL VOLUMINEUX | ||
− | # Création d'un PF (fichier physique ex RELELIV dans la lib QTEMP) | + | # Création d'un PF (fichier physique ex RELELIV dans la lib QTEMP) |
− | # Copie des données depuis le spool dans le fichier physique créé précédemment | + | <code>CRTPF FILE(QTEMP/RELELIV) RCDLEN(255) SIZE(*NOMAX)</code> |
− | # On substitue le fichier QSYSPRT. Ça va permettre de copier le contenu du PF et de recréer un fichier spool | + | # Copie des données depuis le spool dans le fichier physique créé précédemment |
− | # On copie (une partie) du fichier spool de départ (qui est contenu dans le PF) dans notre nouveau spool (dans cet exemple on copie de l'enregistrement 1 à l'enregistrement 4041) | + | <code>CPYSPLF FILE(RELELIVSOL) TOFILE(QTEMP/RELELIV) JOB(170194/OBEIDK/QPADEV0017) CTLCHAR(*FCFC) CHLVAL(*NORMAL)</code> |
+ | # On substitue le fichier QSYSPRT. Ça va permettre de copier le contenu du PF et de recréer un fichier spool | ||
+ | <code>OVRPRTF FILE(QSYSPRT) PAGESIZE(*N 255) CTLCHAR(*FCFC) CHLVAL(*NORMAL) SPLFNAME(KHALIL)</code> | ||
+ | # On copie (une partie) du fichier spool de départ (qui est contenu dans le PF) dans notre nouveau spool (dans cet exemple on copie de l'enregistrement 1 à l'enregistrement 4041) | ||
+ | <code>CPYF FROMFILE(QTEMP/RELELIV) TOFILE(QSYSPRT) MBROPT(*ADD) CRTFILE(*YES) FROMRCD(1) TORCD(4041)</code> | ||
A l'issue de ces manipulations on obtient un nouveau spool qui s'appelle KHALIL et contient les enregistrements 1 à 4041. Pour créer les spools suivants (avec les enregistrements suivants) recommencer les étapes 3 & 4 en changeant le nom du fichier spool de destination (dans la commande 3) et le nb des enregistrements de départ et de fin (commande 4) | A l'issue de ces manipulations on obtient un nouveau spool qui s'appelle KHALIL et contient les enregistrements 1 à 4041. Pour créer les spools suivants (avec les enregistrements suivants) recommencer les étapes 3 & 4 en changeant le nom du fichier spool de destination (dans la commande 3) et le nb des enregistrements de départ et de fin (commande 4) |
Version du 28 février 2024 à 13:35
- DECOUPAGE SPOOL VOLUMINEUX
- Création d'un PF (fichier physique ex RELELIV dans la lib QTEMP)
CRTPF FILE(QTEMP/RELELIV) RCDLEN(255) SIZE(*NOMAX)
- Copie des données depuis le spool dans le fichier physique créé précédemment
CPYSPLF FILE(RELELIVSOL) TOFILE(QTEMP/RELELIV) JOB(170194/OBEIDK/QPADEV0017) CTLCHAR(*FCFC) CHLVAL(*NORMAL)
- On substitue le fichier QSYSPRT. Ça va permettre de copier le contenu du PF et de recréer un fichier spool
OVRPRTF FILE(QSYSPRT) PAGESIZE(*N 255) CTLCHAR(*FCFC) CHLVAL(*NORMAL) SPLFNAME(KHALIL)
- On copie (une partie) du fichier spool de départ (qui est contenu dans le PF) dans notre nouveau spool (dans cet exemple on copie de l'enregistrement 1 à l'enregistrement 4041)
CPYF FROMFILE(QTEMP/RELELIV) TOFILE(QSYSPRT) MBROPT(*ADD) CRTFILE(*YES) FROMRCD(1) TORCD(4041)
A l'issue de ces manipulations on obtient un nouveau spool qui s'appelle KHALIL et contient les enregistrements 1 à 4041. Pour créer les spools suivants (avec les enregistrements suivants) recommencer les étapes 3 & 4 en changeant le nom du fichier spool de destination (dans la commande 3) et le nb des enregistrements de départ et de fin (commande 4)
- ECLATEMENT PDF - pas de TER
PDF->XPS puis indexation à l'aide de la commande MAP_XPS puis XPS->PDF avec éclatement sur index.