Re: CNVRTTMP.RPGLE has no xml or json -

[Bradley Stone <bvstone@xxxxxxxxx>]

It's NOT a program.  It's a module source.

Bradley V. Stone
www.bvstools.com
GreenTools for G Suite/Google Apps <https://www.bvstools.com/g4g.html>:
Easy to use interfaces for GMail, Google Drive, Calendar, Contacts and
Cloud Print! <\body> <\html>

On Mon, Nov 5, 2018 at 10:02 PM Booth Martin <booth@xxxxxxxxxxxx> wrote:

> All the documentation I find about web services talks about SOAP and
> REST and XML & JSON.  Yet the IBM-supplied example CNVRTTMP.RPGLE is
> just a regular program.  What am I not understanding?
>
> *********************************************************************
>       d ConvertTemp     pr
>        *****************************************
>       d  tempIn                       10    const
>       d  tempOut                      10
>        *****************************************
>       p ConvertTemp     b                   export
>        *****************************************
>       d  ConvertTemp    pi
>       d  tempIn                       10    const
>       d  tempOut                      10
>        *****************************************
>       d tempI           s              8P 2
>       d tempO           s              8P 2
>       d value           S             50A
>        /free
>         value = %STR(%ADDR(tempIn));
>         tempI=%DEC(value:7:2);
>         tempO = (5/9)*(tempI - 32);
>         value = %CHAR(tempO);
>         tempOut = value;
>         %STR(%ADDR(tempOut):10)=tempOut;
>        /end-free
>       p ConvertTemp     e
>
> --
> This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400) mailing
> list
> To post a message email: WEB400@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/web400
> or email: WEB400-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/web400.