WikASi - Un peu de tout sur le i - index:exploitation:fichier
https://wikasi.rahar.fr/
2026-04-04T12:02:43+00:00WikASi - Un peu de tout sur le i
https://wikasi.rahar.fr/
https://wikasi.rahar.fr/lib/exe/fetch.php?media=wiki:dokuwiki.svgtext/html2025-04-17T20:21:28+00:00Anonymous (anonymous@undisclosed.example.com)ccsid
https://wikasi.rahar.fr/doku.php?id=index:exploitation:fichier:ccsid&rev=1744921288&do=diff
CCSID
C'est compliqué alors on se fie aux spécialistestext/html2025-04-17T20:21:28+00:00Anonymous (anonymous@undisclosed.example.com)code_journal
https://wikasi.rahar.fr/doku.php?id=index:exploitation:fichier:code_journal&rev=1744921288&do=diff
Liste des codes journal i
Codes Journal
Code Poste Description
A_ -----> Comptabilité système
A_DP -----> Informations sur l'impression directe
A_JB -----> Comptabilité des travaux
A_SP -----> Informations sur impression différéetext/html2025-04-17T20:21:29+00:00Anonymous (anonymous@undisclosed.example.com)hex
https://wikasi.rahar.fr/doku.php?id=index:exploitation:fichier:hex&rev=1744921289&do=diff
CLLE - DCL
Valeur hexadecimale non affichable à l'écran (DSPF)
Dcl &HEX1 *char (1) VALUE(X'01')
Dcl &HEX2 *char (1) VALUE(X'02')
Dcl &HEX3 *char (1) VALUE(X'03')
Dcl &HEX4 *char (1) VALUE(X'04')
Dcl &HEX10 *char (1) VALUE(X'10')
Dcl &HEX11 *char (1) VALUE(X'11')
Dcl &HEX12 *char (1) VALUE(X'12')
Dcl &HEX13 *char (1) VALUE(X'13')
Dcl &HEX14 *char (1) VALUE(X'14')
Dcl &HEX15 *char (1) VALUE(X'15')
Dcl &HEX1D *char (1) VALUE(X'1D'…text/html2025-04-17T20:21:30+00:00Anonymous (anonymous@undisclosed.example.com)outils
https://wikasi.rahar.fr/doku.php?id=index:exploitation:fichier:outils&rev=1744921290&do=diff
Références Zones (DSPFFD)
CREATE TABLE QTEMP/REFZON AS
( Select WHLIB AS Lib, WHFILE AS File,
SUBSTR(WHFTYP, 1, 1) as F,
(WHFLDN + 0) as NbZon,
(WHRLEN + 0) as LgRcd,
SUBSTR(WHFLDI, 1, 10) as Zone,
SUBSTR(WHFLDT, 1, 1) as Typ,
(WHFLDB + 0) as Long,text/html2025-04-17T20:21:30+00:00Anonymous (anonymous@undisclosed.example.com)pdf
https://wikasi.rahar.fr/doku.php?id=index:exploitation:fichier:pdf&rev=1744921290&do=diff
FICHIER PDF
OVRPRTF FILE(QSYSPRT) DEVTYPE(*AFPDS) TOSTMF('/QDLS/TMP/CHKSAVE.PDF') WSCST(*PDF)
CHRID(697 297)
RMVLNK OBJLNK('/QDLS/TMP/CHKSAVE.PDF')
Générer le spool “QSYSPRT” à partir d'un programme
DLTOVR QSYSPRT
CHGDOCD DOC(chksave.pdf) FLR(TMP) DOCD('Intitulé_Objet_du mail') DOCLANGID(FRA) DOCCNTRYID(FR)text/html2025-04-17T20:21:30+00:00Anonymous (anonymous@undisclosed.example.com)rgz
https://wikasi.rahar.fr/doku.php?id=index:exploitation:fichier:rgz&rev=1744921290&do=diff
RGZPFM
Pour récupérer l'état des trous (DELETE)et taille de fichiers
CREATE TABLE QGPL/RGZ as (
Select SUBSTR(TABSCHEMA, 1, 10) as LIB,
SUBSTR(TABNAME, 1, 10) as FILE,
SUBSTR(TABPART, 1, 10) as MBR,
CARD, DELETED,
case CARD
when 0 then 100.00
else
DELETED * 100 / CARD
end as Percent_Deleted,
DELETES, DSREORGS, SIZE
from QSYS2.SYSPARTITIONSTAT
where DELETED > 0
AND system_table_schema NOT LIKE 'Q%'
order by LIB, FILE, MBR, DELETED desc
) WITH DATAtext/html2025-04-17T20:21:30+00:00Anonymous (anonymous@undisclosed.example.com)zip
https://wikasi.rahar.fr/doku.php?id=index:exploitation:fichier:zip&rev=1744921290&do=diff
Zipper x fichiers sous QSH
QSH CMD('cd /Dir_Destination/export/ ; jar -cfM fichier_zippe.zip
Fichier_1_a_zipper
Fichier_2_a_zipper
Fichier_3_a_zipper
Fichier_4_a_zipper
Fichier_5_a_zipper
Fichier_6_a_zipper
Fichier_7_a_zipper
Fichier_zozo*.txt