× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. February 2004

Re: Date compare Best Practices

Ok, so we can "pants" him also.

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





MWalter@xxxxxxxxxxxxxxx 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
02/26/2004 09:57 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Fax to

Subject
Re: Date compare Best Practices







Hey, we've all done this in a pinch. Plus, I believe this guy is running
RPGIII.

Thanks,

Mark

Mark D. Walter
Senior Programmer/Analyst
CCX, Inc.
mwalter@xxxxxxxxxx
http://www.ccxinc.com


|---------+----------------------------->
|         |           rob@xxxxxxxxx     |
|         |           Sent by:          |
|         |           rpg400-l-bounces@m|
|         |           idrange.com       |
|         |                             |
|         |                             |
|         |           02/26/2004 09:10  |
|         |           AM                |
|         |           Please respond to |
|         |           RPG programming on|
|         |           the AS400 /       |
|         |           iSeries           |
|         |                             |
|---------+----------------------------->
 
>------------------------------------------------------------------------------------------------------------------------------|
  |                                                       |
  |       To:       RPG programming on the AS400 / iSeries 
<rpg400-l@xxxxxxxxxxxx>                                               |
  |       cc:                                                       |
  |       Subject:  Re: Date compare Best Practices            |
 
>------------------------------------------------------------------------------------------------------------------------------|




Arrgh!  He's converting a newbie to the dark side!  Who all wants to get
together at COMMON and "pants" this guy?

Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





jfs@xxxxxxx
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
02/26/2004 08:27 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Fax to

Subject
Re: Date compare Best Practices






Sorry about that, I missed one zero, it should be:

C       dspfld    mult     10000.0001    wrkfld

It will also work to convert a YYYYMMDD 8.0 numeric date to MMDDYYYY.

Joe

Quoting simafrog <SimaFrog@xxxxxxxxxx>:

> This doesn't appear to be working correctly.
>
> > -----Original Message-----
> > From: jfs@xxxxxxx [mailto:jfs@xxxxxxx]
> > Sent: Wednesday, February 25, 2004, 12:05 PM
> > To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> > Subject: Re: Date compare Best Practices
> >
> > Rob,
> >
> > As long as you're only wanting to reverse the two entered fields, you
can
> > create a work field that is 8.0 and use the following command.
> >
> > C       dspfld    mult     1000.0001    wrkfld
> >
> > This will change the display date from MMDDYYYY to YYYYMMDD.  This
isn't an
>
> > efficient method to use for a large number of date reversals, but for
just
> a
> > few, it works ok.
> >
> > Joe
> >
> > Quoting simafrog <SimaFrog@xxxxxxxxxx>:
> >
> > > Hi,
> > > I am looking to take two dates entered and passed to a work file
build
> > > program. They are passed as MMDDYYYY from and to dates. They will be
> > compared
> > > with from and to dates in a master file and then records are
selected
> that
> > > pass. Since I have already written the first program that accepts
the
> entry
> > > from the user I can perhaps change my order in the program there.
THe
> > > presentation to the user must be in the order described. So far I
can
> only
> > > recall that I would take each date and rearrange it with a series of
> MOVES
> > > into a Data Structure. I am interested if there are better ways
again
> > > unfortunately in the older versions of RPG.
> > > Thanks,
> > > Rob
> > > _______________________________________________
> > > 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.
> > >
> > >
> > >
> >
> >
> >
> >
> > _______________________________________________
> > 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.
> >
> _______________________________________________
> 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.
>
>
>




_______________________________________________
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.


_______________________________________________
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.






_______________________________________________
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.

As an Amazon Associate we earn from qualifying purchases.

This thread ...
Follow-Ups:
Replies:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.