Documentation of file COMP_CR.CBL

Generated on 08/03/2005 22:17:27

Generated by CORECT 5.5.28


Working Storage Section
section declares
Slot / Record Program Contains redefines Is processed
WS_ACM

COMP_CR.CBL

Yes

WS_ANSWER

COMP_CR.CBL

Yes

WS_ANY_KEY

COMP_CR.CBL

Yes

WS_CLEAR_OK

COMP_CR.CBL

Yes

WS_COMP_DETAIL

COMP_CR.CBL

Yes

WS_COMPANY_NAME

COMP_CR.CBL

Yes

WS_ERR_MESS

COMP_CR.CBL

Yes

WS_PROG_TITLE

COMP_CR.CBL

Yes

WS_SEL_MESS

COMP_CR.CBL

Yes

WW_KEY1

COMP_CR.CBL

Yes

items not used
Slot / Record Program Contains redefines Is processed
WS_ACM

COMP_CR.CBL

Yes

WS_ANY_KEY

COMP_CR.CBL

Yes

WS_PROG_TITLE

COMP_CR.CBL

Yes

WW_KEY1

COMP_CR.CBL

Yes


Detail information of WS_ACM
Field Format Data Type Length Redefines
    WS_ACM

X(20)

Character

20


Detail information of WS_ANSWER
Field Format Data Type Length Redefines
    WS_ANSWER

X

Character

1


Detail information of WS_ANY_KEY
Field Format Data Type Length Redefines
    WS_ANY_KEY

X

Character

1


Detail information of WS_CLEAR_OK
Field Format Data Type Length Redefines
    WS_CLEAR_OK

9

Integer

1


Detail information of WS_COMP_DETAIL
Field Format Data Type Length Redefines
    WS_COMP_DETAIL

Group

       WS_CONTACT_NAME

X(20)

Character

20

       WS_COMP_TEL

X(20)

Character

20

       WS_COMP_FAX

X(20)

Character

20

       WS_COMP_ADDRESS1

X(20)

Character

20

       WS_COMP_ADDRESS2

X(20)

Character

20

       WS_COMP_ADDRESS3

X(20)

Character

20

       WS_COMP_ADDRESS4

X(20)

Character

20

       WS_COMP_PC

X(10)

Character

10


Detail information of WS_COMPANY_NAME
Field Format Data Type Length Redefines
    WS_COMPANY_NAME

X(20)

Character

20


Detail information of WS_ERR_MESS
Field Format Data Type Length Redefines
    WS_ERR_MESS

X(40)

Character

40


Detail information of WS_PROG_TITLE
Field Format Data Type Length Redefines
    WS_PROG_TITLE

X(20)

Character

20


Detail information of WS_SEL_MESS
Field Format Data Type Length Redefines
    WS_SEL_MESS

X(40)

Character

40


Detail information of WW_KEY1
Field Format Data Type Length Redefines
    WW_KEY1

Group

       WS_CO_REC_TYPE

X

Character

1

       WS_CO_ID

999

Integer

3

       WS_CO_NEXT_ID

999

Integer

3