× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. October 2004

Re: User Space size

Tony Carolla wrote:
> 
> Thanks Bob!  I bungled the DS pointer for parameter three.  One of
> these days I will install QSYSINC!!!
> 
... from another posting:
> I have my prototype:
>     D ChgUS           PR                  ExtPgm('QUSCUSAT')
>     D  SpaceLib                     10A   Const
>     D  SpaceName                    20A   Const
>     D  SpaceAttr                      *   Const
>     D  SpaceError                     *   Const

Parameter 4 is wrong too.  If you define your error code parameter as *
CONST, you will encounter many and varied problems (even if it
apparently works sometimes).  Here's one way to define the error code
parameter:

    D ErrCode         DS
    D   ByteProv                    10I 0 Inz(0)
    D   ByteAvail                   10I 0 

    D ChgUS           PR                  ExtPgm('QUSCUSAT')
    D  SpaceLib                     10A   Const
    :
    :
    D  SpaceError                         LikeDs(ErrCode)

Then pass ErrCode as the parameter.  If you want to check for errors
after the call, initialize ByteProv to %Size(ErrCode) instead of zero.

As an Amazon Associate we earn from qualifying purchases.

This thread ...
Replies:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2025 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.