Re: API parm confusion

[qsrvbas@xxxxxxxxxxxx (Tom Liotta)]

Bruce:

I'll test this technique soon but have a question...

How did you work out the reasoning for 'USING... BY REFERENCE FILE-ID'????? 
That seems to be the significant difference between everything I tried and what 
you suggest. I was using BY VALUE for that parm.

Thanks major.

Tom Liotta

"Bruce Vining" <bvining@us.ibm.com> wrote:

>       WORKING-STORAGE SECTION.
>       01  FILE-ID             PIC X(16)
>                   VALUE X'0000000000000001843E02D800004C26'.
>       01  PATH-BY-BUFFER      PIC X(1024).
>       01  PATH-SIZE           PIC S9(09) BINARY VALUE 1024.
>       01  PATH-POINTER        POINTER.
>       LINKAGE SECTION.
>       01  PATH-BY-POINTER     PIC X(1024).
>       PROCEDURE DIVISION.
>       MAIN-LINE.
>           CALL "Qp0lGetPathFromFileID"
>                       USING     BY REFERENCE PATH-BY-BUFFER,
>                                 BY VALUE     PATH-SIZE,
>                                 BY REFERENCE FILE-ID
>                       GIVING                 PATH-POINTER.

--
Tom Liotta
The PowerTech Group, Inc.
19426 68th Avenue South
Kent, WA 98032
Phone  253-872-7788
Fax    253-872-7904
http://www.powertechgroup.com



__________________________________________________________________
Your favorite stores, helpful shopping tools and great gift ideas. Experience 
the convenience of buying online with Shop@Netscape! 
http://shopnow.netscape.com/

Get your own FREE, personal Netscape Mail account today at 
http://webmail.netscape.com/