RE: Free form date conversion

[Paul Jackson <paulgjackson@xxxxxxxxx>]

Hi Bob,

I tested it over the weekend. It's definitely on V5R1.

-Paul
--- Bob Cozzi <cozzi@rpgiv.com> wrote:
> Are you on V5R2?
> I'd have to double check my notes, but I think that
> feature was added in
> V5R2.
>
> Bob Cozzi
>
> > -----Original Message-----
> > From: rpg400-l-admin@midrange.com
> > [mailto:rpg400-l-admin@midrange.com] On Behalf Of
> Paul Jackson
> > Sent: Sunday, September 29, 2002 11:39 PM
> > To: rpg400-l@midrange.com
> > Subject: Re: Free form date conversion
> >
> >
> > Hello Birgitta,
> >
> > thanks for the info.
> > The reason I need the date to be in *JOB format is
> > that it will be passed within a command string
> that
> > uses *DATE parameters which require the date to be
> in
> > *JOB format.
> >
> > Actually I think I found the solution by searching
> the
> > ILE manual for *JOBRUN.  Apparantly the
> > %CHARACTER/%CHAR BIF will accept a date field AND
> a
> > value of *JOBRUN as in the following example:
> >
> > chardate = %char( datefield : *JOBRUN ) ;
> >
> > thanks!
> > --- BrgttHsr@aol.com wrote:
> > > --
> > > [ Picked text/plain from multipart/alternative ]
> > > Hello,
> > >
> > > if you use %date, the result field must be a
> date
> > > field.
> > > Using a datastructure you could overlay the date
> > > field through an
> > > alphanumeric field.
> > >
> > > Parameter 2 in %Date describes the date format
> of
> > > parameter 1. It only can be
> > > used, if you want to convert an alphanumeric or
> > > numeric field to a date
> > > field, otherwise the system knows the date
> format.
> > >
> > > I don't know how to use *JOBRUN without MOVE. In
> > > DatFmt() in D-Specs it can
> > > not be specified.
> > > Why do you need Job's Date Format? Wouldn't it
> be
> > > better to use *ISO which is
> > > the default value for date fields?
> > >
> > > Birgitta Hauser
> _______________________________________________
> > > 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.
> > >
> >
> >
> > =====
> > Help prevent pet overpopulation. Please spay &
> neuter your
> > pets. http://www.doghause.com/neuter.html
> > http://www.fixcats.com
> >
> > __________________________________________________
> > Do you Yahoo!?
> > New DSL Internet Access from SBC & Yahoo!
> > http://sbc.yahoo.com
> _______________________________________________
> > 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.
> >
> >
> >
>
> _______________________________________________
> 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.
>


=====
Help prevent pet overpopulation. Please spay & neuter your pets.
http://www.doghause.com/neuter.html
http://www.fixcats.com

__________________________________________________
Do you Yahoo!?
New DSL Internet Access from SBC & Yahoo!
http://sbc.yahoo.com