This discussion has been locked.
You can no longer post new replies to this discussion. If you have a question you can start a new discussion

RTS 173 error when calling date routine

Load error : file 'CBL_FN_INTEGER0OF0DATE_IBM' error code: 173, pc=0, call=1, seg=0 173 Called program file not found in drive/directory 12:52:56.

Does anyone know what the file name is for this routine and in which folder does this date routine go? Also, much appreciated if you have a copy of this routine and can attach it to this request.

Thanks!

  • Hi.

    The RTS173 error means it cannot locate this program. As far as I know there is no routine in the Micro Focus Visual COBOL library with that name and I don't find a reference for it in the IBM docs either.

    It sounds like it might be calling the intrinsic function INTEGER-OF-DATE which is documented here.

    Are you moving your application from an environment where this call did work?

    What COBOL compiler and platform was that?

    Chris Glazier
    Global Technical Support | OpenText


    If you found this post useful, give it a “Like” or click on "
    Verify Answer" under the "More" button

  • Yes, the program calling this function works on a different environment. However, it fails on another environment. Just wondering why it fails on one environment.

    It appears that we are missig this intrinsic function from one of the installation. Hence, the question.

    eg: - 

    FUNCTION INTEGER-OF-DATE (FIX-DATE)

    Any thoughts!

  • The error doesn't seem to be because the intrinsic function itself is missing but because the application is trying to call a program called CBL_FN_INTEGER-OF-DATE_IBM' and it cannot find it. Do you have a program with that name that did not get moved over to the new platform?

    What is the old platform and COBOL compiler that you are running and what is the new platform and COBOL compiler?

    Chris Glazier
    Global Technical Support | OpenText


    If you found this post useful, give it a “Like” or click on "
    Verify Answer" under the "More" button

  • No, I do not have a program with that name. I assumed that when I'm calling the above function, its converting the call to that name and again asuming its a conversion made internally by Microfocus.

  • What is the old platform and COBOL compiler that you are running and what is the new platform and COBOL compiler?

    Chris Glazier
    Global Technical Support | OpenText


    If you found this post useful, give it a “Like” or click on "
    Verify Answer" under the "More" button

  • Both the Cobol compilers are in the same platform. However, one is a new region created for testing and apparently I believe we are missing few elements in the new environment. Hence, trying to find out what we are missing.

    Cobol is compiled using .net Cobol 6.x  in VS 2019.

  • Sorry, yes you are correct, it is a Micro Focus routine which appears to be part of the run-time system, cblrtsm.dll. I am not sure why it cannot be found in your case as the program could not run without cblrtsm.dll.

    Does this occur in your development environment too or just in your run-time environment? Are you installing the COBOL Server product or are you just copying selected files?

    Chris Glazier
    Global Technical Support | OpenText


    If you found this post useful, give it a “Like” or click on "
    Verify Answer" under the "More" button

  • Yes, it occurs in one of the test environment. Not in most of the other environments. We are using .gnt for our compiled cobol programs. Do you know what folder has cblrtsm.dll. I am guessing it will be in an MF installation folder. It's working in few other regions, hence should be able to copy from a different region/environment.

  • I did a scan and found that cblrtsm.dll was under bin folder in an environment where calling this routine is not failing. (...\Enterprise Developer\bin). Can I copy this module to the missing environment?

  • 32-bit cblrtsm.dll is in the bin folder of a standard install and the 64-bit version is in the bin64 folder..

    Chris Glazier
    Global Technical Support | OpenText


    If you found this post useful, give it a “Like” or click on "
    Verify Answer" under the "More" button