|
That took care of the problem Mike, thanks.....although I noticed something with th time that I don't like. Time is displayed as hh.mm.ss when I really was hoping for HHMM or HH:MM definitely don't need seconds and need to make sure it is military time. Oh well I'll have to work on that some On Tue, 4 Jan 2005 14:20:52 -0500, Michael Jacobsen wrote > Unless I am misunderstanding what you are doing, why use the data > structure? > > Eval LastUpdateD = %Char(DUpdateDDate) + ' ' + %Char(UpdateDTime) > > Can't you do that, with LastUpdateD defined as Alpha? > > Mike > > rpg400-l-bounces@xxxxxxxxxxxx wrote on 01/04/2005 02:09:24 PM: > > > I have a display file that has a 19 byte character field called > DLSUPDATED. > > > > I need to concatenate two fields from a physical file and place it in > this > > field. Those two fields are LSPUPDDT (date field), and LSPUPDTIM (time > > field). > > > > I created a data structure for this: > > > > 0041.03 D DS > > 0041.04 DLASTUPDATED 1 16 > > 0041.05 DUPDATEDDATE 1 10 > > 0041.06 DUPDATEDTIME 12 19 > > > > Then in a subroutine I moved the physcial file fields into the > DUPdATEDDATE > > and DUPDATEDTIME portions of the Data structure. then attempted to > write it > > out with a move statement moving the LASTUPDATED to the display field > > DLSPUPDATED. > > > > I am getting a compile error that is telling me the fields are not > defined. > > there is also another error that is telling me that the types are not > > compatible..... > > > > Any help would be appreciated....I'm at a loss on how to correct this. > > -- > > 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. -- Open WebMail Project (http://openwebmail.org) ------- End of Forwarded Message ------- -- Open WebMail Project (http://openwebmail.org) ------- End of Forwarded Message ------- -- Open WebMail Project (http://openwebmail.org)
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.