01 VAR1 COMP-2 VALUE 0.
MOVE 10.2115 TO VAR1.
DISPLAY 'VAR1 =' VAR1.
10.2115 is stored as .10211499999999996E 02 in OS VS Cobol
10.2115 is stored as .10211500000000000E 02 in ecobol.
Any reason why?
after udatingg first 110 rows, my job abends. now how do i
change my cobol program so that when i restart the Job it
will start updating from 111th row ( i.e in next run I
di=ont want to update those 110 rows which are already been
updated in the first run before job abend)
I have two sequential files, FILE-1 and FILE-2.
FILE-1 contains 2 columns(A,B) and FILE-2 contains 3 columns
(C,D,E).I want an output file, FILE-3 which has all five
columns with duplicates eliminated from column A.
01 NAME1 PIC X(13) VALUE "COBOL PROGRAMMING".
01 NAME2 PIC X(13).
now I want to display the value of NAME1 in reverse order
i.e value should be displayed as "GNIMMARGORP LOBOC"
HOW can I do that ??? please let me know if any one knows
I have PS flat file with 14 records. I want to read from
4th to 9th record and want to write those 6 records (4th
record to 9th record) to another PS file (output file).
there is no key defined in the input file. I just want read
a certain Consecutive records. can any one please give me
the procedure division Coding for this. I have coded the
below coding but the READ-PARA is performing only 1 time
even though I have 14 records in my input file (i.e FILE-1):
MOVE 0 TO I.
OPEN INPUT FILE-1.
IF CHECK-KEY1 > 0
DISPLAY "OPEN ERROR FOR FILE-1, CODE IS:" CHECK-KEY1
OPEN EXTEND NEWFILE-1
IF CHECK-KEY3 > 0
DISPLAY "OPEN ERROR FOR NEWFILE-1 COD IS" CHECK-KEY3
PERFORM READ-PARA THRU EXIT-PARA UNTIL EOF-REC = 'YES'.
DISPLAY " FINALLY OUT OF LOOP"
ADD 1 TO I
AT END MOVE 'YES' TO EOF-REC
IF I > 3 AND < 10
DISPLAY "NOT IN RANGE"
WRITE NEW-REC FROM FILE1-REC.
what is s000 u4087 error?
please give the all error codes in cobol,jcl.
i made it to stage 3 of an interview process wednessday
they will quiz my knowledge again face to face for an
analyst role recruiter said it will be based on Business
requirements system is cobol and good ideas what they might
have in 100 records in a file i want to read first 3 records
and skip next 3 records and agan i want to read 3 records and
again i want to skip 3 records...
what are decleratives in cobol?
what is the difference between COBOL2 AND COBOL390?
I have a File that has duplicate records. I need only those records that occur more than
i need a small 3d program using inline and outline.
What type of SDLC u followed? Why?
what is difference bt COND, REGION & TIME parameters at JOB & EXEC. give an exp.
wht is structured cobol pgm and non structred cobol pgm ?
) how do u code after getting data?
I have one ps file in which there are 3 fileds
emp_no,emp_name and leave_app.this ps file information give
the detail of employee which is going to apply for
leave.suppose emp_no=113430,emp_name=ajay,leave_app=1 that
means he is going to apply for 1 day leave.and accordingling
the table in db2 will be updated means if he has that no of
leave in his account then he will get dat leave and updated
acc. in table(leave_balance=previous leave present in
table-leave_app).Now i want to check whther the updated
result is correct or not by comparing the two ps file using
IEBCOMPARE or icetool so what is going to be the two ps file
and how its is going to be compare.
example for sub strings ? and refernce modifications whit output pls
how can we apply for HSBC exam(Mainframe) in India??? i went
to their site and was told to submit my CV ,. etc..( totally
if we display var1 then what will b displayed in below
77 var1 pic s9(2) value -10.
77 var1 pic s9(2) value -11.
" " " -12.
" " " -13.