jps111s,
1) A:CUSTOMER-INPUT-FILE should be inside of these " "
2) you also have other errors in your listing
For Instance:
2.1) period required after STOP RUN
2.2) period required before Z200-READ-BULL-RECORD
Good Luck
Claudeb,
If you mean 'how do I display the decimal value?' you just need to define a 'normal' numerical PIC 9(??) field, when you move (A or B) into it the conversion will be done for you.
If you mean 'how do I display the hexadecimal value?' (wish is what you say but I don't think what you...
Cinthia,
When you say 'Dont you open by going to open for execution?' it looks like you are refering to the actually running of the program and not where your problem is (ie. in your code).
You need to look at (1) the 'Select' statement(s) in your Environment Division and make sure you have the...
Meth,
Your problem is (as it says) a non numeric in a numeric field (eg. spaces in a PIC 9); you will get this error when you try to access this field (eg. within a mathematical statement).
The pc=14d call=1 seg=0 is the address of the problem and you will need a compiled listing of your...
Claudeb,
I don't know what ASRA is but looks to me like you will have a problem with signs at the very least. If you only accessed X-2 and X-1 (for instance) it would probably be ok but as soon as you try to access X you will find signs in the middle of a numeric packed field. Initialize X-1...
I agree with 'Croxie'. Furthermore, why are you redefining? I can see no benefit. The 03 level (v_parameter_1) will give you alphanumeric access to your 05 level numeric(v_archive_num). Furthermore, I always retain an element of the original field in the redefinition name (eg v_parameter_1_red...
In Micro Focus Cobol you do it as below. MF is similar to RM (I believe). So until an RM johnnie gets back to you you need to find RM's equivalent.
Good Luck
------------------------------------------
Working-Storage Section.
01 ws-reply pic 99 comp-x.
01 ws-function-35 pic 99...
Now I'm not trying to be funny here but.......it would really help if and when you post a problem you actually tell us what the problem is. There's too many problems posted that only say 'my program doesn't work', 'what am I doing wrong' etc etc. If you had a live program and a user rang you and...
All,
If (like me) you've always wondered how 'they' decided
when easter is and have written diary apps where you've
scratched your head when it came to allowing for
national/bank holidays; you will find this useful.
I've written it in C, assembler, sql and VB (as well
as the COBOL version...
Using 'bog standard' cobol indexed files you can open up the associated idx file and find this sort of info. I'm not a mainframe johnnie and I'm unsure of your fileset but hope this is of some use.
Good luck
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.