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 |