Hopefully this all makes sense to you.

Display File Fields
Position to . . . . . .:
Physical File . . . . .: MCAH File Type . . . . . . .: PF
Library . . . . . . . .: MPMS9S Record Length . . . . .: 42
Record Format. . . . . .: RMCAH Number of fields. . . .: 8
Key Field Length Dec Type From To Text
CASTAT 1 A 1 1 COMBINE STATUS (*B,A-I)
K1 CAACFM 9 A 2 10 FROM ACCOUNT #
CAACTO 9 A 11 19 TO ACCOUNT #
CAUSER 10 A 20 29 USER COMBINING
CADATE 8 0 P 30 34 DATE OF COMBINE
CATIME 6 0 S 35 40 TIME OF COMBINE
CAPRT 1 A 41 41 PRINTED FLAG (Y/N)
UISOURCE 1 A 42 42 ENTRY SOURCE


Define Result Fields

Type definitions using field names or constants and operators, press Enter.
Operators: +, -, *, /, SUBSTR, ||, DATE...

Field Expression Column Heading Len Dec
TESTING1 substr(digits(catime),1,2)|| converted time.
':'||substr(digits(catime),3,2)||
':'||substr(digits(catime),5,2)

TESTING2 time(testing1)

Select and Sequence Fields
Type sequence number (0-9999) for the names of up to 500 fields to
appear in the report, press Enter.
Seq Field Text Len Dec
10 TESTING1 substr(digits(catime),1,2)|| ':'||subs 8
20 CATIME TIME OF COMBINE 6 0
30 TESTING2 time(testing1) 8 T


Display File Fields
Position to . . . . . .:
Physical File . . . . .: TESTTIME File Type . . . . . . .: PF
Library . . . . . . . .: KEVIN Record Length . . . . .: 22
Record Format. . . . . .: TESTTIME Number of fields. . . .: 3
Key Field Length Dec Type From To Text
TESTING1 8 A 1 8 substr(digits(catime),1,2)|| ':'||
CATIME 6 0 S 9 14 TIME OF COMBINE
TESTING2 8 T 15 22 time(testing1)



On Tue, 2021-11-16 at 11:48 -0500, Art Tostaine, Jr. wrote:
I'm trying to modify an old *QRYDFN to convert an 6,0 field to a time.

I've tried all sorts of combinations in the result field options but can't
get anything to work. If there is a way I can create a view that converts
to time and use that instead that would be fine.

I need to do this because the output file is converted to CSV using
CPYTOIMPF. I need the editing in the CSV so Excel recognizes the column as
a time.

Thanks, Art

[https://www.medtronsoftware.com/img/MedtronMinilogo.bmp]
Kevin Bucknum

Senior Programmer Analyst

MEDDATA / MEDTRON

120 Innwood Drive
Covington LA 70433
Local: 985-893-2550<tel:985-893-2550>
Toll Free: 877-893-2550<tel:877-893-2550>
https://www.medtronsoftware.com


CONFIDENTIALITY NOTICE

This document and any accompanying this email transmission contain confidential information, belonging to the sender that is legally privileged. This information is intended only for the use of the individual or entity named above. The authorized recipient of this information is prohibited from disclosing this information to any other party and is required to destroy the information after its stated need has been fulfilled. If you are not the intended recipient, or the employee of agent responsible to deliver it to the intended recipient, you are hereby notified that any disclosure, copying, distribution or action taken in reliance on the contents of these documents is STRICTLY PROHIBITED. If you have received this email in error, please notify the sender immediately to arrange for return or destruction of these documents.

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