Découper un spool sans l'option TER

Différence entre versions

De MappingDoc
imported>Admin
m (1 révision importée)
 
(2 révisions intermédiaires par le même utilisateur non affichées)
Ligne 1 : Ligne 1 :
 
;DECOUPAGE SPOOL VOLUMINEUX
 
;DECOUPAGE SPOOL VOLUMINEUX
+
 
1-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)<br/><code>CRTPF FILE(QTEMP/RELELIV) RCDLEN(255) SIZE(*NOMAX)</code>
CRTPF FILE(QTEMP/RELELIV) RCDLEN(255) SIZE(*NOMAX)
+
# Copie des données depuis le spool dans le fichier physique créé précédemment<br/><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<br/><code>OVRPRTF FILE(QSYSPRT) PAGESIZE(*N 255) CTLCHAR(*FCFC) CHLVAL(*NORMAL) SPLFNAME(KHALIL)</code>
2-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)<br/><code>CPYF FROMFILE(QTEMP/RELELIV) TOFILE(QSYSPRT) MBROPT(*ADD) CRTFILE(*YES) FROMRCD(1) TORCD(4041)</code>
CPYSPLF FILE(RELELIVSOL) TOFILE(QTEMP/RELELIV) JOB(170194/OBEIDK/QPADEV0017) CTLCHAR(*FCFC) CHLVAL(*NORMAL)
+
 
 
3-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)
 
 
4-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)
 
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)
  
 
<br />
 
<br />
 +
 
;ECLATEMENT PDF - pas de TER
 
;ECLATEMENT PDF - pas de TER
 +
 
<br />
 
<br />
 
PDF->XPS puis indexation à l'aide de la commande MAP_XPS puis XPS->PDF avec éclatement sur index.
 
PDF->XPS puis indexation à l'aide de la commande MAP_XPS puis XPS->PDF avec éclatement sur index.

Version actuelle datée du 28 février 2024 à 13:36

DECOUPAGE SPOOL VOLUMINEUX
  1. Création d'un PF (fichier physique ex RELELIV dans la lib QTEMP)
    CRTPF FILE(QTEMP/RELELIV) RCDLEN(255) SIZE(*NOMAX)
  2. 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)
  3. 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)
  4. 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.