[Info-vax] Error Messages in Basic - %BASIC-E-PARMODNOT, mode for parameter <n> of routine <procedure-name> not as declared

[Dave Froble]

On 6/4/2019 6:07 PM, Craig Dedo wrote:
> When trying to use the OpenVMS Run Time Library procedures LIB$CONVERT_DATE_STRING() and LIB$DAY_OF_WEEK() with HP Basic for OpenVMS, I am getting  %BASIC-E-PARMODNOT error messages.  Here is a screenshot of the messages from the compiler.
>
> [Begin compiler error messages]
>      VMS_Condition_Code_gl   = LIB$CONVERT_DATE_STRING ( End_of_Month_Date_gs, End_of_Month_Date_Time_gq, Date_Time_Context_gl )
> ..............................................................................^
> %BASIC-E-PARMODNOT, mode for parameter 2 of routine LIB$CONVERT_DATE_STRING not as declared
> at line number 166 in file SMP_DEVELOP_DV:[YYY1V30.TOLAS.DEV.OLIVE.STARLET]Test_Days_in_Month.BAS;4
>
>      VMS_Condition_Code_gl   = LIB$DAY_OF_WEEK ( End_of_Month_Date_Time_gq, End_of_Month_Weekday_gl )
> ................................................^
> %BASIC-E-PARMODNOT, mode for parameter 1 of routine LIB$DAY_OF_WEEK not as declared
> at line number 167 in file SMP_DEVELOP_DV:[YYY1V30.TOLAS.DEV.OLIVE.STARLET]Test_Days_in_Month.BAS;4
> %BASIC-E-ENDNOOBJ, SMP_DEVELOP_DV:[YYY1V30.TOLAS.DEV.OLIVE.STARLET]Test_Days_in_Month.BAS;4 completed with 2 diagnostics - object deleted
> [End of compiler error messages]
>
> Here are the relevant variable declarations at the top of my program:
> Declare Long            Date_Time_Context_gl
> Declare String          End_of_Month_Date_gs
> Declare Quad            End_of_Month_Date_Time_gq
> Declare Long            End_of_Month_Weekday_gl
> Declare Long            VMS_Condition_Code_gl
>
> I also included all of the relevant definitions from several of the modules in SYS$LIBRARY:BASIC$STARLET.TLB.
>
> What is going wrong?  What can I do to fix this problem?
>
> Any help that anyone could give me would be most appreciated.
>
> Sincerely,
> Craig T. Dedo, OpenVMS Software Development Consultant
> Navistar, Inc.
> 2701 Navistar Drive
> Lisle, IL   60532-3637
> E-mail:  <Craig.Dedo at navistar.com>
>

What version of Basic?

There was a problem with quadwords a while back.  I don't remember details.

-- 
David Froble                       Tel: 724-529-0450
Dave Froble Enterprises, Inc.      E-Mail: davef at tsoft-inc.com
DFE Ultralights, Inc.
170 Grimplin Road
Vanderbilt, PA  15486