Execution error : file 'direct' error code: 114, pc=0, call=1, seg=0 114 Attempt to access item beyond bounds of memory (Signal 11) I have been using Microfocus Server Express 5.1 WP 15. It gives error when I am trying to compile cobols.

Piyush Mehta 7 months ago

Execution error : file 'direct'
error code: 114, pc=0, call=1, seg=0
114 Attempt to access item beyond bounds of memory (Signal 11)

I have been using Microfocus Server Express 5.1 WP 15. It gives error when I am trying to compile cobols.

Any help is appreciated.

Thanks!!

Top Replies

Piyush Mehta 7 months ago in reply to Piyush Mehta +1

IDENTIFICATION DIVISION. PROGRAM-ID. PII. AUTHOR. PF/TR. * ENVIRONMENT DIVISION. CONFIGURATION SECTION. OBJECT-COMPUTER. ANY-THING. SPECIAL-NAMES. CONSOLE IS CRT. * DATA DIVISION. WORKING-STORAGE SECTION…

0 Greiner Claude 7 months ago

Only one source program? on wich os do you compile? Can you publish your cbl code for tests?
Cancel
Vote Up 0 Vote Down

Sign in to reply

Verify Answer

Cancel
0 Piyush Mehta 7 months ago in reply to Greiner Claude

All of the cobol programs. OS is RHEL 8.
Cancel
Vote Up 0 Vote Down

Sign in to reply

Verify Answer

Cancel
0 Piyush Mehta 7 months ago in reply to Piyush Mehta

       IDENTIFICATION DIVISION.
       PROGRAM-ID. PII.
       AUTHOR. PF/TR.
      *
       ENVIRONMENT DIVISION.
       CONFIGURATION SECTION.
       OBJECT-COMPUTER. ANY-THING.
       SPECIAL-NAMES. CONSOLE IS CRT.
      *
       DATA DIVISION.
       WORKING-STORAGE SECTION.
      *
       01 FULL-SCREEN         PIC X(1920).
      *
       01 DI-1 REDEFINES FULL-SCREEN.
           02 FILLER           PIC X(160).
           02 DI-TX1           PIC X(160).
           02 DI-TX2           PIC X(13).
           02 DI-TERM          PIC X(15).
           02 FILLER           PIC X(136).
           02 DI-TX3           PIC X(6).
           02 DI-PI            PIC X(15).
           02 FILLER           PIC X(1415).
      *
       01 DI-2 REDEFINES FULL-SCREEN.
           02 FILLER           PIC X(333).

           02 DI-TERM2         PIC X(15).
           02 FILLER           PIC X(142).
           02 DI-PI2           PIC X(15).
           02 FILLER           PIC X(1415).
      *
       01 WORK-AREA.
           02 PI               PIC S9V9(14).
           02 TERM             PIC S9V9(14).
           02 W                PIC S9V9(14).
           02 N                PIC 9999.
           02 N1               PIC 9999.
           02 N2               PIC 9999.
           02 ED               PIC -9.9(12).
      *
       01 CONSTANTS.
           02 TX1              PIC X(17) VALUE "CALCULATION OF PI".
           02 TX2              PIC X(12) VALUE "NEXT TERM IS".
           02 TX3              PIC X(5) VALUE "PI IS".
      *
       PROCEDURE DIVISION.
       LA-START.
           DISPLAY SPACE.
           MOVE SPACE TO FULL-SCREEN.
           MOVE TX1 TO DI-TX1.
           MOVE TX2 TO DI-TX2.
           MOVE TX3 TO DI-TX3.
           MOVE 0.5 TO ED.
           MOVE ED TO DI-TERM.
           MOVE 3 TO ED.
           MOVE ED TO DI-PI.
           DISPLAY DI-1.
           MOVE 0.5 TO PI.
           MOVE 0.5 TO TERM.
           MOVE 3 TO N.
       LOOP.
           MOVE N TO N2.
           SUBTRACT 2 FROM N2.
           MULTIPLY N2 BY N2.
           MULTIPLY N2 BY TERM.
           MOVE N TO N1.
           SUBTRACT 1 FROM N1.
           MULTIPLY N BY N1.
           MULTIPLY 4 BY N1.
           DIVIDE N1 INTO TERM.
           IF TERM < 0.0000000000001 THEN GO TO HALT.
           ADD TERM TO PI.
           MOVE PI TO W.
           MULTIPLY 6 BY W.
           MOVE W TO ED.
           MOVE ED TO DI-PI2.
           MOVE TERM TO ED.
           MOVE ED TO DI-TERM2.

           DISPLAY DI-2.
           ADD 2 TO N.
           IF N < 100 GO TO LOOP.
       HALT.
           STOP RUN.


thanks in advance!!
Cancel
Vote Up +1 Vote Down

Sign in to reply

Verify Answer

Cancel
Suggested Answer

0 Blair McDonald 7 months ago

Hi Piyush Mehta,

You mentioned in one of your replies that this is on RHEL 8. Server Express is not supported on Red Hat 7 or later. The supported product on RHEL 7 and 8 is Visual COBOL. Please let me know if you'd like someone from Micro Focus to reach out about options to upgrade to Visual COBOL. If you'd like to provide contact information, please send a Private Message.

Thanks!

Blair McDonald
Cancel
Vote Up 0 Vote Down

Sign in to reply

Verify Answer

Reject Answer

Cancel

Menu

Net Express / Server Express

Execution error : file 'direct' error code: 114, pc=0, call=1, seg=0 114 Attempt to access item beyond bounds of memory (Signal 11) I have been using Microfocus Server Express 5.1 WP 15. It gives error when I am trying to compile cobols.

Top Replies

Suggested Answer

Resources