Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Search results for query: *
- Users: gmupatsfan
- Order by date
-
IF ELSE HELP
Here's my code -- I'm getting too many errors to list. 400-TYPE-RTN. IF IR-MILES <=300 MULTIPLY IR-MILES BY .12 GIVING WS-MILECHRG MULTIPLY 15 BY CR-DAYS GIVING WS-TOTALCHRG ELSE SUBTRACT 300 FROM CR-MILES GIVING WS-DIFFERENCE MULTIPLY WS-DIFFERENCE BY .10 GIVING WS-TYPEAMT1 MULTIPLY 300 BY .12...- gmupatsfan
- Thread
- Replies: 2
- Forum: COBOL General discussion
-
Input Recs
Jack, I have another question - I think I've come up with a solution. In working storage I have 05 Flag Pic 9 Value 0 then, in the main module I have read in-file at end move 1 to flag perform 200-rtn until flag=1. what does this mean? what is flag????? That is, how is flag different from EOF?- gmupatsfan
- Post #6
- Forum: COBOL General discussion
-
Input Recs
Jack, Thanks! That's a big help. I know about redefines and am reading up on it now. I don't expect you, or anyone, to do my homework -- I just needed a hint. I haven't gotten to loops yet although I do know what they are. I'll test it and let you know how I'm coming along. Again, thanks for...- gmupatsfan
- Post #4
- Forum: COBOL General discussion
-
Input Recs
Need help with 1. reading in 2 records and then printing. the 2 recs share some of the same data such as userid how do I do this since the records are in the same file? do I have one in-rec. or two? first record: userid, state, age second reocrd userid, favorite number output needs to be on...- gmupatsfan
- Thread
- Replies: 7
- Forum: COBOL General discussion
