One paragraph from AWS CardDemo, a sample mainframe application.
1350-WRITE-ACCT-RECORD.
WRITE OUT-ACCT-REC.
IF OUTFILE-STATUS NOT = '00' AND OUTFILE-STATUS NOT = '10'
DISPLAY 'ACCOUNT FILE WRITE STATUS IS:' OUTFILE-STATUS
MOVE OUTFILE-STATUS TO IO-STATUS
PERFORM 9910-DISPLAY-IO-STATUS
PERFORM 9999-ABEND-PROGRAM
END-IF.
EXIT.
From app/cbl/CBACT01C.cbl in AWS CardDemo. Copyright Amazon.com, Inc. or its affiliates. Licensed under the Apache License 2.0.
The row WikiMint writes for that paragraph on the CBACT01C page:
| Name | Risk | Synopsis |
|---|---|---|
| 1350-WRITE-ACCT-RECORD | Destructive | From the code: a paragraph that performs 9910-DISPLAY-IO-STATUS, 9999-ABEND-PROGRAM; writes OUT-FILE. |
The same paragraph's section on that page, in Confluence:
- For each paragraph: what it performs, the programs it calls, and the files it reads and writes.
- For each program:
LINKAGEitems, CICSLINKandXCTLtargets, CICS files, SQL tables and DD names. - For the application: a program index that links every page.
What WikiMint reads from COBOL and the other languages, row by row →
Run WikiMint on one application of up to 100 programs, free for 30 days. Larger applications are quoted on request. Your team checks the pages against the code.
Write to support@detentpoint.com to start one.