Re: Convert an MI program to RPG

Leif and Richard, thanks.  The original program from Simon specified
appending the null char after the trimmed names.  It seems to work better
leaving off the null, but I have a new problem:

Message . . . . :   Cannot resolve to object SDBOOKCOS. Type and Subtype
  X'0FFF' Authority X'0000'.

@OBJ                  POINTER              SPP:*NULL
LIBNAME               CHAR(10)             'QUERYLIB  '
'D8E4C5D9E8D3C9C24040'X
OBJNAME               CHAR(10)             'SDBOOKCOS '
'E2C4C2D6D6D2C3D6E240'X
OBJTYPE               CHAR(2)              '  '             '1911'X
RSLVOBJ_T             DS
  INTLIBNAME          CHAR(31)             'QUERYLIB                       '
                      VALUE IN HEX
'D8E4C5D9E8D3C9C24040404040404040404040404040404040404040404040'X
  INTOBJNAME          CHAR(31)             'SDBOOKCOS                      '
                      VALUE IN HEX
'E2C4C2D6D6D2C3D6E240404040404040404040404040404040404040404040'X
  INTOBJTYPE          CHAR(2)              '  '             '1911'X
  REQAUTH             CHAR(2)              '  '             '0000'X
RTNCODE               CHAR(1)              '1'              'F1'X
SPCPTR                POINTER              SPP:*NULL

As you can see, objtype=X'1911', but the msg says it's looking for type
'0fff'.

As a reminder here is the call to rslvsp:
C                   Eval      @obj       = RSLVSP( intObjType :
C                                                  intObjName :
C                                                  intLibName :
C                                                  reqAuth     )

Any ideas?

Bill


__________________________________________________
Do You Yahoo!?
Talk to your friends online with Yahoo! Messenger.
http://im.yahoo.com
+---
| This is the MI Programmers Mailing List!
| To submit a new message, send your mail to MI400@midrange.com.
| To subscribe to this list send email to MI400-SUB@midrange.com.
| To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dr2@cssas400.com
+---