powerh-l Digest, Vol 165, Issue 1

James B. Byrne byrnejb at harte-lyne.ca
Thu Dec 8 14:19:58 CST 2022


Thank you.

On Thu, December 8, 2022 15:01, Ken Langendock wrote:
> Here is what I have used in the past.
>
> See the copy module that has all the code required to change date formatting.
>
> ;From my standard copy module used thru out the system I define the date format
>   TEMP T-DateFormat CHARACTER * 1 &
>        RESET AT STARTUP &
>       ;INITIAL T-Security[100:1]
>        INITIAL " " ;American
>
> In the INPUT procedure I simply call this based on the Dictionary format:
> PROCEDURE INPUT T-SelectDateFrom
> BEGIN
>   DO INTERNAL INPUT-MMDDYYYY
> END
>
> Hope this helps steer you in the right direction:
>
> Ken
>
>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: empty.txt
URL: <http://lists.sowder.com/pipermail/powerh-l/attachments/20221208/fe9a0aed/attachment-0001.txt>


More information about the powerh-l mailing list