{"id":419,"date":"2023-02-24T16:20:22","date_gmt":"2023-02-24T15:20:22","guid":{"rendered":"http:\/\/www.sepchat.com\/SC\/?p=419"},"modified":"2023-02-24T16:20:25","modified_gmt":"2023-02-24T15:20:25","slug":"ibm-i-rpg-iv-gestion-des-erreurs-fichiers","status":"publish","type":"post","link":"http:\/\/www.sepchat.com\/SC\/index.php\/2023\/02\/24\/ibm-i-rpg-iv-gestion-des-erreurs-fichiers\/","title":{"rendered":"IBM\u00a0i – RPG IV – Gestion des erreurs fichiers"},"content":{"rendered":"\n

La gestion des erreurs fichier en RPG IV se fait par l’interm\u00e9diaire du code *STATUS et du code op\u00e9ration Monitor.<\/p>\n\n\n\n

 C MONITOR<\/p>\n\n\n\n

C NUMHOM Chain HOM01PF
C if %found()
** Code Si Enregistrement Trouv\u00e9 et Non verrouill\u00e9.
C endif
C ON-ERROR 1218<\/strong><\/p>\n\n\n\n

 C ENDMON<\/p>\n\n\n\n

 Les codes *STATUS disponibles sont :<\/strong><\/p>\n\n\n\n

01021 Tried to write a record that already exists<\/strong><\/p>\n\n\n\n

01022 Referential constraint error detected on file member.<\/p>\n\n\n\n

01023 Error in trigger program before file operation performed.<\/p>\n\n\n\n

01024 Error in trigger program after file operation performed.<\/p>\n\n\n\n

01031 Match field out of sequence.<\/p>\n\n\n\n

01041 Array\/table load sequence error.<\/p>\n\n\n\n

01042 Array\/table load sequence error. Alternate collating sequence used.<\/p>\n\n\n\n

01051 Excess entries in array\/table file.<\/p>\n\n\n\n

01071 Numeric sequence error.<\/p>\n\n\n\n

 01121 No indicator on the DDS keyword for Print key.<\/p>\n\n\n\n

01122 No indicator on the DDS keyword for Roll Up key.<\/p>\n\n\n\n

01123 No indicator on the DDS keyword for Roll Down key.<\/p>\n\n\n\n

01124 No indicator on the DDS keyword for Clear key.<\/p>\n\n\n\n

01125 No indicator on the DDS keyword for Help key.<\/p>\n\n\n\n

01126 No indicator on the DDS keyword for Home key.<\/p>\n\n\n\n

1201 34xx Record mismatch detected on input.<\/p>\n\n\n\n

01211 I\/O operation to a closed file.<\/strong><\/p>\n\n\n\n

01215 OPEN issued to a file already opened.<\/strong><\/p>\n\n\n\n

01216 Error on an implicit OPEN\/CLOSE operation.<\/p>\n\n\n\n

01217 Error on an explicit OPEN\/CLOSE operation.<\/p>\n\n\n\n

01218 Record already locked.<\/strong><\/p>\n\n\n\n

01221 Update operation attempted without a prior read.<\/strong><\/p>\n\n\n\n

01222 Record cannot be allocated due to referential constraint error<\/p>\n\n\n\n

01231 Error on SPECIAL file.<\/p>\n\n\n\n

01235 Error in PRTCTL space or skip entries.<\/p>\n\n\n\n

01251       80xx 81xx Permanent I\/O error occurred<\/p>\n\n\n\n

01285 Attempt to acquire a device already acquired.<\/p>\n\n\n\n

01286 Attempt to open shared file with SAVDS or IND options.<\/p>\n\n\n\n

01287 Response indicators overlap IND indicators. 01299 Other I\/O error detected.<\/p>\n\n\n\n

01331 Wait time exceeded for READ from WORKSTN file. <\/p>\n\n\n\n

01241 Record number not found. (Record number specified in record address file is not present in file being processed.)<\/p>\n\n\n\n

01255 82xx 83xx Session or device error occurred. Recovery may be possible.<\/p>\n\n\n\n

01261  Attempt to exceed maximum number of acquired devices.<\/p>\n\n\n\n

01271 Attempt to acquire unavailable device<\/p>\n\n\n\n

01281 Operation to unacquired device.<\/p>\n\n\n\n

01282 Job ending with controlled option.<\/p>\n\n\n\n

01284 Unable to acquire second device for single device file<\/p>\n\n\n\n

\"\"<\/a><\/figure>\n\n\n\n
\n
Cet article vous a \u00e9t\u00e9 utile ? N\u2019h\u00e9sitez pas \u00e0 le partager.<\/a><\/div>\n<\/div>\n","protected":false},"excerpt":{"rendered":"

La gestion des erreurs fichier en RPG IV se fait par l’interm\u00e9diaire du code *STATUS et du code op\u00e9ration Monitor.  C MONITOR C NUMHOM Chain HOM01PFC if %found()** Code Si Enregistrement Trouv\u00e9 et Non verrouill\u00e9.C endifC ON-ERROR 1218  C ENDMON  Les codes *STATUS disponibles sont : 01021 Tried to write a record that already exists 01022 […]<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[23],"tags":[],"_links":{"self":[{"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/posts\/419"}],"collection":[{"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/comments?post=419"}],"version-history":[{"count":1,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/posts\/419\/revisions"}],"predecessor-version":[{"id":420,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/posts\/419\/revisions\/420"}],"wp:attachment":[{"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/media?parent=419"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/categories?post=419"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/tags?post=419"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}