Message class 2004 - COBOL wrapper

This section describes error messages which can occur in the COBOL Wrapper. All COBOL Wrapper messages are in message class 2004.

The messages have the format:

2004nnnn

where

2004

is the message class, and

nnnn

is the message number in the range 0000 - 9999

20040001Unbounded Arrays without maximum upper bounds not supported: <library>/<program>/< parameter>/<index>

Explanation

Unbounded arrays without maximum upper bounds are supported for RPC clients on operating system z/OS with the following interface types:

  • CICS with Standard Linkage Calling Convention
  • Batch with Standard Linkage Calling Convention
  • IMS BMP with Standard Linkage Calling Convention
  • IMS MPP with Standard Linkage Calling Convention

    Code generation for other Client Interface Types, other operating systems or RPC servers force this error message.

    The appendix of the message gives you the library, program, parameter name and index definition of the IDL parameter causing the error.

Action

Try to use a supported interface type and re-generate.

20040002<idl-data-type> without maximum length not supported: <library>/<program>/< parameter>

Explanation

The following IDL data types below are not supported if no maximum length is given:

BV

Binary variable length.

AV

Alphanumeric variable length.

KV

Kanji variable length.

The appendix of the message gives you the library, program and parameter name of the IDL parameter causing the error.

Action

Adapt your IDL accordingly and re-generate.

20040003Invalid CSECT name <CSECT-name> for target Compiler <compiler>: <library>/<program>

Explanation

The program-name or program-alias in the IDL contains characters not allowed for CSECT names. The appendix of the message gives you the library and program of the IDL parameter causing the error.

Action

Adapt your IDL accordingly and re-generate.

20040004IDL data type <idl-data-type> not supported: <library>/<program>/<parameter>

Explanation

The following IDL data types are not supported:

UV

Unicode variable length

U

Unicode

Action

Adapt your IDL accordingly and re-generate your client and server interface objects.

20040005Missing option TARGET - (BATCH_ZOS/BATCH_VSE/BATCH_BS2000/ BATCH_I5OS/CICS_ZOS/CICS_VSE/ IMS_MPP/IMS_BMP/ IDMS_ZOS)

Explanation

No option TARGET was specified during generation. TARGET is a required option.

Action

Specify the option TARGET.

20040006Wrong option <target-option> for TARGET - (BATCH_ZOS/BATCH_VSE/BATCH_BS2000/BATCH_I5OS/ CICS_ZOS/CICS_VSE/IMS_MPP/IMS_BMP/ IDMS_ZOS)

Explanation

A wrong option TARGET was specified during generation. Valid targets are BATCH_ZOS, BATCH_VSE, BATCH_BS2000, BATCH_I5OS, CICS_ZOS, CICS_VSE, IMS_MPP and IMS_BMP.

Action

Specify a correct option TARGET.

20040007Wrong option <literal-option> for LITERAL - (QUOTE/APOST)

Explanation

A wrong option LITERAL was specified during generation. Valid values for literal are QUOTE and APOST.

Action

Specify a correct option LITERAL.

20040008Wrong option <comm-option> for COMM - (LINKAGE/EXTERNAL/COPYBOOK)

Explanation

A wrong option COMM was specified during generation. Valid values for option COMM are LINKAGE, EXTERNAL and COPYBOOK.

Action

Specify a correct option COMM.

20040009Wrong option <rpc_highest-option> for RPC_HIGHEST - (1110/1120/1130/1140/2000/2020)

Explanation

A wrong option RPC_HIGHEST was specified during generation. Valid values for option RPC_HIGHEST are 1110, 1120, 1130, 1140, 2000 and 2020.

Action

Specify a correct option RPC_HIGHEST.

20040010K/KV cannot be mapped to PIC G: <library>/<program>/<parameter>

Explanation

The IDL type K or KV (Kanji) was specified with an uneven length. This runs into conflict with COBOL data type GRAPHIC, which requires exactly half the length of IDL type K/KV.

For example, the IDL

1 MyKanji (K10)

corresponds to the COBOL

01 MyKanji  PIC G(5) DISPLAY-1.
Action

Correct your EntireX IDL file to contain an even length for IDL types K/KV.

20040011Wrong option <option> for INTERFACE - (DFHCOMMAREA/DFHLBUFFER/DFHCHANNEL/LINKAGE)

Explanation

A wrong value for the option INTERFACE is specified.

Action

Specify a valid value for the option INTERFACE. For more information, see the error message or documentation for valid values.

20040012Wrong option combination <interface>/<target> for INTERFACE/TARGET

Explanation

Wrong values for the options INTERFACE and TARGET are specified.

Action

Specify a valid combination for the options INTERFACE and TARGET. Refer to Using the COBOL Wrapper in Command-line Mode for valid combinations.

20040013Server stubs required only for IMS

Explanation

This is an internal error.

Action

Contact Software AG Support.

20040014Maximum length for CICS container name is 16 characters: <library>/<program>/<parameter>/<container>[text]

Explanation

Container names are restricted to 16 characters by CICS. An optional text gives more information.

Action

Depending on the situation:

  • Shorten the structure name representing the container in the IDL to fit to this restriction.
  • If variable number of containers are used with an IDL unbounded array (see array-definition) with maximum, restrict the number of containers.

    For more information, see CICS Channel Container IDL Rules.

20040015IDL not valid for CICS with channel container calling convention: <library>/<program>/<parameter>[text]

Explanation

The IDL mapped to CICS programs with channel container calling convention may only contain IDL structures and IDL programs with references to this structures. An optional text gives more information.

For more information, see CICS Channel Container IDL Rules.

Action

Correct your IDL and retry.

20040016CICS container <container> already used for <direction> : <library>/<program>/<parameter>

Explanation

Container for CICS must be unique for input as well as for output. You cannot use them twice. In an IDL program an IDL structure, representing a container, is referenced twice for the same direction.

Action

Correct your IDL and retry.

20040017IDL requires RPC protocol <protocol> - downgrade not possible

Explanation

Depending on the IDL types given in your IDL, a minimum RPC protocol version is required. You can upgrade it but never go beyond this lower limit.

Action

Specify the RPC protocol version <protocol> and re-generate.

20040018Sent length <length> exceeds 24580 DFHCOMMAREA length: <library>/<program>

Explanation

The client interface object is generated with interface type DFHCOMMAREA Calling Convention. It is called with EXEC CICS LINK from the calling application. This message is a warning issued during generation and tells you that the DFHCOMMAREA of a generated client interface object requires more than 24 KB to send the data (IN and INOUT IDL parameters). Certain restrictions apply depending on how you plan to call the client interface:

  • Distributed program link (DPL)That is, the calling application program is in a CICS that is different from the client interface object. For more information, see the IBM documentation of EXEC CICS LINK for 24 KB limitations. For more information, see IBM's APAR PQ06624.
  • Program link within the same CICSThe normal upper limit for the length of the CICS COMMAREA is approx. 32 KB.

    The appendix of the message gives you the IDL library and IDL program causing the warning.

Action

Depending on the situation:

  • If the client interface object exceeds 32 KB it is not possible to use the interface type CICS with DFHCOMMAREA. Use the interface type DFHCOMMAREA Calling Convention instead.
  • For distributed program links, see your IBM CICS documentation of EXEC CICS LINK for further information.

20040019Receive length of <length> exceeds 24580 DFHCOMMAREA length: <library>/<program>

Explanation

The client interface object is generated with interface type DFHCOMMAREA Calling Convention. It is called with EXEC CICS LINK from the calling application. This message is a warning issued during generation and tells you that the DFHCOMMAREA of a generated client interface object requires more than 24 KB to receive the data (OUT and INOUT IDL parameters). Certain restrictions apply depending on how you plan to call the client interface:

  • Distributed program link (DPL)That is, the calling application program is in a CICS that is different from the client interface object. For more information, see the IBM documentation of EXEC CICS LINK for 24 KB limitations. For more information, see IBM's APAR PQ06624.
  • Program link within the same CICSThe normal upper limit for the length of the CICS COMMAREA is approx. 32 KB.

    The appendix of the message gives you the IDL library and IDL program causing the warning.

Action

Depending on the situation:

  • If the client interface object exceeds 32 KB it is not possible to use the interface type CICS with DFHCOMMAREA. Use the interface type DFHCOMMAREA Calling Convention instead.
  • For distributed program links, see your IBM CICS documentation of EXEC CICS LINK for further information.

20040020Valid start level for data items in COPYBOOKS is from 1 thru 49

Explanation

The COBOL programming language allows level numbers for data items in the range from 1 thru 49.

Action

Specify a valid starting level.

20040021BS2000 does not support DBCS i.e. K/KV: <library>/<program>/<parameter>

Explanation

BS2000 does not support DBCS.

Action

Try to map the data to IDL B/BV (binary).

20040022Wrong option <servercopybooks> for SERVERCOPYBOOKS - (TRUE/FALSE)

Explanation

The wrong value for the option was specified.

Action

Specify TRUE or FALSE.

20040023Copybooklevel forced to 01 because of OCCURS DEPENDING ON: <library>/<program>

Explanation

If the IDL contains unbounded arrays, the copybooklevel cannot be set to greater than 1.

Action

None.

20040024Generation of server not supported for TARGET - (IMS_MPP/IDMS_ZOS)

Explanation

RPC server for this environment cannot be generated with the COBOL Wrapper.

Action

None.

20040025COBOL program name contains more than <number-of-characters> : <library>/<program>

Explanation

COBOL for your environment supports a maximum length of <number-of-characters> characters for user-defined words depending on context (operating system etc.).

The appendix of the message gives you the IDL library and IDL program causing the warning.

Action

Reduce the length of the IDL program name to meet COBOL restrictions.

20040026IDL program alias contains more than 31 characters : <library>/<program>

Explanation

COBOL supports a maximum length of 31 characters for user defined words.

The appendix of the message gives you the IDL library and IDL program causing the warning.

Action

Reduce the length of the IDL program alias to meet COBOL restrictions.

20040027IDL program name contains more than 7 characters for option SERVERCOPYBOOKS : <library>/<program>

Explanation

A maximum of 7 characters is supported in this context for COBOL RPC server names.

The appendix of the message gives you the IDL library and IDL program causing the warning.

Action

Reduce the length of the IDL program name to meet the restriction.

20040028IDL program name contains more than 7 characters : <library>/<program>

Explanation

This is a special purpose message.

Action

Contact Software AG Support.

20040029Wrong option combination <interface>/<comm> for INTERFACE/COMM

Explanation

Wrong values for the options INTERFACE and COMM are specified.

Action

Specify a valid combination for the options INTERFACE and COMM. For more information, see Using the COBOL Wrapper in Command-line Mode for valid combinations.

20040030Option value <option> too long. A maximum of 32 characters is allowed.

Explanation

The value specified for the option is too long. Options are BROKER, CLASS, SERVER or SERVICE.

Action

Shorten the length for the option and retry generation.

20040031Wrong option combination <target>/<comm> for TARGET/COMM

Explanation

Wrong values have been specified for the options TARGET and COMM.

Action

Specify a valid combination for the options TARGET and COMM. For more information, see Using the COBOL Wrapper in Command-line Mode for valid combinations.

20040032IDL Library name (<library>) too long. A maximum of 127 characters is allowed

Explanation

The IDL library name is too long to generate a COBOL server.

Action

Shorten the length for the IDL library and retry generation.

20040033IDL program name (<library>) too long. A maximum of 127 characters is allowed. IDL Library name is <library>

Explanation

The IDL program name is too long to generate a COBOL server.

Action

Shorten the length for the IDL program and retry generation.

20040034IDL program has a client-side mapping (CVM). COBOL RPC clients not supported: <library>/<program>

Explanation

RPC clients generated with the COBOL Wrapper do not support server mapping files (.cvm). The appendix of the message gives you the IDL library and IDL program name causing the error.

Action

None.

20040035N/NU/P/PU with more than <n> digits not supported for <target-option>: <library>/<program>/< parameter>/<index>

Explanation

For COBOL, the total number of digits for IDL datatypes N, NU, P and PU depends on the environment. For more information, see Mapping IDL Data Types to COBOL Data Types. The appendix of the message gives you the library, program, parameter name and index definition of the IDL parameter causing the error.

Action

Reduce the number of digits and re-generate.

20040101Function not implemented

Explanation

Generic RPC function not implemented.

Action

Contact Software AG Support.

20040102Invalid Argument(s) supplied

Explanation

Invalid Generic RPC function was given.

Action

Correct your program, specify a valid generic RPC function and retry.

20040103Library missing

Explanation

No Library name was given.

Action

Provide a library in the RPC Communcation Area.

20040104User ID missing

Explanation

No user ID was given.

Action

Provide a user ID in the RPC Communcation Area.

20040105Not in reliable state CLIENT-COMMIT

Explanation

Generic RPC function issued only valid for reliable message(s) started with CLIENT-COMMIT.

Action

Correct your program and retry.

20040106Invalid reliable state

Explanation

This is an internal error.

Action

Contact Software AG Support.

20040107Conversations mixed with reliable msgs

Explanation

You tried to open a conversation while you are within a reliable message sequence.

Action

Correct your program and retry.

20040108No active UOWID found

Explanation

You tried to get the reliable state of a UOW, but there is no UOWID in the RPC communication area.

Action

Correct your program and retry.

20040109COMMAREA length not valid

Explanation

The length of the DFHCOMMAREA defined in the EXEC CICS LINK statement when calling a client interface object of interface type DFHCOMMAREA Calling Convention is too short. For more information, see Using the COBOL Wrapper for CICS with DFHCOMMAREA Calling Convention (z/OS and z/VSE) under Using the COBOL Wrapper for the Client Side.

Action

Correct your client CICS application.

20040110Unknown CICS error <error> during call to COBSRVI

Explanation

During call of the generic RPC services module (COBSRVI) by your client interface object the CICS error <error> occurred.

Action

For more information, see your IBM CICS documentation.

20040111COBSRVI not found

Explanation

The generic RPC services module (COBSRVI) was not found by your client interface object.

Action

Check if the generic RPC service module is available in your environment.

20040112Broker stub <stub-name> could not be loaded

Explanation

You dynamically call the broker stub with the COBOL Wrapper, but the broker stub called could not be found in the environment.

Action

Check the following possibilities:

  • Check if the broker stubs are correctly installed in your target environment and are accessible from your application.
  • Possibly customize the subprogram DOBROKER in the Generic RPC Service module for a valid broker stub name of your target environment.
  • Possibly recompile the Generic RPC Service module and rebuild your application. Proceed as described under Using the COBOL Wrapper.

20040113Invalid COBOL Wrapper API version

Explanation

The API version for the COBOL Wrapper is wrong.

Action

Specify a correct API version in the field COMM-VERSION of the RPC communication area. For more information, see The RPC Communication Area (Reference).

20040114TRANSFER to <broker-stub> returns with <error-status>

Explanation

The TRANSFER CONTROL within IDMS to the broker stub failed.

Action

For more information, see <error-status> and refer to the IDMS documentation.

20040115Wrong data in parameter <idl-parameter-name>

Explanation

The data contained in the parameter <idl-parameter-name> does not match the COBOL data type.

Action

Check the value of the parameter, correct it and rerun the program.

20040116Upper bound overflow in <occurs-depending-on-index>

Explanation

The actual value provided in an index for an OCCURS DEPENDING ON is higher than the maximum upper bound defined for an IDL unbounded array, see array-definition under Software AG IDL Grammar in the IDL Editor documentation. For the parameter name, see the generated copybook (see IDL Interface Copybooks) and <occurs-depending-on-index>.

Action

Check the value of the parameter, correct it and rerun the program.

20040117Negative value in <occurs-depending-on-index>

Explanation

The actual value provided in an index for an OCCURS DEPENDING ON is negative. For the parameter name, see the generated copybook (see IDL Interface Copybooks) and <occurs-depending-on-index>.

Action

Check the value of the parameter, correct it and rerun the program.

20040118Natural Security Token length error

Explanation

The COMM-SECURITY-TOKEN-LENGTH variable in the RPC Communication Area contains an invalid length. For more information, see The RPC Communication Area (Reference) in the COBOL Wrapper documentation.

Action

Check if the RPC Communication Area is initialized properly. For more information, see Step 1: Declare and Initialize the RPC Communication Area under Writing Standard Call Interface Clients in the COBOL Wrapper documentation.

20040119ODO content is not a rectangle or cuboid

Explanation

In COBOL, all vectors in a dimension must have the same length. A 2-dimensional array forms a rectangle, and a 3-dimensional array forms a cuboid. For more information, see Three-dimensional Array with Variable Upper Bounds under Software AG IDL Grammar in the IDL Editor documentation.

Action

Correct your program, IDL and RPC server and retry.

20040120Memory shortage

Explanation

No storage was assigned with the COBOL ALLOCATE statement. A NULL pointer was returned.

Action

Try to find the cause of the error. If you are executing in Batch, for example, the possible cause could be memory restrictions defined with the job card.

20040121ACI Version 10 or higher required

Explanation

The highest possible ACI version possible is determined by the COBOL Wrapper automatically resulting in ACI version less than 10. Features you are using require at least ACI version 10.

Action

Check the version of the broker stub used. If you are using broker kernel, check its version. If you are using Direct RPC, check the version of the EntireX Adapter.

20040122Broker Password length error (max <maximum>)

Explanation

The Broker password (COMM-ETB-PASSWORD-LENGTH) in the RPC Variable String Area (copybook ERXVSTR) is longer than supported.

Action

Correct your program and retry.

20040123RPC Library length error (max <maximum>)

Explanation

The RPC library (COMM-RPC-LIBRARY-LENGTH) in the RPC Variable String Area (copybook ERXVSTR) is longer than supported.

Action

Correct your program and retry.

20040124RPC User ID length error (max <maximum>)

Explanation

The RPC user ID (COMM-RPC-UID-LENGTH) in the RPC Variable String Area (copybook ERXVSTR) is longer than supported.

Action

Correct your program and retry.

20040125RPC Password length error (max <maximum>)

Explanation

The RPC password (COMM-RPC-PWD-LENGTH) in the RPC Variable String Area (copybook ERXVSTR) is longer than supported.

Action

Correct your program and retry.

20040126RPC string buffer too small

Explanation

If you are using COMM-VERSION 4000 and the RPC Variable String Area (copybook ERXVSTR), check if the length of the RPC library, RPC user ID and RPC password provided in the RPC Variable String are correct.

Action

Correct your program and retry.