MVSFORUMS.com

NASCAR9 · Posted: Thu Apr 06, 2006 6:13 pm Post subject: Numeric to Text (Legal Amount)

Does anyone have a routine or query that will do the following?

Recieve a s9(09)v99 input and pass the 'Legal Amount' back.

Example would be:
In 92122
Out Nine-Hundred -Twenty-One Dollars and 22/100
or
Out Nine-Hundred-Twenty-One Dollars and 22 Cents

In 8933
Out Eighty Nine Dollars 21/100
or
Out Eighty Nine Dollars and 21 Cents

In 234355
Out Two Thousand Three Hundered Forty Three Dollars and 55/100
or
Out Two Thousand Three Hundered Forty Three Dollars and 55 Cents
_________________
Thanks,
NASCAR9

kolusu · Posted: Fri Apr 07, 2006 5:08 am Post subject:

NASCAR9,

I don't think it is possible to achieve the desired results using SQL. You may need an UDF. However there is a cobol pgm to do it. Are you interested?

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

NASCAR9 · Posted: Fri Apr 07, 2006 9:23 am Post subject:

Thanks Kolusu,
We a have many check programs here at work. All have some COBOL routine that produces the 'Legal Amount'. I searched and did not find a standard SQL Function, LE, or COBOL routine. Was hoping I missed something.

When you say COBOL PGM, are you referring to an IBM supplied routine or custom code?
_________________
Thanks,
NASCAR9

kolusu · Posted: Fri Apr 07, 2006 9:47 am Post subject: