At macro level, a return code is always placed in the rightmost two bytes of register 15 or in a field provided for this purpose in the parameter list of the called macro (in the standard header). The meanings of the various return codes are commented on in the IDEJVS macro (leftmost byte, SI; rightmost byte, RS) or in the standard header of the called macro:
MELD IDEJVS 1 *********************************************************************** 1 * VERSION 401 1 #INTF REFTYPE=REQUEST, C 1 INTNAME=ERRJV,INTCOMP=000 1 *********** JVS RETURN CODES ****************************** 1 IDRC0000 EQU X'0000' REQUESTED JVS FUNCTION PROCESSED SUCESSFULLY. 1 * 1 * JVS RETURN CODES FROM CMS 1 * 1 IDRC0401 EQU X'0401' REQUESTED CATALOG NOT ACCESSIBLE. 1 IDRC0402 EQU X'0402' REQUESTED CATALOG IN QUIET MODE. 1 IDRC0403 EQU X'0403' MRSCAT CONTAINS ILLEGAL INFORMATION. 1 IDRC0404 EQU X'0404' SYSTEM ERROR IN CMS. 202 1 IDRC0405 EQU X'0405' SYSTEM ERROR IN MC. 1 IDRC0406 EQU X'0406' MASTER EXCH OPERATION ABORT. 103 1 IDRC0407 EQU X'0407' MASTER EXCH WRITE DENIED. 103 1 IDRC0410 EQU X'0410' RC FROM SUBFUNCTION. 103 1 IDRC041F EQU X'041F' TASK RP01 NO DUMP. 201 1 IDRC0412 EQU X'0412' REQUESTED CATALOG NOT FOUND. 202 1 IDRC0430 EQU X'0430' SYSTEM ERROR IN CMS ($GETMEM). 1 IDRC0431 EQU X'0431' INVALID PARAMETER. 1 IDRC0432 EQU X'0432' SYSTEM ERROR IN CMS. 1 IDRC0433 EQU X'0433' REQUESTED JOB VARIABLE NOT CATALOGED. 1 IDRC0434 EQU X'0434' SYSTEM ERROR IN CMS. 1 IDRC0435 EQU X'0435' JOB VARIABLE NOT SHARABLE. 1 IDRC0436 EQU X'0436' SYSTEM ERROR IN CMS. 1 * IDRC0437 EQU X'0437' SYSTEM ERROR IN CMS. 1 IDRC0438 EQU X'0438' 6 OR LESS BLOCKS REMAINING FOR CATALOG. 1 IDRC0439 EQU X'0439' NO MORE SPACE AVAILABLE FOR CATALOG. 1 IDRC043B EQU X'043B' SYSTEM ERROR IN CMS. 1 IDRC043C EQU X'043C' CATALOG FILE SPACE EXHAUSTED. 1 IDRC043D EQU X'043D' SYSTEM ERROR: TSOSCAT DESTROYED. 1 IDRC043E EQU X'043E' JV TO BE CREATED ALREADY EXISTS. 1 * 1 * JVS RETURN CODES FROM DQPAM 1 * 1 * IDRC0421 EQU X'0421' SYSTEM ERROR: NO I/O SLOT AVAILABLE. 005 1 IDRC0422 EQU X'0422' SYSTEM ERROR IN CMS. 1 IDRC0423 EQU X'0423' SYSTEM ERROR IN PAM.
1 IDRC0424 EQU X'0424' SYSTEM ERROR: SYSTEM ADDRESS SPACE EXHAUSTED. 1 IDRC0425 EQU X'0425' SYSTEM ERROR IN CMS. 1 IDRC0426 EQU X'0426' SYSTEM ERROR IN CMS. 1 IDRC0427 EQU X'0427' SYSTEM ERROR IN PAM. 1 IDRC0428 EQU X'0428' SYSTEM ERROR IN PAM. 005 1 IDRC0429 EQU X'0429' SYSTEM ERROR IN PAM. 1 * IDRC042B EQU X'042B' SYSTEM ERROR IN PAM. 005 1 IDRC042C EQU X'042C' SYSTEM ERROR IN PAM. 1 IDRC042D EQU X'042D' SYSTEM ERROR IN PAM. 005 1 IDRC042F EQU X'042F' SYSTEM ERROR: RESIDENT PAGE SPACE EXHAUSTED. 1 * 1 * JVS RETURN CODES FROM JVCATEX 1 * 1 IDRC0440 EQU X'0440' INVALID JVNAME1. 1 IDRC0441 EQU X'0441' INVALID JVNAME2. 1 IDRC0442 EQU X'0442' NEGATIVE RETENTION PERIOD. 1 * IDRC0443 EQU X'0443' STATE=NEW AND ACCESS=READ. 100 1 IDRC0444 EQU X'0444' JVNAME1 OR JVNAME2 ALREADY CATALOGED. 1 IDRC0445 EQU X'0445' INVALID RETENTION PERIOD SPECIFICATION. 1 * IDRC0446 EQU X'0446' RENAME JV NOT SUCCESSFUL. 005 1 IDRC0447 EQU X'0447' JVNAME1 IS IN USE BY CJC. 001 1 IDRC0448 EQU X'0448' MONJV MAY NOT BE CHANGED. 001 1 IDRC0449 EQU X'0449' ONLY STANDARD ATTRIBUTES FOR TEMPJV ALLOWED 800 1 IDRC044A EQU X'044A' GUARD NAME INVALID 200 1 IDRC044B EQU X'044B' MANAGEMENT-CLASS INVALID 200 1 IDRC044C EQU X'044C' ERROR IN DEFAULT PROTECTION 300 1 * 1 * JVS RETURN CODES FROM JVDCLEX, JVRELEX, JVLNKEX AND JVCSWEX 1 * 1 IDRC0450 EQU X'0450' INVALID LINKNAME. 1 IDRC0451 EQU X'0451' NO TFT EXISTING. 800 1 * IDRC0452 EQU X'0452' INVALID JOBVAR NAME. 003 1 IDRC0453 EQU X'0453' NO USER AREA. 800 1 * IDRC0454 EQU X'0454' INVALID PARAMETER. 003 1 IDRC0455 EQU X'0455' AREA SIZE TO SMALL 800 1 IDRC0456 EQU X'0456' COMPARISON IS FALSE 801 1 IDRC0457 EQU X'0457' REMOVE ALL ENTRIES ? 103 1 IDRC0458 EQU X'0458' REQU WITHDRAWN BY USER. 103 1 * 1 * JVS RETURN CODES FROM JVERAEX 1 * 1 IDRC0460 EQU X'0460' INVALID ERASE REQUEST. 1 IDRC0461 EQU X'0461' ERASE OF SOME JOB VARIABLES IN ERROR. 1 IDRC0462 EQU X'0462' SEVER PROCESSING BY P1 MACRO CALLER REQUESTED. 1 IDRC0463 EQU X'0463' ERASE ERROR ON JV. 1 IDRC0464 EQU X'0464' ERAJV ERROR. USER HAS STILL JOB VARIABLE 1 * CATALOG ENTRIES. 1 IDRC0465 EQU X'0465' ERASE ALL JV'S ON USERID ? 950
1 IDRC0466 EQU X'0466' MONJV IS PROTECTED 800 1 IDRC0468 EQU X'0468' ERASE ALL JV'S ON PUBSET ? 950 1 IDRC0469 EQU X'0469' ERASE A SINGLE JV ? 950 1 IDRC046A EQU X'046A' ERASE REQUEST WITHDRAWN BY CALLER 950 1 * 1 * JVS RETURN CODES FROM JVGETEX 1 * 1 IDRC0470 EQU X'0470' JV VALUE CONTAINS FEWER BYTES THAN REQUESTED. 1 IDRC0471 EQU X'0471' JOB VARIABLE $SYSJV.LASTMSG NOT ACCESSIBLE. 401 1 IDRC0472 EQU X'0472' INVALID SPECIAL JOB VARIABLE. 1 IDRC0474 EQU X'0474' JV VALUE TRUNCATED. 1 IDRC0475 EQU X'0475' THE SIZE SPECIFIED FOR THE AREA IN THE GETJV 1 * MACRO IS LESS THAN 4 BYTES. 1 * 1 * JVS RETURN CODES FROM JVSETEX 1 * 1 IDRC0480 EQU X'0480' SPECIAL JOB VARIABLE MAY NOT BE SET. 1 IDRC0481 EQU X'0481' A NON-PRIVILEGED CALLER HAS REQUESTED A 1 * PRIVILEGED SETJV FUNCTION. 1 IDRC0482 EQU X'0482' THE ADDRESS OF THE JV VALUE IS MISSING. 1 IDRC0483 EQU X'0483' THE LENGTH OF THE JV VALUE EXCEEDS 256 BYTES. 1 IDRC0484 EQU X'0484' MORE THAN 1 PRIVILEGED REQUEST HAS BEEN 1 * SPECIFIED IN A SINGLE CALL. 1 IDRC0485 EQU X'0485' JVNAME2 AND VALUE ADDRESS ARE BOTH SPECIFIED. 1 * IDRC0486 EQU X'0486' JVNAME1 AND JVNAME2 ARE NOT OF SAME TYPE120 1 IDRC0487 EQU X'0487' FIRST BYTES OF MONJV ARE PROTECTED. 800 1 * 1 * JVS RETURN CODES FROM JVSTAEX 1 * 1 IDRC0490 EQU X'0490' THE AREA SIZE PARAMETER IS TOO SMALL TO CONTAIN 1 * THE CATALOG ENTRY. 1 IDRC0491 EQU X'0491' INVALID OPERAND IN SELECTION LIST 1 * 1 * JVS RETURN CODES FROM JVXXXSY, JVSV133, JVSV190, JVSYSCM, JVSYSP2 1 * 1 IDRC04A0 EQU X'04A0' FUNCTIONAL UNIT "JOB VARIABLE SERVICES" (JVS) 1 * NOT SELECTED. 1 IDRC04A1 EQU X'04A1' SYNTAX ERROR IN COMMAND PARAMETER. 1 IDRC04A2 EQU X'04A2' JV HAS BEEN ERASED. 1 IDRC04A3 EQU X'04A3' ERASE ERROR ON JV. 1 IDRC04A4 EQU X'04A4' INVALID FUNCTION CODE SPECIFIED. 1 IDRC04A5 EQU X'04A5' A NON-PRIVILEGED CALLER HAS REQUESTED A 1 * PRIVILEGED ENCRYPTION OPTION. 1 IDRC04A6 EQU X'04A6' SYSTEM ERROR IN WROUT 1 IDRC04A7 EQU X'04A7' INVALID ADDRESS IN REGISTER 1 DURING SVC133. 1 * IDRC04A8 EQU X'04A8' INVALID INTERACTIVE MODE. 007 1 IDRC04A9 EQU X'04A9' LABEL NOT FOUND. 801 1 IDRC04AA EQU X'04AA' INVALID PL IN CURRENT MODE (GET,SET,STA) 902
1 IDRC04AB EQU X'04AB' INVALID PARAMETER IN MACRO PARAMETER LIST 950 1 * (INVALID FLAGS OR OLD INTERFACE USED NEW FUNTIONS 1 IDRC04AC EQU X'04AC' INVALID CONVERSION OF TIME UTC TO LT 101 1 IDRC04AD EQU X'04AD' ERROR DURING VARIABLE PRODUCTION 120 1 * 1 * JVS RETURN CODES FROM DIFFERENT JVS MODULES 1 * 1 IDRC04B0 EQU X'04B0' SIZE FIELD ZERO OR AREA ADDRESS NOT SPECIFIED. 1 IDRC04B1 EQU X'04B1' PASSWORD HAS NOT BEEN PROVIDED. 1 IDRC04B2 EQU X'04B2' REQUESTED JOB VARIABLE OR REQUESTED SUBSTRING 1 * IS EMPTY. 1 IDRC04B3 EQU X'04B3' INCORRECT SYNTAX-JVNAME. 1 IDRC04B4 EQU X'04B4' LINKNAME NOT PREVIOUSLY DEFINED. 1 IDRC04B5 EQU X'04B5' SYSTEM ERROR: $GETMEM ERROR. 999 1 IDRC04B6 EQU X'04B6' EXPIRATION DATE ERROR. 1 IDRC04B7 EQU X'04B7' SYSTEM ERROR: $RETMEM ERROR. 999 1 IDRC04B8 EQU X'04B8' ONLY READ ACCESS IS ALLOWED. 1 IDRC04B9 EQU X'04B9' ILLEGAL SUBSTRING IN GET- OR SETJV. 1 * IDRC04BA EQU X'04BA' ILLEGAL SYNTAX FOR NON-NUMERIC JV. 120 1 IDRC04BB EQU X'04BB' ILLEGAL SYNTAX FOR NUMERIC JV. 750 1 IDRC04BC EQU X'04BC' NOT ALL JVS ARE ERASED OR DISPLAYED 950 1 IDRC04BD EQU X'04BD' ERROR OCCURED WHILE USING ACCESS-FUNCTION 001 1 * TO SYSTEM-TABLE (E.G. TCB) 001 1 IDRC04BE EQU X'04BE' USERID DOES NOT EXIST 002 1 IDRC04BF EQU X'04BF' JV PROTECTED BY ACL 004 1 * 1 * JVS RETURN CODES FROM CMS 1 * 1 IDRC04C8 EQU X'04C8' JV LIMIT EXCEEDED 100 1 IDRC04CA EQU X'04CA' JV LIMIT ERROR 102 1 * 1 * JVS RETURN CODES FROM JVSMJVH 800 1 * 1 IDRC04D0 EQU X'04D0' JV NOT ACCESSIBLE. 800 1 IDRC04D1 EQU X'04D1' JV NOT ASSIGNED. 800 1 IDRC04D2 EQU X'04D2' JV ALREADY ASSIGNED. 800 1 IDRC04D3 EQU X'04D3' JV CANNOT BE CREATED. 800 1 IDRC04D4 EQU X'04D4' JV INCORRECTLY SPECIFIED. 800 1 IDRC04D5 EQU X'04D5' JV CATALOG ENTRY IS LOCKED. 800 1 IDRC04D6 EQU X'04D6' JV NOT SUPPLIED WITH TSN. 800 1 IDRC04D7 EQU X'04D7' GCF ERROR OCCURRED. 400 1 IDRC04D8 EQU X'04D8' NO LINKNAME FOR MONJV. 801 1 IDRC04D9 EQU X'04D9' GCF ERROR TO CONSOLE. 400 1 * 1 * JVS RETURN CODES TO CMD-PROCESSOR 101 1 * 1 IDRC04E0 EQU X'04E0' CORRECT AND RETRY. 101 1 IDRC04E1 EQU X'04E1' WAIT AND RETRY. 101
1 * 1 * JVS RETURN CODES FROM CMS 1 * 1 IDRC14A4 EQU X'14A4' CATALOG INDEX MAX SIZE. 400 1 IDRC14A5 EQU X'14A5' CATALOG INDEX DESTROYED. 400 1 ********************************************************************* 1 SPACE
The return codes listed correspond in most cases to the error codes of system messages and can be supplemented to form a message code by adding the message class. You can thus obtain detailed information in the manner described in section “Command level”.
No corresponding system message exists for the following return codes. They have the following meanings:
X'0000' | Execution without error. |
X'0450' | Invalid link name. |
X'0453' | User area could not be supplied. |
X'0455' | User area is too small. |
x'0456' | Job variable value is not equal to comparison value. |
X'0461' | Error while deleting job variables. The jvid specified in the ERAJV matches (e.g. due to a wildcard specification) more than one object (catalog, user ID and/or JV). Not all of these objects (possibly none at all) could be processed correctly. |
X'0462' | User requested REMOVE-USER processing (the IDJESEVR bit was set in the ERAJV parameter list). |
X'0475' | The area length is less than 4 bytes. |
X'0481' | Non-privileged user requested privileged SETJV function. |
X'0482' | Address for job variable value is missing. |
X'0483' | The length in the record length field of the job variable value is greater than 260 bytes or less than 4 bytes. |
X'0484' | More than one privileged request was submitted in one call. |
X'0485' | Both “jvname2” and a value address were specified. |
X'0490' | Length of defined area is insufficient for catalog entry. |
X'0491' | Invalid selection operand was specified (JVSEL). |
X'04A4' | An invalid function code was specified (SVC 133). |
X'04A5' | Non-privileged user requested privileged coding function. |
X'04A7' | Invalid address in register 1 with SVC 133 or SVC 190. |
X'04AA' | User is in 31-bit mode but used a 24-bit parameter list (GETJV, SETJV or STAJV). |
X'04AB' | A new parameter was used in an old parameter list or the user set the flag byte to an invalid value (ERAJV, STAJV, etc.). |
X'04B0' | Field length is zero or area address is not defined. |
X'04B9' | An invalid value range was specified. |
The following return codes are returned in the event of incorrect initialization of the standard header (PARMOD=31):
X'0001FFFF': | The unit and/or function number in the header is not supported. |
X'0003FFFF': | The version number in the header refers to an interface version which is not supported. |
X'0004FFFF': | The parameter list is not aligned on a word boundary. |