I believe you'll need to specify OPDESC on your parameter interface:

d #CitySt         pi            27    opdesc
d  inField                      50    options(*varsize)
d                                     const

-Moe
-------------------------------------------------------
Kevin R Mohondro                kmohondro@salepoint.com
Software Engineer                         (858)373-2012
SalePoint Corporate Retail Solutions      San Diego, CA

-----Original Message-----
From: Joel R. Cochran [mailto:jrc@masi-brac.com]

I am trying to retrieve the String length of an incoming parameter in a
Procedural parm defined with *varsize.  I am receiving the following error:

Message ID . . . . . . :   CEE0502       Severity . . . . . . . :   30
Message type . . . . . :   Diagnostic
Date sent  . . . . . . :   01/21/02      Time sent  . . . . . . :   14:24:56

Message . . . . :   Missing operational descriptor.
Cause . . . . . :   The specified operational descriptor location in
procedure
  CEEDOD does not contain a valid operational descriptor.
Recovery  . . . :   Specify a valid operational descriptor location and
ensure
  that an operational descriptor exists at the location.


Forgive my ignorance, but I have no idea what this means.  Here is the
code...

/copy prototype...
D #getOps         PR                  EXTPROC('CEEDOD')
D  ParmPos                      10I 0 Const
D  o_descType                   10I 0
D  o_dataType                   10I 0
D  o_descInf1                   10I 0
D  o_descInf2                   10I 0
D  o_fieldLen                   10I 0
D  o_errors                     12A   OPTIONS(*OMIT)

...

d #CitySt         pi            27
d  inField                      50    options(*varsize)
d                                     const

[SNIP-O-RAMA]


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2022 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.