List Fields with api

["Rick DuVall" <R_C_DuVall@xxxxxxxxxx>]

How about this?

 ********************************************************************
  * MakeList     - Display file field descriptions to user space.
  ********************************************************************
 C     MakeList      BegSR

  *---------------------------------------------------------------------
  * Populate User Space with List of Field Names ...
  *---------------------------------------------------------------------
 C                   Call      'QUSLFLD'
 C                   Parm                    USLF_UsrSpcN
 C                   Parm                    USLF_InfoFmt
 C                   Parm                    USLF_FilNam
 C                   Parm                    USLF_FilFmt
 C                   Parm      '1'           USLF_OvrPrc
 C                   Parm                    APIFeedBack

 C     $MakeList     EndSR

Regards

Rick DuVall
Systems Manager
Dealer's Auto Auction of Okc, Inc.
Rick@xxxxxxxxxx <mailto:Rick@xxxxxxxxxx>
(405) 947-2886


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Michael Gottlieb
Sent: Friday, June 04, 2004 2:33 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: (no subject)



Is there an API that can get me a list of fields in an externally-described
file? Any program examples will be a great help. Thanks!



Michael Gottlieb
gottlm@xxxxxxxxxxxxx
gottlm@xxxxxxxxx

Out of every 10 people, one understands binary, the other doesn't.



__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.