VARYING Parms Cause RNX0115

[Sheaulle]

Hi all:

maybe someone can help me with a to me mysterious problem:
I've got two programs with varying length fields. They form kind of a web service.

1) ICONNECT (an OPM program in which many HTTP APIs are called)

      * Variables for the CGI interface API for QtmhRdStIn.                    *

     DBufIn            S               a   INZ LEN(4000000) VARYING

      *Variables for the CGI interface API for QtmhWrStout.

     DBufOut           S               a   INZ LEN(4000000) VARYING



       // ...



                  callp IREQAUS (BufIn : BufOut : func : opc : rc );

2) IREQAUS (the program which will process the data delivered by ICONNECT)
While trying to find a solution I changed it from OPM to a prototyped program -- without success.

     D IREQAUS         PR                  EXTPGM('IREQAUS')

     D  bufin                          A   LEN(4000000) VARYING

     D  bufout                         A   LEN(4000000) VARYING

     D  $funktion                    14A

     D  opcd                          1A

     D  rec                           1A                         



     D IREQAUS         PI

     D  bufin                          A   LEN(4000000) VARYING

     D  bufout                         A   LEN(4000000) VARYING

     D  $funktion                    14A

     D  opcd                          1A

     D  rec                           1A      



          // ...



                   bufin = bufin;  // ---> For debugging I added this rather silly statement. Result: Error RNX0115

Running ICONNCT will result in an error RNX0115 in IREQAUS as soon as I touch the varying field BUFIN.
I've found forum threads about similar problems where the parameters didn't fit. But that can't be the problem here, can it?
I even turned the second program in a prototyped version, without a change in its behaviour.

Where can I find a hint on what's going on here?

Thanks in advance and best regards,
Markus

[Sheaulle]

The topic has been discussed further here (with a solution): http://forums.iprodeveloper.com/forums/aft/149321