Re: RNF7535: varchar not compatible with options(*varsize)?

[mlazarus <mlazarus@xxxxxxxxxxxx>]

Dan,

 You're passing a varying character field to a fixed length parm, as 
defined in the prototype.  Options(*varsize) allows you to pass 
differently sized variables of the same type, in this case it would be a 
fixed length field, without the compiler complaining.  An easy fix would 
be to add Const to the prototype.  Then the compiler would adjust it for 
you.  Or make the parm in the prototype varying (varchar).

 Just a note on the other part of the code.  This statement:

inputlen = %len(%trim( DataToHash));

gets the length of the fully trimmed variable, yet you're passing an 
untrimmed version:

hash( DataToHash: inputlen );

So if you have leading blanks you'll get the hash based on a value with 
leading blanks, but ignoring the trailing characters, for the number of 
leading blanks.  You're probably looking for %TrimR() instead of %Trim().

 -mark

On 3/29/2018 10:55 PM, Dan wrote:
> Compile of the following fails due to RNF7535 (The type and attributes of
> parameter 1 do not match those of the prototype.)
>
> I have stripped out a lot of the irrelevant code so that the compile
> generates the same error.  Variable DataToHash apparently doesn't match the
> type and attributes of the first parameter, labeled "InputData", to the
> hash procedure.
>
> What am I missing?
>
> **free
> ctl-opt dftactgrp(*no);
>
> dcl-s  DataToHash  varchar( 16773000);
>
> dcl-pr hash extproc('Qc3CalculateHash');
>   InputData         char( 16773000) options(*varsize);
>   LengthOfInputData int( 10);
> end-pr;
>
> dcl-s inputlen     int( 10);
>
> // stripped code that "builds" DataToHash
>
> inputlen = %len(%trim( DataToHash));
> hash( DataToHash: inputlen );
> *inlr = *on;
>
> - Dan
>