I have a DB2 file w/ two sets of Date Fields and two sets of Time Fields providing the start and stop time for a transaction.
I've spent 6 hours today searching the Forum and Help text trying to come up with a way convert those to date-time fields and determine the elapsed seconds between the time. My head hurts, so I'm asking for help
FILENAME=MNTWL101, SUFFIX=DB2 ,
REMARKS='WOTS - Labor Tracking', $
SEGMENT=MNTWL101, SEGTYPE=S0,
DESCRIPTION='WOTS - Labor Tracking', $
FIELDNAME=WLSDT, ALIAS=WLSDT, USAGE=MDY, ACTUAL=DATE,
TITLE='Clock-In,Date', DESCRIPTION='Clock-In Date', $
FIELDNAME=WLSTM, ALIAS=WLSTM, USAGE=HHIS, ACTUAL=HHIS,
TITLE='Clock-In,Time', DESCRIPTION='Clock-In Time', $
FIELDNAME=WLTDT, ALIAS=WLTDT, USAGE=MDY, ACTUAL=DATE,
TITLE='Clock-Out,Date', DESCRIPTION='Clock-Out Date', $
FIELDNAME=WLTTM, ALIAS=WLTTM, USAGE=HHIS, ACTUAL=HHIS,
TITLE='Clock-Out,Time', DESCRIPTION='Clock-Out Time', $
To create a Date-Time w/ the HINPUT, I need to get the file's Dates and Times to AlphaNumeric fields.
I can get the date to be AlphaNumeric, but is there a better option?
DEFINE FILE MNTWL101
D9DAT1/A8YYMD = WLSDT;
D9DAT2/A10 = D9DAT1;
END
I cannot figure out a way to convert the time field to be AlphaNumeric. Please help me?
Additionally, I'd prefer to convert a Date Field (WLSDT) and Time Field (WLSTM)
directly to a Date-Time field. If you can give me code to do that, I'd appreciate it.
Thanks!
Brian Bollmann
Spartan Light Metal Products
WebFocus 7.6.4 / iSeries / WebSphere