COBOL PERFORM PARA

The following simple COBOL program depicts the use of 

       01 WS-SUB PIC 9(3) VALUE ZEROS.              DISPLAY ‘CALLING PARA USING PERFORM BY MAINFRAMEWIZARD.COM’              DISPLAY ‘PARA NAME IS  10000-FIRST-PARA’              DISPLAY ‘PARA NAME IS  20000-FIRST-PARA’              PERFORM  30000-THIRD-PARA.              DISPLAY ‘PARA NAME IS  25000-SECOND-PARA’.              DISPLAY ‘PARA NAME IS  30000-THIRD-PARA’              PERFORM  25000-SECOND-PARA. ; ; ; ;

The Output of the above program is as below:- PARA NAME IS  20000-FIRST-PARA                                                                                            PARA NAME IS  30000-THIRD-PARA                                                                                            PARA NAME IS  25000-SECOND-PARA                                                                                           CALLING PARA USING PERFORM BY MAINFRAMEWIZARD.COM                                                                         PARA NAME IS  10000-FIRST-PARA