|
Yes, this could on one of those applications of H-SPEC
DECEDIT keyword. I am yet to find anything more relevant
>Sadiq wrote.....
>--------------------------------------------------------------
>Hi Chand,
>One way to solve this problem is as below
>H DECEDIT ('0.')
>DFld_12 S 12S 2 Inz(0)
>DFld_12_1 S 12S 0 Inz(123456789112)
>DFld_13 S 13
>C Move Fld_12_1 Fld_12
>C Eval Fld_13 = %EDITC(Fld_12 : '3')
>C Fld_13 Dsply
>C Fld_12 Dsply
>C Eval *Inlr = *On
>You may define the same data type field as Fld_13 in your display file
>Thanks
>Sadiq ..
DISCLAIMER:
This email (including any attachments) is intended for the sole use of the
intended recipient/s and may contain material that is CONFIDENTIAL AND PRIVATE
COMPANY INFORMATION. Any review or reliance by others or copying or
distribution or forwarding of any or all of the contents in this message is
STRICTLY PROHIBITED. If you are not the intended recipient, please contact the
sender by email and delete all copies; your cooperation in this regard is
appreciated.
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.