RE: Converting alpha to numeric in Query

The microsecond solution did the trick.

Thanks everyone!

Albert York



        -----Original Message-----
        From:   Vernon Hamberg [SMTP:vhamberg@attbi.com]
        Sent:   Tuesday, April 02, 2002 12:53 PM
        To:     midrange-l@midrange.com
        Subject:        Re: Converting alpha to numeric in Query

        Query/400 cannot use UDFs, can it? Still, the concept is the same,
as there
        is a MICROSECOND function in Query/400.

        At 03:47 PM 4/2/02 -0500, you wrote:
        >Dan Bale wrote:
        > >
        > > Wrong way.  That converts a numeric to alpha.  Albert wants the
other way.
        > > AFAIK, can't be done.
        > >
        > > - Dan Bale
        >
        >Actually, it can be done:
        >
        >1) Create a UDF that calls an ILE/RPG function to do the job or
        >
        >2) use the MICROSECOND SQL function... To do the latter, you need
to
        >create a
        >string that looks like an AS/400 timestamp:
        >
        >e.g.  0001-01-01-01.01.01.000000 by doing this:
        >
        >select microsecond('0001-01-01-01.01.01.'||your_field) from file.
        >
        >This assumes a 6 digit character field.  If your field is shorter,
add
        >corresponding zeroes to after the last decimal point in the
constant
        >field.  So, for a 3 digit field:
        >
        >select microsecond('0001-01-01-01.01.01.000'||your_field) from
file.
        >
        >microsecond returns a numeric value.
        >
        >Barry
        >_______________________________________________
        >This is the Midrange Systems Technical Discussion (MIDRANGE-L)
mailing list
        >To post a message email: MIDRANGE-L@midrange.com
        >To subscribe, unsubscribe, or change list options,
        >visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
        >or email: MIDRANGE-L-request@midrange.com
        >Before posting, please take a moment to review the archives
        >at http://archive.midrange.com/midrange-l.

        _______________________________________________
        This is the Midrange Systems Technical Discussion (MIDRANGE-L)
mailing list
        To post a message email: MIDRANGE-L@midrange.com
        To subscribe, unsubscribe, or change list options,
        visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
        or email: MIDRANGE-L-request@midrange.com
        Before posting, please take a moment to review the archives
        at http://archive.midrange.com/midrange-l.