RECORD raised at 1002 in YCBLUFNK1I ONCODE 22

Products

• CA 2E

Issue/Introduction

When an user tries to generate a function involving COBOL type EXCUSRSRC functions, at times there is an error message:

RECORD raised at 1002 in YCBLYFNK1I

Environment

CA 2E 8.7.x

Cause

The data area YHLLCBLRFA (model value YHLLCBL) controls the version of COBOL (COBOL/74 or COBOL/85) being used in the CA 2E model.

Each version has an associated default source physical file where the corresponding source COBOL source members are placed. The information about the default source physical file are stored in the YGENTYPRFP file in the CA 2E model.

If the data area contains '*CBL74', COBOL/74 version of COBOL is being used and the source type is considered as 'CBL'. In this case, the default source physical file is "QCBLSRC".

If the data area contains '*CBL85', COBOL/85 version of COBOL is being used and the source type is considered as 'LBL'. In this case, the default source physical file is "QLBLSRC".

If the source type is 'CBI', irrespective of COBOL version, the source type is considered as 'CBI'. In this case, the default source physical file is "QCBLLESRC".

Additional logic exists for the special case when an user specifies both CBL and CBI source types to use the same source physical file.

In this case, the QCBLLESRC file definition and associated variable length of 102 will be used during the generation of functions involving the EXCUSRSRC type functions.

When the default source physical file associated with "CBI" source type in the YGENTYPRFP file is set to be "QLBLSRC"/"QCBLSRC", similar to what is being used for "LBL" source type/"CBL" source type, when an user generates any function containing EXCUSRSRC functions in the 2E model, the reported error is returned.

Resolution

Keep the default source physical files for CBL and CBI source types different from each other, in the <2E Model>/YGENTYPRFP file.

Recommended settings for default source physical file names are:

• "QCBLLESRC" for "CBI" source type
• "QCBLSRC" for "CBL" source type
• "QLBLSRC" for "LBL" source type

If further assistance is required, please contact Broadcom Support.