Re: RPG Free qualified DS RNF008 error V7R1

[Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

Hi Jim

Your timestamp format is invalid, I think - that is the format SQL 
Server wants, maybe it's an ODBC ISO format.

Here from the RPG reference on timestamp literals -

Timestamp literals have the form Z'yyyy-mm-dd-hh.mm.ss', optionally 
followed by a period followed by zero to twelve fractional seconds, 
Z'yyyy-mm-dd-hh.mm.ss.frac'

But in the %timestamp() built-in-function, I think you don't need the 
leading Z.

HTH
Vern

On 1/19/2016 10:59 AM, Jim Franz wrote:
> Getting a compiler error from CRTRPGMOD
>
> 000105     in.StartDate =
> %timestamp('2015-12-08T14:26:46');
> ======>      a
> b
> *RNF5008 20 a      000105  Factor 1 operand is not valid; defaults to
> blanks.
> *RNF5507 30 b      000105  A semi-colon is not specified at the end of a
> free-format
>
> specification.
> 000106     in.EndDate =
> %timestamp('2015-12-16T00:00:00');
> ======>      a
> b
> *RNF5008 20 a      000106  Factor 1 operand is not valid; defaults to
> blanks.
> *RNF5507 30 b      000106  A semi-colon is not specified at the end of a
> free-format
>
> specification.
>
> same error if statement    in.StartDate = StartDT;
>
> statement starts in column 10, so not the ptf issue with /free code in
> column 1 - 6
> 5770WDS SI51094 is applied.
>
> Many other ptfs for WDS in google - hoping to narrow this down.
> Not an option to load cume (that requires a month of testing ...)
>
> This is code generated from WSDL2RPG but all I see says this should work.
>
> This is most of the parms for CRTRPGMOD
> CRTRPGMOD MODULE(FRANZJI/WS0001R) SRCFILE(*LIBL/QRPGLESRC) SRCMBR(WS0001R)
>   GENLVL(10) DBGVIEW(*LIST) OPTIMIZE(*NONE) INDENT(*NONE) CVTOPT(*NONE)
> TRUNCNBR(
> *NO) FIXNBR(*NONE) TGTRLS(*CURRENT) ALWNULL(*NO) DEFINE(*NONE)
> BNDDIR(*NONE)
>
> Jim Franz