RE: process a list of files

["rob" <robin@xxxxxxxxxxxx>]

Adam,

You can open a file as internally defined and just give it an
arbitrarily large record length.  You could read this in to one big
field and scan that if you didn't need to know what field had the
asterisk in.  If you need the field name, then the APIs or a DSPFFD will
give start positions and lengths you could lookup.  What do you need to
do once you find an asterisk?

To read a file of unknown DDS try:

     FBIGFILE IF  F    9999            DISK
      *
     E                    B        9999  1
     IBIGFILE NS  61
     I                                        19999 B

It's RPGIII but you get the idea.

Cheers
Robin

> -----Original Message-----
> From: rpg400-l-admin@midrange.com
> [mailto:rpg400-l-admin@midrange.com] On Behalf Of Ray, Adam
> Sent: 08 November 2001 15:30
> To: 'rpg400-l@midrange.com'
> Subject: process a list of files
>
>
> I've been stumbling over this for weeks and have decided to
> contact the experts. I have a long list of files (over 500)
> that I need to process. I need to search every character
> field in every file for the '*' character. I would like to
> have one RPG program that will scan the records of the files
> for the character. But since nearly every file has a
> different layout, I have no idea how to accomplish this. Any
> ideas are greatly appreciated.
>
> Thanks,
> Adam Ray
> Programmer/Analyst
> Wipfli Ullrich Bertelson LLP
> www.wipfli.com <http://www.wipfli.com>
>
>
> __________________________________________________________________
>
> Please look below this disclaimer for attachments.
>
> This email and any files transmitted with it are confidential
> and intended solely for the use of the individual or entity
> to whom they are addressed. This communication may contain
> material protected by attorney-client privilege. If you are
> not the intended recipient or the person responsible for
> delivering the email to the intended recipient, be advised
> that you have received this email in error and that any use,
> dissemination, forwarding, printing, or copying of this email
> is strictly prohibited. If you have received this email in
> error please notify the Information Systems Manager by
> telephone at (715)845-3111
>
> postmaster@wipfli.com
> http://www.wipfli.com
>
> ____________________________________________________________________
>
> This message has been generated by MIMEsweeper. This message
> and attachments have been swept for all known and recorded
> computer viruses. _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
> ---
> Incoming mail is certified Virus Free.
> Checked by AVG anti-virus system (http://www.grisoft.com).
> Version: 6.0.295 / Virus Database: 159 - Release Date: 01/11/2001
>
>