Skip to content

COACTVWC

Source: cbl/COACTVWC.cbl

Type: CICS transaction program

LLM overview unavailable: Connection error.

CICS commands

HANDLE ABEND, XCTL, RETURN, SEND MAP, RECEIVE MAP, READ, SEND TEXT, SEND, ABEND

Copybooks

COACTVW, COCOM01Y, COTTL01Y, CSDAT01Y, CSMSG01Y, CSMSG02Y, CSUSR01Y, CVACT01Y, CVACT02Y, CVACT03Y, CVCRD01Y, CVCUS01Y, DFHAID, DFHBMSCA

Paragraph flow

flowchart TD
    0000_MAIN["0000-MAIN"]
    COMMON_RETURN["COMMON-RETURN"]
    0000_MAIN_EXIT["0000-MAIN-EXIT"]
    0000_MAIN_EXIT["0000-MAIN-EXIT"]
    1000_SEND_MAP["1000-SEND-MAP"]
    1000_SEND_MAP_EXIT["1000-SEND-MAP-EXIT"]
    1100_SCREEN_INIT["1100-SCREEN-INIT"]
    1100_SCREEN_INIT_EXIT["1100-SCREEN-INIT-EXIT"]
    1200_SETUP_SCREEN_VARS["1200-SETUP-SCREEN-VARS"]
    1200_SETUP_SCREEN_VARS_EXIT["1200-SETUP-SCREEN-VARS-EXIT"]
    1300_SETUP_SCREEN_ATTRS["1300-SETUP-SCREEN-ATTRS"]
    1300_SETUP_SCREEN_ATTRS_EXIT["1300-SETUP-SCREEN-ATTRS-EXIT"]
    1400_SEND_SCREEN["1400-SEND-SCREEN"]
    1400_SEND_SCREEN_EXIT["1400-SEND-SCREEN-EXIT"]
    2000_PROCESS_INPUTS["2000-PROCESS-INPUTS"]
    2000_PROCESS_INPUTS_EXIT["2000-PROCESS-INPUTS-EXIT"]
    2100_RECEIVE_MAP["2100-RECEIVE-MAP"]
    2100_RECEIVE_MAP_EXIT["2100-RECEIVE-MAP-EXIT"]
    2200_EDIT_MAP_INPUTS["2200-EDIT-MAP-INPUTS"]
    2200_EDIT_MAP_INPUTS_EXIT["2200-EDIT-MAP-INPUTS-EXIT"]
    2210_EDIT_ACCOUNT["2210-EDIT-ACCOUNT"]
    2210_EDIT_ACCOUNT_EXIT["2210-EDIT-ACCOUNT-EXIT"]
    9000_READ_ACCT["9000-READ-ACCT"]
    9000_READ_ACCT_EXIT["9000-READ-ACCT-EXIT"]
    9200_GETCARDXREF_BYACCT["9200-GETCARDXREF-BYACCT"]
    9200_GETCARDXREF_BYACCT_EXIT["9200-GETCARDXREF-BYACCT-EXIT"]
    9300_GETACCTDATA_BYACCT["9300-GETACCTDATA-BYACCT"]
    9300_GETACCTDATA_BYACCT_EXIT["9300-GETACCTDATA-BYACCT-EXIT"]
    9400_GETCUSTDATA_BYCUST["9400-GETCUSTDATA-BYCUST"]
    9400_GETCUSTDATA_BYCUST_EXIT["9400-GETCUSTDATA-BYCUST-EXIT"]
    SEND_PLAIN_TEXT["SEND-PLAIN-TEXT"]
    SEND_PLAIN_TEXT_EXIT["SEND-PLAIN-TEXT-EXIT"]
    SEND_LONG_TEXT["SEND-LONG-TEXT"]
    SEND_LONG_TEXT_EXIT["SEND-LONG-TEXT-EXIT"]
    ABEND_ROUTINE["ABEND-ROUTINE"]
    0000_MAIN --> 1000_SEND_MAP
    0000_MAIN --> 2000_PROCESS_INPUTS
    0000_MAIN --> 9000_READ_ACCT
    0000_MAIN -.-> COMMON_RETURN
    0000_MAIN --> SEND_PLAIN_TEXT
    1000_SEND_MAP --> 1100_SCREEN_INIT
    1000_SEND_MAP --> 1200_SETUP_SCREEN_VARS
    1000_SEND_MAP --> 1300_SETUP_SCREEN_ATTRS
    1000_SEND_MAP --> 1400_SEND_SCREEN
    2000_PROCESS_INPUTS --> 2100_RECEIVE_MAP
    2000_PROCESS_INPUTS --> 2200_EDIT_MAP_INPUTS
    2200_EDIT_MAP_INPUTS --> 2210_EDIT_ACCOUNT
    2210_EDIT_ACCOUNT -.-> 2210_EDIT_ACCOUNT_EXIT
    9000_READ_ACCT -.-> 9000_READ_ACCT_EXIT
    9000_READ_ACCT --> 9200_GETCARDXREF_BYACCT
    9000_READ_ACCT --> 9300_GETACCTDATA_BYACCT
    9000_READ_ACCT --> 9400_GETCUSTDATA_BYCUST

Paragraphs

Paragraph Line Performs
0000-MAIN 262 YYYY-STORE-PFKEY, 1000-SEND-MAP, 2000-PROCESS-INPUTS, 1000-SEND-MAP, 9000-READ-ACCT, 1000-SEND-MAP
COMMON-RETURN 394
0000-MAIN-EXIT 408
0000-MAIN-EXIT 411
1000-SEND-MAP 416 1100-SCREEN-INIT, 1200-SETUP-SCREEN-VARS, 1300-SETUP-SCREEN-ATTRS, 1400-SEND-SCREEN
1000-SEND-MAP-EXIT 427
1100-SCREEN-INIT 431
1100-SCREEN-INIT-EXIT 457
1200-SETUP-SCREEN-VARS 460
1200-SETUP-SCREEN-VARS-EXIT 537
1300-SETUP-SCREEN-ATTRS 541
1300-SETUP-SCREEN-ATTRS-EXIT 574
1400-SEND-SCREEN 577
1400-SEND-SCREEN-EXIT 592
2000-PROCESS-INPUTS 596 2100-RECEIVE-MAP, 2200-EDIT-MAP-INPUTS
2000-PROCESS-INPUTS-EXIT 607
2100-RECEIVE-MAP 610
2100-RECEIVE-MAP-EXIT 619
2200-EDIT-MAP-INPUTS 622 2210-EDIT-ACCOUNT
2200-EDIT-MAP-INPUTS-EXIT 645
2210-EDIT-ACCOUNT 649
2210-EDIT-ACCOUNT-EXIT 683
9000-READ-ACCT 687 9200-GETCARDXREF-BYACCT, 9300-GETACCTDATA-BYACCT, 9400-GETCUSTDATA-BYCUST
9000-READ-ACCT-EXIT 720
9200-GETCARDXREF-BYACCT 723
9200-GETCARDXREF-BYACCT-EXIT 771
9300-GETACCTDATA-BYACCT 774
9300-GETACCTDATA-BYACCT-EXIT 821
9400-GETCUSTDATA-BYCUST 825
9400-GETCUSTDATA-BYCUST-EXIT 870
SEND-PLAIN-TEXT 877
SEND-PLAIN-TEXT-EXIT 888
SEND-LONG-TEXT 896
SEND-LONG-TEXT-EXIT 907
ABEND-ROUTINE 916