Thanks for all the help, I will put a couple of hours aside this weekend to scan my coding..Must remember to buy some black ink for the printer!!..
The reason some of my coding may look daft is because I did not have a compiler when I started it, I just recently purchased MicroFocus Cobol and I...
I seem to get only a blank output with headings on my coding. The program reads my data file which I have on floppy disk and is supposed to print invalid data items on a printed error report.
Valid data is supposed to save back to disk as a validated file to be used in a further program.
Could...
That is just what I am looking for, where should I adjust my code...
I wasnt expecting such a quick response.....
sausages@scurfield.fsnet.co.uk
Thanks, Garry
Can anyone help me, I have a list of my coding below...
At the end of the program I have a procedure called WRITE-VALIDFILE...When the program is compiled using my test data, all of the records are being written to my Valid File....Not just the valid ones....I am confused.....Any help or...
Hello peeps,
I have eventually learned how to work check digits, does anyone know where I can find a list of numbers with Mod 11 chesk digits, I need to get about 120 numbers 5 and 6 numbers in length with the last digit being the Check Digit rather than sit and calculate them out manually...
Cheers AFPBOY or Vince... I have sent an email to you, cheers for the help. The tests are using modulus 11, the tests are to validate an incoming customer code and part number.
I havent got the spec with me at the moment but I am sure they are both pic 9(5)
Hello Jack,
I never get insulted, anyway, the program is being rested for a week or to whilst I carry out more important duties...ie Decorating, I will get back if or when I need furtherr assistance....
Cheers Pal
Garry
Hello again, Hello, (In the woirds of Niel Diamond...Ignore my attempt at humour... I have had a look again at my code and made some minor adjustments, have I solved the problem with continuous printing of headers????
[*code*]
IDENTIFICATION DIVISION.
PROGRAM I-D. EXAM3.
*THIS PROGRAM WILL...
Sorry Jack, I must not have had my humour hat on yesterday......Thanks for the tip, I will reveiw the coding and try to clean it up...........
Cheers again, Garry...
I shall dispose of the IFS and use evaluate, it looks alot better, No I am not an evironmentalist, I am just trying my best to learn a new skill so that I can move on from my current job as a Benefit Fraud Investigator, I only put the *'s in as I was told to do so when applying comments to code...
I am back again, with my example coding, feel free to rip it to pieces, remeber I am just a baby at the game...
I am sorry it is quite long.........
I will first of all try to explain the program specification.
A wholesaler deals with different types of vegetables.
All sales are recorded on...
I am sorry, has my thread caused a bit of internal wrangling, I will try to pick a bit from each of you and build some coding that hopefully makes some sense, is it ok to post it here when I am finished and maybe you can pull it apart and assist me, I am only a baby at this game...
Good evening chaps and chapesses,
I need to code a program that will read a file from disk called "SALES-FILE.DAT" , the data is already in ascending order of TYPE-CODE and pre-validated and will eventually be sent to the printer.. I am having my usual problem of drawing a structure...
Good evening chaps and chapesses,
I need to code a program that will read a file from disk called "SALES-FILE.DAT" , the data is already in ascending order of TYPE-CODE and pre-validated and will eventually be sent to the printer.. I am having my usual problem of drawing a structure...
Thanks to all of you, you are very helpful, I shall spend some time with your advice tonight and have another look at the coding...
Once again....Thanks...
Garry
Hi, Garry Back again, please have a look at the coding below and see if my list of errors are correct......
WORKING STORAGE SECTION
01 W-TABLE PIC 9(4).
03 W-TABLE-ITEM OCCURS 100.
01 W-INDEX PIC 999.
PROCEDURE DIVISION.
PERFORM VARYING...
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.