Any body knows about cobol program i got this error in every program?

Question

" ** Run-Time Error: Can't find code file, Program: abcd, line: 00000 "

I got this error every time but compiler shows 0 error but when i'm run the program file i got this error.

(it's my program)
========================================================
IDENTIFICATION DIVISION.
PROGRAM-ID. SIMPLE.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT INPU ASSIGN TO DISK
ORGANIZATION IS LINE SEQUENTIAL.
SELECT OUTPU ASSIGN TO DISK
ORGANIZATION IS LINE SEQUENTIAL.
DATA DIVISION.
FILE SECTION.
FD INPU
LABEL RECORDS ARE STANDARD
VALUE OF FILE-ID IS "INPUT.DAT".
01 COMP-DET.
02 CNAME PIC X(10).
02 CMODEL PIC X(10).
02 CPRICE PIC X(5).
02 CSIZE PIC X(5).
FD OUTPU
LABEL RECORDS ARE STANDARD
VALUE OF FILE-ID IS "OUTPUT.DAT".
01 OUT-REC PIC X(80).
WORKING-STORAGE SECTION.
01 H1.
02 F PIC X(20) VALUE ALL "*".
02 F PIC X(30) VALUE "COMPUTER INFORMATION".
02 F PIC X(20) VALUE ALL "*".
01 H2.
02 F PIC X(80) VALUE ALL "+".
01 H3.
02 F PIC X(2) VALUE SPACES.
02 F PIC X(14) VALUE "COMPUTER NAME".
02 F PIC X(2) VALUE SPACES.
02 F PIC X(15) VALUE "COMPUTER MODEL".
02 F PIC X(2) VALUE SPACES.
02 F PIC X(15) VALUE "COMPUTER PRICE".
02 F PIC X(2) VALUE SPACES.
02 F PIC X(15) VALUE "COMPUTER SIZE".
01 DIS-REC.
02 F PIC X(5) VALUE SPACES.
02 CNAME PIC X(10) VALUE SPACES.
02 F PIC X(5) VALUE SPACES.
02 CMODEL PIC X(10) VALUE SPACES.
02 F PIC X(5) VALUE SPACES.
02 CPRICE PIC X(5) VALUE SPACES.
02 F PIC X(5) VALUE SPACES.
02 CSIZE PIC X(5) VALUE SPACES.
01 CH PIC X VALUE "Y".
PROCEDURE DIVISION.
MAIN-PARA.
OPEN OUTPUT INPU.
PERFORM DISP-PARA UNTIL CH="N".
CLOSE INPU.
OPEN INPUT INPU OUTPUT OUTPU.
PERFORM HEAD-PARA.
PERFORM PROC-PARA.
WRITE OUT-REC FROM H2.
CLOSE INPU OUTPU.
STOP RUN.

DISP-PARA.
DISPLAY "COMPUTER NAME".
ACCEPT CNAME OF COMP-DET.
DISPLAY "COMPUTER MODEL".
ACCEPT CMODEL OF COMP-DET.
DISPLAY "COMPUTER PRICE".
ACCEPT CPRICE OF COMP-DET.
DISPLAY "COMPUTER SIZE".
ACCEPT CSIZE OF COMP-DET.
WRITE COMP-DET.
DISPLAY "DO YOU WANT TO CONTINUE".
ACCEPT CH.
HEAD-PARA.
WRITE OUT-REC FROM H1.
WRITE OUT-REC FROM H2.
WRITE OUT-REC FROM H3.
WRITE OUT-REC FROM H2.
PROC-PARA.
MOVE CORR COMP-DET TO DIS-REC.
WRITE OUT-REC FROM DIS-REC.
==============================================
is that my program. pls any one find the reason for that error.

Advance thanks.

Answer 1

Not sure if this is the reason for your error, but you never read any INPU records after reopening it for input. Therefore, when you do your MOVE CORR, you could be picking up any old garbage in the buffer.

Answer 2

it extremely is stressful to assert given the little element you write yet each and every pc subject is solved in steps and the 1st may be to do the right upkeep, i.e, de-frag stressful rigidity, clean cashe, etc. Then do a plague test. After which you will possibly choose for to troubleshoot your registry. The record is going on however the formula keeps to be...do the least difficult and maximum rational first, proceed to the 2nd, so on. If all of those does no longer resolve, you will might desire to proceed with the subsequent. solid success to you.

Answer 3

No. I don't know about that program. I never heard about it before. And I think you should uninstall it. Because I think you got a VIRUS from that program.

Answer 4

Program: abcd



I don't see this any where in the coding.