Re: Call a C program from RPG with variables & a return
Stephen Mooney <stephenmmooney-/[email protected]>
| Newsgroups | gmane.comp.lang.as400.c |
|---|---|
| Message-ID | <[email protected]> |
Buck,
I have tried the dcl-s bignumber Float(8); in my RPG program but keep getting:"An assignment operator is expected with the EVAL operation. "
I thought I traced it down to PTF SF99701 which needed to be at release level 26 or higher, but after loading release level 37 I still get the same message. Any suggestions? Thanks. Regards, Stephen M. Mooney
From: Buck Calabro <[email protected]>
To: [email protected]
Sent: Wednesday, February 17, 2016 10:10 AM
Subject: Re: [C400-L] Call a C program from RPG with variables & a return
On 2/17/2016 11:29 AM, Stephen Mooney wrote:
> Charles,
> Thank you for your suggestion. I was using the SQL set function after calculating the total for three months:
> $Tot03 = ($AvgH(1) * $AvgH(2) * $AvgH(3))
>
> SET :$Geo03 = :$Tot03 ** (1/:$Root03);
>
> And that works fine. When I try it with 12 month's, the result field is not large enough (set to 63P) and the program errs. Same happens with:
> $Tot12 = ($AvgH(1) * $AvgH(2) * $AvgH(3) * $AvgH(4) * $AvgH(5) * $AvgH(6) * $AvgH(7) * $AvgH(8) * $AvgH(9) * $AvgH(10) * $AvgH(11) * $AvgH(12)) ** (1/12);
> I think I need to use 'C' because if I declare the result field as "double" I do not have the restriction I do in RPG. Regards, Stephen M. Mooney
RPG supports double as dcl-s bigNumber float(8);
--
--buck
Visit wiki.midrange.com and register for an account. Edit a page that
helps you, and because it's public, you'll help someone else, too!
--
This is the Bare Metal Programming IBM i (AS/400 and iSeries) (C400-L) mailing list
To post a message email: [email protected]
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/c400-l
or email: [email protected]
Before posting, please take a moment to review the archives
at http://archive.midrange.com/c400-l.
--
This is the Bare Metal Programming IBM i (AS/400 and iSeries) (C400-L) mailing list
To post a message email: [email protected]
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/c400-l
or email: [email protected]
Before posting, please take a moment to review the archives
at http://archive.midrange.com/c400-l.