CONNX and SCT Import Rules

The rules below describe the SCT import logic.

  1. A data file is imported in its entirety ONLY if the table will not be split into multiple logical CONNX tables. An exception is the ADFILE. This table will always be imported in addition to the ADFILE logical tables. The ADFILE table is for use in the CNXPREFERENCE address selection logic.

  2. If there are CONNX tables of more than 250 fields, the table is divided into multiple tables to accommodate Microsoft Access. The first table contains the first 250 columns and is appended with the suffix "_1". Each subsequent table contains the key information and the next 1-250 fields, and is appended in ascending order "_2", "_3", and so on.

All arrays are automatically rotated unless one of the following is true:

  • The array is nested - meaning that the current segment is already a rotated array.

  • The segment contains less than 150 fields.

  1. Redundant Redefines are removed if all of the below are true.

  • The field number is greater than 5 and does not contain the words "Phone," "Fax," or "Zip."

  • The field is longer than 13 bytes.

  • The redefined field is directly next to the field in question.

  • The redefined field is directly next to the field and the base portions of the field names are identical.

  • The offsets are identical.

  • The array offsets are identical.

Following is an example of a redundant redefine:

 When the SCT Cobol FD import is executed this SG-LN-DISB-DATES-RED REDEFINES SG-LN-DISB-DATES line decribed below will not be imported in the CONNX CDD. CONNX skips the field based on the redundant field SCT import rules. Alternatively, the SG-LN-D-DT-1, SG-LN-D-DT-2, SG-LN-D-DT-3 and SG-LN-D-DT-4 fields are imported.

Excerpt from SCT Cobol FD SI$SOURCE:SCSGRC.LIB

07 SG-LN-DISB-DATES-RED REDEFINES SG-LN-DISB-DATES.
* SGN34 (042)
09 SG-LN-D-DT-1 PIC 9(08) COMP-3. 
* SGN35 (047)
09 SG-LN-D-DT-2 PIC 9(08) COMP-3. 
* SGN36 (052)
09 SG-LN-D-DT-3 PIC 9(08) COMP-3. 
* SGN37 (057)
09 SG-LN-D-DT-4 PIC 9(08) COMP-3. 
  1. Field groups are removed if they are greater than 50 bytes. (The definition of a field group is a field containing multiple data elements represented as a single element or field in the Cobol FD.)

  2. The field contains non-ASCII data (as with the Packed Decimal data type.)

  3. The field is not one of the first five fields of the record segment.

    In the following example,  "03 PR-DATA PIC x(330)" line below for a length of 330 characters is a field group. The "03 PR-920-DATA REDEFINES PR-DATA" line in the COBOL FD breaks down the PR-DATA into 48 individual fields. The fields have different data types, yet the PR-DATA field group is defined as a string. Since the 48 fields are varying data types and the PR-DATA field is a string data type, if PR-DATA was imported and displayed the results would be garbled data.

    Excerpt from SCT Cobol FD HR$SOURCE:ECEJRC.LIB:

03 PR-DATA PIC X(330).
03 PR-920-DATA REDEFINES PR-DATA.
05 PR-GROUP.
07 PR-FSCL-YR  PIC X(02).
07 PR-POS-N  PIC X(06).
07 FILLER  PIC X(01).
05 PR-OPEN-DATE  PIC 9(08).
05 PR-EXPIR-DATE  PIC 9(08).
05 PR-APPLIC-DEADLINE  PIC 9(08).
05 PR-REQ-TYPE  PIC X(01).
05 PR-STATUS  PIC X(02).
05 PR-STATUS-DATE  PIC 9(08).
05 PR-PRIOR-STATUS  PIC X(02).
05 PR-PRIOR-STATUS-DATE  PIC 9(08).
05 PR-ORG-CD.
07 PR-DIVISION  PIC X(03).
07 PR-DEPARTMENT  PIC X(05).
07 PR-UNIT  PIC X(05).
05 PR-JOB-GROUP  PIC X(01).
05 PR-JOB-CLASS  PIC X(04).
05 PR-EEO-OCCUP-CODE  PIC X(03).
05 PR-EEO-JOB-GROUP  PIC X(02).
05 PR-POS-TYPE  PIC X(01).
05 PR-REPL-POS-NO PIC X(06).
05 PR-POS-EX  PIC X(01).
05 PR-AUTH-HIRE-DATE PIC 9(08).
05 PR-RELOC-IND  PIC X(01).
05 PR-POS-FILL-DATE  PIC 9(08).
05 PR-POS-VAC-DATE  PIC 9(08).
PR-AUTHORIZATION-CODES.
07 PR-AUTH-CODE  PIC X(03)
OCCURS 5 TIMES.
05 PR-RECRUITER-ID  PIC X(15).
05 PR-HIRING-MGR-ID  PIC X(15).
05 PR-SUCCESS-ID  PIC X(15).
05 PR-COMMITTEE-IND PIC X(02).
05 PR-SHIFT-IND  PIC X(01).
05 PR-SUPER-RESPONSE PIC X(01).
05 PR-TOT-ADVERT-COST  PIC S9(7)V99 COMP-3.
05 PR-GEOG-AREA  PIC X(05).
05 PR-FTE  PIC (1)V9(5) COMP-3.
05 PR-WORK-HRS  PIC X(05).
05 PR-RANK  PIC X(30).
05 PR-TRACK  PIC X(01).
05 PR-TENURE  PIC X(01).
05 PR-ORIG-OPER-ID  PIC X(06).
05 PR-LAST-OPER-ID  PIC X(06).
05 PR-LAST-ACT-DATE  PIC 9(08).
05 PR-COMMENT  PIC X(50).
05 PR-920-USER-FILLER  PIC X(20).
  1. Redundant arrays are removed if all of the below are true.

  1. The redundant array is directly next to the array in question.

  2. The offsets are identical.

  3. The base portion of the field names is identical.

Following is an example of a redundant array.

The AA-SR-INFO-FLAG line shown below is the only line imported into the CONNX CDD for the AA-SR-INFO-FLAG field. The redundant array rule directs CONNX to skip the fields labeled AA-SR-INFO-FLAG-1 through AA-SR-INFO-FLAG-30. These fields are simply redefines of the imported field AA-SR-INFO-FLAG. If imported along with the AA-SR-INFO-FLAG they would create redundancy and clutter the CDD with unnecessary fields.

Excerpt from SCT COBOL FD SI$SOURCE:ACAARC.LIB:

05 AA-SR-INFO-FLAGS.
07 AA-SR-INFO-FLAG  PIC X(01)
OCCURS 30.
05 AA-SR-INFO-FLAGS-RED REDEFINES AA-SR-INFO-FLAGS.
07 AA-SR-INFO-FLAG-1  PIC X(01).
07 AA-SR-INFO-FLAG-2  PIC X(01).
07 AA-SR-INFO-FLAG-3  PIC X(01).
07 AA-SR-INFO-FLAG-4  PIC X(01).
07 AA-SR-INFO-FLAG-5  PIC X(01).
07 AA-SR-INFO-FLAG-6  PIC X(01).
07 AA-SR-INFO-FLAG-7  PIC X(01).
07 AA-SR-INFO-FLAG-8  PIC X(01).
07 AA-SR-INFO-FLAG-9  PIC X(01).
07 AA-SR-INFO-FLAG-10  PIC X(01).
07 AA-SR-INFO-FLAG-11  PIC X(01).
07 AA-SR-INFO-FLAG-12  PIC X(01).
07 AA-SR-INFO-FLAG-13  PIC X(01).
07 AA-SR-INFO-FLAG-14  PIC X(01).
07 AA-SR-INFO-FLAG-15  PIC X(01).
07 AA-SR-INFO-FLAG-16  PIC X(01).
07 AA-SR-INFO-FLAG-17  PIC X(01).
07 AA-SR-INFO-FLAG-18  PIC X(01).
07 AA-SR-INFO-FLAG-19  PIC X(01).
07 AA-SR-INFO-FLAG-20  PIC X(01).
07 AA-SR-INFO-FLAG-21  PIC X(01).
07 AA-SR-INFO-FLAG-22  PIC X(01).
07 AA-SR-INFO-FLAG-23  PIC X(01).
07 AA-SR-INFO-FLAG-24  PIC X(01).
07 AA-SR-INFO-FLAG-25  PIC X(01).
07 AA-SR-INFO-FLAG-26  PIC X(01).
07 AA-SR-INFO-FLAG-27  PIC X(01).
07 AA-SR-INFO-FLAG-28  PIC X(01).
07 AA-SR-INFO-FLAG-29  PIC X(01).
07 AA-SR-INFO-FLAG-30  PIC X(01).
  1. The array to be removed is the flattened CONNX array (occur clause) if the segment is already a rotated array (nested array).

  2. The array to be removed is the SCT explicit redefine if the segment is not a rotated array. CONNX then rotates the array, negating the need for the redundant SCT explicit array redefine. 

Related Topics

CHICLET.JPG To import from RMS SCT COBOL FD files

CHICLET.JPG To perform an RMS SCT DBD Overlay Import