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: turnipman
  • Order by date
  1. turnipman

    Future of object-oriented COBOL?

    I thought our company would keep COBOL forever but it is going fast, SAP is replacing all our mainframe systems and should be complete by 2004. The code is not being rewritten into JAVA or C++ or anything like that, entire systems are being replaced. I've been in COBOL for 30 years now and I'm...
  2. turnipman

    Debugging an online IMS/DC COBOL program

    I put DISPLAY messages in my on-line program and they come out on the system log under IOF. This may be installation dependent so it may not work on your system.
  3. turnipman

    When do we get to stay home?

    I read an article that said something like 70% of workers telecommute. I've only known the wife of one guy I worked with who telecommuted. Turns out the company that did the research said if you made even 1 phone call to your office, you were telecomutting. So much for statistics. I think I...
  4. turnipman

    Binary Search on a File

    First thing is that you are not building a KEY. Your court-table-code is not filled in, I am surprised it ever works since this is a key field. You should put a valid value in this field. Another thing to make sure of is that you never go over 952 occurences. You can put an IF in there to...
  5. turnipman

    PERFORM WITH IF

    Don't use GO TO anymore....I am now a structure guy. Anyway, was helping a co-worker try to decipher an ALTER GO TO, no kidding. Fortunately, we don't have too many of these programs left. I really hate ALTER GO TO.
  6. turnipman

    Eliminating BLANKS in a sort

    Assuming you are doing an internal sort, use an IF statement and don't RELEASE these records to the sort. IF CHECK-FIELD = SPACES NEXT SENTENCE ELSE RELEASE SORT-RECORD.
  7. turnipman

    cobol dead?

    I am also a COBOL contractor, I've had my present contract for 4 1/2 years and it is COBOL. There are other technologies here (SAP), and much of the COBOL will be replaced eventually, but right now I am not in any fear of losing my job. For COBOL jobs look on www.dice.com. If you just search...
  8. turnipman

    IF ELSE HELP

    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 GIVING WS-TYPE3AMT ADD WS-TYPE3AMT...
  9. turnipman

    would like to make a career change

    You might checkout Computerworld for salary surveys of DP positions. This will give you an idea of what people are making with what experience level with what qualifications. I feel $100k is overly optimistic based on what you have given. A site that has 'real' jobs is www.dice.com. You can...
  10. turnipman

    insufficient memory error when module is called (cobol)

    When I have this problem it is usually associated with a JCL problem, not enough memory on the JOB card. Try REGION=0K and that will get all the memory available on the computer.
  11. turnipman

    dynamic call problem

    I am not sure if you have a typo, but you should use the DYNAM option, not the NODYNAM. I am assuming you changed CALL 'SUBROUTINE' to CALL SUBROUTINE. Hope this helps Shankar.

Part and Inventory Search

Back
Top