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



... but you can write date (RPG data type) in any format to a date column in
a physical file or table.
The date format is only used to make the scaliger no readable, in which the
date is stored.
I asume you got problems because you try to write a character field (instead
of a date field)

Mit freundlichen Grüßen / Best regards

Birgitta Hauser


"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
?Train people well enough so they can leave, treat them well enough so they
don't want to.? (Richard Branson)


-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of
Danner, Duane
Sent: Freitag, 9. April 2021 15:51
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: RE: date issue

Peter

A ORDDAT1 L DATFMT(*USA)

A field in a physical file

-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Peter
Dow
Sent: Friday, April 09, 2021 1:01 AM
To: midrange-l@xxxxxxxxxxxxxxxxxx
Subject: Re: date issue

Hi Duane,

What's the definition of ORDDAT1?

--
*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
petercdow@xxxxxxxxx <mailto:petercdow@xxxxxxxxx> pdow@xxxxxxxxxxxxxx
<mailto:pdow@xxxxxxxxxxxxxx>

/
On 4/8/2021 2:00 PM, Danner, Duane wrote:
I am passing in a numeric field that is a 8 digit date, I want it to
convert to *USA MM/DD/YYYY

D CHARDATE1 S 8 0 INZ(01151949)
D USADATE S D DATFMT(*USA)

C MOVE DATEPO CHARDATE1
C EVAL USADATE = %DATE(CHARDATE1: *usa )
C MOVE USADATE ORDDAT1

Passing is a date into DATEPO of 20210325

What I need is ORDDAT1 to come back as 03/25/2021

Any ideas would be appreciated.

Duane Danner



--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
https://nam10.safelinks.protection.outlook.com/?url=https%3A%2F%2Flists.midr
ange.com%2Fmailman%2Flistinfo%2Fmidrange-l&amp;data=04%7C01%7Cddanner%40awtx
-itw.com%7Ca2c635686b6a42ca155908d8fb1cdba0%7C7fa3ed9ffff94884a6e28dd98886b7
75%7C0%7C0%7C637535448650518476%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAi
LCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&amp;sdata=Cj1%2Fbw5I1B
i5%2BofpIwL9uwMoLHLU4v0gTHRJVKzF0LQ%3D&amp;reserved=0
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://nam10.safelinks.protection.outlook.com/?url=https%3A%2F%2Farchive.mi
drange.com%2Fmidrange-l&amp;data=04%7C01%7Cddanner%40awtx-itw.com%7Ca2c63568
6b6a42ca155908d8fb1cdba0%7C7fa3ed9ffff94884a6e28dd98886b775%7C0%7C0%7C637535
448650518476%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJ
BTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&amp;sdata=HOKHiUxGFOQhU7PkWMz1zpewQ%2BLw4
wEdvnYsyEZG%2FbM%3D&amp;reserved=0.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate link:
https://nam10.safelinks.protection.outlook.com/?url=https%3A%2F%2Famazon.mid
range.com%2F&amp;data=04%7C01%7Cddanner%40awtx-itw.com%7Ca2c635686b6a42ca155
908d8fb1cdba0%7C7fa3ed9ffff94884a6e28dd98886b775%7C0%7C0%7C63753544865051847
6%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haW
wiLCJXVCI6Mn0%3D%7C1000&amp;sdata=FegaCdRrrtySPaoHjW12X3tzNv0YfsksAKmbui9oXF
I%3D&amp;reserved=0
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com


As an Amazon Associate we earn from qualifying purchases.

This thread ...

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.