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 wOOdy-Soft on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by staceybauer

  1. staceybauer

    COPY.. REPLACING

    I already knew about the "tokens" option, but we actually import the copybooks into a client side product (Ivory) that is used for developing webservices. Anyway the Ivory data definitions then contain datanames that include the tokens. It works, but gets a little confusing and ugly. I was...
  2. staceybauer

    COPY.. REPLACING

    Did the trick. Unfortunately it opens up another set of issues for us. Thank you!
  3. staceybauer

    COPY.. REPLACING

    I am trying to use the COPY REPLACING option in an Enterprise COBOL program and can't seem to get it to work. It compiles cleanly, but seems to ignore the statement. No data is replaced. Here is the code. COPY TR319XXX REPLACING ==DL== BY ==XL==. I have tried literals, fields etc. and no...
  4. staceybauer

    Random string generator

    I guess great minds think alike :) I did something very similar. 3000-GENERATE-CHARACTER. COMPUTE SA-RANDOM-NUMBER = FUNCTION RANDOM. * IF ALREADY SEEDED, DON'T NEED THE PARAMETER * create the seed date by taking the time out of the * CURRENT-DATE field...
  5. staceybauer

    Random string generator

    Only Uppercase A-Z and numbers 0-9. I was thinking I would like to make it any printable EBCDIC character and add some logic (parameters) that could filter it to what you want. We have something working now. I was hopeful there would be a simple function call to do this however.
  6. staceybauer

    STRING Table of errors into one field for output

    Two thoughts here. If you don't care about the spaces at the end of each message ("pin error ^signon error ^idiot error ^...etc") Lunkers suggestion is the way to go. That appears to be the case, since that looks like what you were trying to do with your original string...
  7. staceybauer

    Random string generator

    Oh yes, I neglected to mention in my second post that we have been running our VS COBOL II applications using the LE runtime since 1999. As I understand VS COBOL II running WITH LE run-time is supported until December 2004. Sorry about any confusion. Stacey
  8. staceybauer

    Random string generator

    Actually it is supported until December 2004 and we are preparing to migrate sometime in 2004. It did not provide any new functionality that we needed, so we chose to put the cost of migration off for a few years. I was already aware of the callable service for random number generating you...
  9. staceybauer

    Random string generator

    We have a request to generate a random alphanumeric string of characters for our business using VS COBOL II (MVS) on the mainframe. Any ideas if there are any random character generating functions available in COBOL?

Part and Inventory Search

Back
Top