Re: Read IFS

[Raul Jager <raul@xxxxxxxxxx>]

It works with o and 0.  Thank you


On 12/30/2017 01:04 PM, Bradley Stone wrote:
> What OS lever are you on?
>
> This seems to work for me:
>
> flags = O_RDONLY + O_TEXTDATA + O_CCSID
> fd = openstmf(filename:flags:0:0)
>
>
>
> Bradley V. Stone
> www.bvstools.com
> MAILTOOL Benefit #2 <https://www.bvstools.com/mailtool.html>: The ability
> to specify a "From" and/or "Reply To" email address!
>
> On Sat, Dec 30, 2017 at 9:50 AM, Raul Jager <raul@xxxxxxxxxx> wrote:
>
> > I am trying to read the Apache's log file, but in open I get a error
> > message:  Cod.:3490, dijo: Error de conversión.
> >
> > The log has a char code 1208 .  files with code 819 opens and reads
> > without problem.
> >
> > Here is the part of my program where I get the error:
> >
> >   /copy libhttp/qrpglesrc,IFSIO_H
> >   flags = O_RDONLY + O_TEXTDATA;
> >   fd = open(
> >   '//WWW/wseguro/logs/access_log.Q117122300'
> >   : flags);
> >   dsply fd;
> >
> > If I leave out the O_TEXTDATA flag it reads, but it does not convert to
> > ebcdic.  I tried the third parameter whit 1208, no success.
> >
> > Any ideas?
> >
> > TIA,
> >
> > Raúl
> >
> >
> > -- Este e-mail fue enviado desde el Mail Server del diario ABC Color --
> >             -- Verificado por Anti-Virus Corporativo Symantec --
> > --
> > This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> > mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at https://archive.midrange.com/rpg400-l.
> >
> > Please contact support@xxxxxxxxxxxx for any subscription related
> > questions.
> >
> > Help support midrange.com by shopping at amazon.com with our affiliate
> > link: http://amzn.to/2dEadiD


-- Este e-mail fue enviado desde el Mail Server del diario ABC Color -- 
            -- Verificado por Anti-Virus Corporativo Symantec --