COBOL Programming

CODE:

IDENTIFICATION DIVISION. PROGRAM-ID. HELLO.

DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-A PIC 9 VALUE 0. 01 WS-B PIC 9 VALUE 0. 01 WS-C PIC 9 VALUE 0.

PROCEDURE DIVISION. A-PARA. PERFORM B-PARA VARYING WS-C FROM 9 BY -1 UNTIL WS-C=0 AFTER WS-B FROM 9 BY -1 UNTIL WS-B=0 AFTER WS-A FROM 9 BY -1 UNTIL WS-A=0 PERFORM C-PARA VARYING WS-C FROM 9 BY -1 UNTIL WS-C=0 AFTER WS-B FROM 9 BY -1 UNTIL WS-B=0 PERFORM D-PARA VARYING WS-C FROM 9 BY -1 UNTIL WS-C=0 DISPLAY '0:0:0'. STOP RUN. B-PARA. DISPLAY WS-A ':' WS-B ':' WS-C. C-PARA. DISPLAY '0:' WS-B ':' WS-C. DISPLAY WS-B ':0:' WS-C. DISPLAY WS-B ':' WS-C ':0'.

D-PARA. DISPLAY '0:0:' WS-C. DISPLAY WS-C ':0:0'. DISPLAY '0:' WS-C ':0'.

Create a COBOL program to write all the outputs from the code provided, that meet the following constraint , to a file called SELECTED-OUTPUT D3 + D2 + D 1-10