Amount to word in sql function??

/******Object:UserDefinedFunction[dbo].[NumberToWordsNew]
SETANSI_NULLSON
GO
SETQUOTED_IDENTIFIERON
GO
ALTERFUNCTION[dbo].[NumberToWordsNew](@intNumberValueINTEGER)
RETURNSVARCHAR(2000)
AS
BEGIN
DECLARE@strNumberStringVARCHAR(9)
DECLARE@strReturnVARCHAR(2000)
DECLARE@intUnitsSMALLINT
--Createtableofnumbergroups
DECLARE@tblNumberGroupsTABLE(UnitsSMALLINT,HundredsSMALLINT,TensSMALLINT)
--Handleerrorsand'quickwins'
IF@intNumberValueISNULLRETURNNULL
IFISNUMERIC(@intNumberValue)=0RETURNNULL
IF@intNumberValue=0RETURN'ZERO'
IF@intNumberValue<0
BEGIN
SET@strReturn='MINUS'
SET@intNumberValue=ABS(@intNumberValue)
END
SET@intUnits=0
--Populatetableofnumbergroups
WHILE(@intNumberValue%1000)>0OR(@intNumberValue/1000)>0
BEGIN
INSERTINTO@tblNumberGroups(Units,Hundreds,Tens)VALUES(@intUnits,(@intNumberValue%1000)/100,(@intNumberValue%1000)%100)
SELECT@intNumberValue=CAST(@intNumberValue/1000ASINTEGER)
SET@intUnits=@intUnits+1
END
--Removelastunitadded
SET@intUnits=@intUnits-1
--Concatenatetextnumberbyreadingnumbergroupsinreverseorder
SELECT@strReturn=ISNULL(@strReturn,'')+
ISNULL(
ISNULL((CASEHundreds
WHEN1THEN'ONEHUNDRED'
WHEN2THEN'TWOHUNDRED'
WHEN3THEN'THREEHUNDRED'
WHEN4THEN'FOURHUNDRED'
WHEN5THEN'FIVEHUNDRED'
WHEN6THEN'SIXHUNDRED'
WHEN7THEN'SEVENHUNDRED'
WHEN8THEN'EIGHTHUNDRED'
WHEN9THEN'NINEHUNDRED'
END),'')+
CASEWHEN(Hundreds>0ORUnits<@intUnits)ANDTens>0THEN'AND'ELSE''END+
ISNULL((CASETens/10
WHEN2THEN'TWENTY'
WHEN3THEN'THIRTY'
WHEN4THEN'FORTY'
WHEN5THEN'FIFTY'
WHEN6THEN'SIXTY'
WHEN7THEN'SEVENTY'
WHEN8THEN'EIGHTY'
WHEN9THEN'NINETY'
END),'')+
ISNULL((CASETens
WHEN10THEN'TEN'
WHEN11THEN'ELEVEN'
WHEN12THEN'TWELVE'
WHEN13THEN'THIRTEEN'
WHEN14THEN'FOURTEEN'
WHEN15THEN'FIFTEEN'
WHEN16THEN'SIXTEEN'
WHEN17THEN'SEVENTEEN'
WHEN18THEN'EIGHTEEN'
WHEN19THEN'NINETEEN'
END),'')+
COALESCE(
CASEWHENTens%10=1ANDTens/10<>1THEN'ONE'END,
CASEWHENTens%10=2ANDTens/10<>1THEN'TWO'END,
CASEWHENTens%10=3ANDTens/10<>1THEN'THREE'END,
CASEWHENTens%10=4ANDTens/10<>1THEN'FOUR'END,
CASEWHENTens%10=5ANDTens/10<>1THEN'FIVE'END,
CASEWHENTens%10=6ANDTens/10<>1THEN'SIX'END,
CASEWHENTens%10=7ANDTens/10<>1THEN'SEVEN'END,
CASEWHENTens%10=8ANDTens/10<>1THEN'EIGHT'END,
CASEWHENTens%10=9ANDTens/10<>1THEN'NINE'END,
'')+
COALESCE(
CASEWHENUnits=1AND(Hundreds>0ORTens>0)THEN'THOUSAND'END,
CASEWHENUnits=2AND(Hundreds>0ORTens>0)THEN'MILLION'END,
CASEWHENUnits=3AND(Hundreds>0ORTens>0)THEN'BILLION'END,
CASEWHENUnits=4AND(Hundreds>0ORTens>0)THEN'TRILLION'END,
'')
,'')
FROM@tblNumberGroups
ORDERBYunitsDESC
--Getridofallthespaces
WHILECHARINDEX('',@strReturn)>0
BEGIN
SET@strReturn=REPLACE(@strReturn,'','')
END
SET@strReturn=LTRIM(RTRIM(@strReturn))
RETURN@strReturn
END
/******Object:UserDefinedFunction[dbo].[DSP_NumericToRupees]ScriptDate:04/02/201518:43:07******/
SETANSI_NULLSON
GO
SETQUOTED_IDENTIFIERON
GO
ALTERFUNCTION[dbo].[DSP_NumericToRupees](@RUPEESASDECIMAL(30,2))
RETURNSVARCHAR(2000)
AS
BEGIN
DECLARE@INNTBL_01TABLE(RECNOINTIDENTITY(1,1),MTEXTNVARCHAR(50))
DECLARE@INNTBL_02TABLE(RECNOINTIDENTITY(1,1),MTEXTNVARCHAR(50))
DECLARE@AMOUNTNUMERIC(38,0)
DECLARE@PAISEASINT
SET@AMOUNT=FLOOR(@RUPEES)
SET@PAISE=CAST(CONVERT(DECIMAL(10,0),(@RUPEES%1)*100)ASINT)
--STEP2:
--NOWADDUPTHESALTANDPEPPERONTOTABLEI.E.INSERTTHEWORDSINTOIT
INSERTINTO@INNTBL_01SELECT'One'
INSERTINTO@INNTBL_01SELECT'Two'
INSERTINTO@INNTBL_01SELECT'Three'
INSERTINTO@INNTBL_01SELECT'Four'
INSERTINTO@INNTBL_01SELECT'Five'
INSERTINTO@INNTBL_01SELECT'Six'
INSERTINTO@INNTBL_01SELECT'Seven'
INSERTINTO@INNTBL_01SELECT'Eight'
INSERTINTO@INNTBL_01SELECT'Nine'
INSERTINTO@INNTBL_01SELECT'Ten'
INSERTINTO@INNTBL_01SELECT'Eleven'
INSERTINTO@INNTBL_01SELECT'Twelve'
INSERTINTO@INNTBL_01SELECT'Thirteen'
INSERTINTO@INNTBL_01SELECT'Fourteen'
INSERTINTO@INNTBL_01SELECT'Fifteen'
INSERTINTO@INNTBL_01SELECT'Sixteen'
INSERTINTO@INNTBL_01SELECT'Seventeen'
INSERTINTO@INNTBL_01SELECT'Eighteen'
INSERTINTO@INNTBL_01SELECT'Nineteen'
INSERTINTO@INNTBL_01SELECT'Twenty'
--SIMILARY,INSERTTHEMULTIPLES
INSERTINTO@INNTBL_02SELECT'Ten'
INSERTINTO@INNTBL_02SELECT'Twenty'
INSERTINTO@INNTBL_02SELECT'Thirty'
INSERTINTO@INNTBL_02SELECT'Forty'
INSERTINTO@INNTBL_02SELECT'Fifty'
INSERTINTO@INNTBL_02SELECT'Sixty'
INSERTINTO@INNTBL_02SELECT'Seventy'
INSERTINTO@INNTBL_02SELECT'Eighty'
INSERTINTO@INNTBL_02SELECT'Ninety'
--STEP3:
----CHECKFORTHELIMITOFTHEAMOUNTI.E.WHATISTHEPLACEVALUEOFDIGITS--LACS,THOUSANDSORHUNDREDS
DECLARE@WORDVARCHAR(2000)
SELECT@WORD=''
DECLARE@M_AMT01BigInt,@M_AMT02BigInt
IF@AMOUNT>=10000000BEGIN
SET@M_AMT01=@AMOUNT
SELECT@AMOUNT=(@AMOUNT%10000000)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/10000000
DECLARE@WORD1VARCHAR(300)
SET@WORD1=''
--IF@M_AMT01<100AND@M_AMT01>20BEGIN
--SET@M_AMT02=@M_AMT01
--SET@M_AMT01=(@M_AMT01%10)
--SET@M_AMT02=(@M_AMT02-@M_AMT01)/10
--SET@WORD1=(SELECT@WORD1+MTEXTFROM@INNTBL_02WHERERECNO=@M_AMT02)
--END
IF@M_AMT01<=20AND@M_AMT01<>0BEGIN
SET@WORD1=(SELECT@WORD1+MTEXTFROM@INNTBL_01WHERERECNO=@M_AMT01)
END
SET@WORD=dbo.NumberToWordsNew(@M_AMT01)+'Crore'
END
IF@AMOUNT<10000000AND@AMOUNT>=100000BEGIN
SET@M_AMT01=@AMOUNT
SELECT@AMOUNT=(@AMOUNT%100000)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/100000
SET@WORD1=''
IF@M_AMT01<100AND@M_AMT01>20BEGIN
SET@M_AMT02=@M_AMT01
SET@M_AMT01=(@M_AMT01%10)
SET@M_AMT02=(@M_AMT02-@M_AMT01)/10
SET@WORD1=(SELECT@WORD1+MTEXTFROM@INNTBL_02WHERERECNO=@M_AMT02)
END
IF@M_AMT01<=20AND@M_AMT01<>0BEGIN
SET@WORD1=(SELECT@WORD1+MTEXTFROM@INNTBL_01WHERERECNO=@M_AMT01)
END
SET@WORD=@WORD+@WORD1+'Lakh'
END
IF@AMOUNT<100000AND@AMOUNT>=1000BEGIN
SET@M_AMT01=@AMOUNT
SET@AMOUNT=(@AMOUNT%1000)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/1000
SET@WORD1=''
IF@M_AMT01<100AND@M_AMT01>20BEGIN
SET@M_AMT02=@M_AMT01
SET@M_AMT01=(@M_AMT01%10)
SET@M_AMT02=(@M_AMT02-@M_AMT01)/10
SET@WORD1=(SELECT@WORD1+MTEXT+''FROM@INNTBL_02WHERERECNO=@M_AMT02)
END
IF@M_AMT01<=20AND@M_AMT01<>0BEGIN
SET@WORD1=(SELECT@WORD1+MTEXT+''FROM@INNTBL_01WHERERECNO=@M_AMT01)
END
SET@WORD=@WORD+@WORD1+'Thousand'
END
IF@AMOUNT<1000AND@AMOUNT>=100BEGIN
SET@M_AMT01=@AMOUNT
SET@AMOUNT=(@AMOUNT%100)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/100
SET@WORD=(SELECT@WORD+''+MTEXT+'Hundred'FROM@INNTBL_01WHERERECNO=@M_AMT01)
END
IF@AMOUNT<100AND@AMOUNT>20BEGIN
SET@M_AMT01=@AMOUNT
SET@AMOUNT=(@AMOUNT%10)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/10
SET@WORD=(SELECT@WORD+MTEXT+''FROM@INNTBL_02WHERERECNO=@M_AMT01)
END
IF@AMOUNT<=20AND@AMOUNT>=1BEGIN
SET@WORD=(SELECT@WORD+MTEXT+''FROM@INNTBL_01WHERERECNO=@AMOUNT)
END
--Change
--SET@WORD=@WORD+'rupees'
SET@WORD=@WORD+''
--STEP4:
--CALCULATETHEPAISEALSO.
DECLARE@WORDPVARCHAR(300)
SET@WORDP=''
IF@PAISE<>0BEGIN
IF@PAISE<100AND@PAISE>20BEGIN
DECLARE@PAISE_01VARCHAR(300)
SET@PAISE_01=@PAISE
SET@PAISE=(@PAISE%10)
SET@PAISE_01=(@PAISE_01-@PAISE)/10
SET@WORDP=(SELECT@WORDP+MTEXTFROM@INNTBL_02WHERERECNO=@PAISE_01)
END
IF@PAISE<=20AND@PAISE>=1BEGIN
SET@WORDP=(SELECT@WORDP+MTEXTFROM@INNTBL_01WHERERECNO=@PAISE)
END
SET@WORD=@WORD+'and'+@WORDP+'paisa'
END
IF@AMOUNT>=1000000000BEGIN
SET@WORD=''
END
ReturnUPPER(@WORD+'ONLY')
END

1 Reply

Know the answer? Post it — somebody with the same question will find it here.

Shakti Singh Dulawat10y ago
/******Object:UserDefinedFunction[dbo].[NumberToWordsNew]
SETANSI_NULLSON
GO
SETQUOTED_IDENTIFIERON
GO
ALTERFUNCTION[dbo].[NumberToWordsNew](@intNumberValueINTEGER)
RETURNSVARCHAR(2000)
AS
BEGIN
DECLARE@strNumberStringVARCHAR(9)
DECLARE@strReturnVARCHAR(2000)
DECLARE@intUnitsSMALLINT
--Createtableofnumbergroups
DECLARE@tblNumberGroupsTABLE(UnitsSMALLINT,HundredsSMALLINT,TensSMALLINT)
--Handleerrorsand'quickwins'
IF@intNumberValueISNULLRETURNNULL
IFISNUMERIC(@intNumberValue)=0RETURNNULL
IF@intNumberValue=0RETURN'ZERO'
IF@intNumberValue<0
BEGIN
SET@strReturn='MINUS'
SET@intNumberValue=ABS(@intNumberValue)
END
SET@intUnits=0
--Populatetableofnumbergroups
WHILE(@intNumberValue%1000)>0OR(@intNumberValue/1000)>0
BEGIN
INSERTINTO@tblNumberGroups(Units,Hundreds,Tens)VALUES(@intUnits,(@intNumberValue%1000)/100,(@intNumberValue%1000)%100)
SELECT@intNumberValue=CAST(@intNumberValue/1000ASINTEGER)
SET@intUnits=@intUnits+1
END
--Removelastunitadded
SET@intUnits=@intUnits-1
--Concatenatetextnumberbyreadingnumbergroupsinreverseorder
SELECT@strReturn=ISNULL(@strReturn,'')+
ISNULL(
ISNULL((CASEHundreds
WHEN1THEN'ONEHUNDRED'
WHEN2THEN'TWOHUNDRED'
WHEN3THEN'THREEHUNDRED'
WHEN4THEN'FOURHUNDRED'
WHEN5THEN'FIVEHUNDRED'
WHEN6THEN'SIXHUNDRED'
WHEN7THEN'SEVENHUNDRED'
WHEN8THEN'EIGHTHUNDRED'
WHEN9THEN'NINEHUNDRED'
END),'')+
CASEWHEN(Hundreds>0ORUnits<@intUnits)ANDTens>0THEN'AND'ELSE''END+
ISNULL((CASETens/10
WHEN2THEN'TWENTY'
WHEN3THEN'THIRTY'
WHEN4THEN'FORTY'
WHEN5THEN'FIFTY'
WHEN6THEN'SIXTY'
WHEN7THEN'SEVENTY'
WHEN8THEN'EIGHTY'
WHEN9THEN'NINETY'
END),'')+
ISNULL((CASETens
WHEN10THEN'TEN'
WHEN11THEN'ELEVEN'
WHEN12THEN'TWELVE'
WHEN13THEN'THIRTEEN'
WHEN14THEN'FOURTEEN'
WHEN15THEN'FIFTEEN'
WHEN16THEN'SIXTEEN'
WHEN17THEN'SEVENTEEN'
WHEN18THEN'EIGHTEEN'
WHEN19THEN'NINETEEN'
END),'')+
COALESCE(
CASEWHENTens%10=1ANDTens/10<>1THEN'ONE'END,
CASEWHENTens%10=2ANDTens/10<>1THEN'TWO'END,
CASEWHENTens%10=3ANDTens/10<>1THEN'THREE'END,
CASEWHENTens%10=4ANDTens/10<>1THEN'FOUR'END,
CASEWHENTens%10=5ANDTens/10<>1THEN'FIVE'END,
CASEWHENTens%10=6ANDTens/10<>1THEN'SIX'END,
CASEWHENTens%10=7ANDTens/10<>1THEN'SEVEN'END,
CASEWHENTens%10=8ANDTens/10<>1THEN'EIGHT'END,
CASEWHENTens%10=9ANDTens/10<>1THEN'NINE'END,
'')+
COALESCE(
CASEWHENUnits=1AND(Hundreds>0ORTens>0)THEN'THOUSAND'END,
CASEWHENUnits=2AND(Hundreds>0ORTens>0)THEN'MILLION'END,
CASEWHENUnits=3AND(Hundreds>0ORTens>0)THEN'BILLION'END,
CASEWHENUnits=4AND(Hundreds>0ORTens>0)THEN'TRILLION'END,
'')
,'')
FROM@tblNumberGroups
ORDERBYunitsDESC
--Getridofallthespaces
WHILECHARINDEX('',@strReturn)>0
BEGIN
SET@strReturn=REPLACE(@strReturn,'','')
END
SET@strReturn=LTRIM(RTRIM(@strReturn))
RETURN@strReturn
END
/******Object:UserDefinedFunction[dbo].[DSP_NumericToRupees]ScriptDate:04/02/201518:43:07******/
SETANSI_NULLSON
GO
SETQUOTED_IDENTIFIERON
GO
ALTERFUNCTION[dbo].[DSP_NumericToRupees](@RUPEESASDECIMAL(30,2))
RETURNSVARCHAR(2000)
AS
BEGIN
DECLARE@INNTBL_01TABLE(RECNOINTIDENTITY(1,1),MTEXTNVARCHAR(50))
DECLARE@INNTBL_02TABLE(RECNOINTIDENTITY(1,1),MTEXTNVARCHAR(50))
DECLARE@AMOUNTNUMERIC(38,0)
DECLARE@PAISEASINT
SET@AMOUNT=FLOOR(@RUPEES)
SET@PAISE=CAST(CONVERT(DECIMAL(10,0),(@RUPEES%1)*100)ASINT)
--STEP2:
--NOWADDUPTHESALTANDPEPPERONTOTABLEI.E.INSERTTHEWORDSINTOIT
INSERTINTO@INNTBL_01SELECT'One'
INSERTINTO@INNTBL_01SELECT'Two'
INSERTINTO@INNTBL_01SELECT'Three'
INSERTINTO@INNTBL_01SELECT'Four'
INSERTINTO@INNTBL_01SELECT'Five'
INSERTINTO@INNTBL_01SELECT'Six'
INSERTINTO@INNTBL_01SELECT'Seven'
INSERTINTO@INNTBL_01SELECT'Eight'
INSERTINTO@INNTBL_01SELECT'Nine'
INSERTINTO@INNTBL_01SELECT'Ten'
INSERTINTO@INNTBL_01SELECT'Eleven'
INSERTINTO@INNTBL_01SELECT'Twelve'
INSERTINTO@INNTBL_01SELECT'Thirteen'
INSERTINTO@INNTBL_01SELECT'Fourteen'
INSERTINTO@INNTBL_01SELECT'Fifteen'
INSERTINTO@INNTBL_01SELECT'Sixteen'
INSERTINTO@INNTBL_01SELECT'Seventeen'
INSERTINTO@INNTBL_01SELECT'Eighteen'
INSERTINTO@INNTBL_01SELECT'Nineteen'
INSERTINTO@INNTBL_01SELECT'Twenty'
--SIMILARY,INSERTTHEMULTIPLES
INSERTINTO@INNTBL_02SELECT'Ten'
INSERTINTO@INNTBL_02SELECT'Twenty'
INSERTINTO@INNTBL_02SELECT'Thirty'
INSERTINTO@INNTBL_02SELECT'Forty'
INSERTINTO@INNTBL_02SELECT'Fifty'
INSERTINTO@INNTBL_02SELECT'Sixty'
INSERTINTO@INNTBL_02SELECT'Seventy'
INSERTINTO@INNTBL_02SELECT'Eighty'
INSERTINTO@INNTBL_02SELECT'Ninety'
--STEP3:
----CHECKFORTHELIMITOFTHEAMOUNTI.E.WHATISTHEPLACEVALUEOFDIGITS--LACS,THOUSANDSORHUNDREDS
DECLARE@WORDVARCHAR(2000)
SELECT@WORD=''
DECLARE@M_AMT01BigInt,@M_AMT02BigInt
IF@AMOUNT>=10000000BEGIN
SET@M_AMT01=@AMOUNT
SELECT@AMOUNT=(@AMOUNT%10000000)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/10000000
DECLARE@WORD1VARCHAR(300)
SET@WORD1=''
--IF@M_AMT01<100AND@M_AMT01>20BEGIN
--SET@M_AMT02=@M_AMT01
--SET@M_AMT01=(@M_AMT01%10)
--SET@M_AMT02=(@M_AMT02-@M_AMT01)/10
--SET@WORD1=(SELECT@WORD1+MTEXTFROM@INNTBL_02WHERERECNO=@M_AMT02)
--END
IF@M_AMT01<=20AND@M_AMT01<>0BEGIN
SET@WORD1=(SELECT@WORD1+MTEXTFROM@INNTBL_01WHERERECNO=@M_AMT01)
END
SET@WORD=dbo.NumberToWordsNew(@M_AMT01)+'Crore'
END
IF@AMOUNT<10000000AND@AMOUNT>=100000BEGIN
SET@M_AMT01=@AMOUNT
SELECT@AMOUNT=(@AMOUNT%100000)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/100000
SET@WORD1=''
IF@M_AMT01<100AND@M_AMT01>20BEGIN
SET@M_AMT02=@M_AMT01
SET@M_AMT01=(@M_AMT01%10)
SET@M_AMT02=(@M_AMT02-@M_AMT01)/10
SET@WORD1=(SELECT@WORD1+MTEXTFROM@INNTBL_02WHERERECNO=@M_AMT02)
END
IF@M_AMT01<=20AND@M_AMT01<>0BEGIN
SET@WORD1=(SELECT@WORD1+MTEXTFROM@INNTBL_01WHERERECNO=@M_AMT01)
END
SET@WORD=@WORD+@WORD1+'Lakh'
END
IF@AMOUNT<100000AND@AMOUNT>=1000BEGIN
SET@M_AMT01=@AMOUNT
SET@AMOUNT=(@AMOUNT%1000)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/1000
SET@WORD1=''
IF@M_AMT01<100AND@M_AMT01>20BEGIN
SET@M_AMT02=@M_AMT01
SET@M_AMT01=(@M_AMT01%10)
SET@M_AMT02=(@M_AMT02-@M_AMT01)/10
SET@WORD1=(SELECT@WORD1+MTEXT+''FROM@INNTBL_02WHERERECNO=@M_AMT02)
END
IF@M_AMT01<=20AND@M_AMT01<>0BEGIN
SET@WORD1=(SELECT@WORD1+MTEXT+''FROM@INNTBL_01WHERERECNO=@M_AMT01)
END
SET@WORD=@WORD+@WORD1+'Thousand'
END
IF@AMOUNT<1000AND@AMOUNT>=100BEGIN
SET@M_AMT01=@AMOUNT
SET@AMOUNT=(@AMOUNT%100)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/100
SET@WORD=(SELECT@WORD+''+MTEXT+'Hundred'FROM@INNTBL_01WHERERECNO=@M_AMT01)
END
IF@AMOUNT<100AND@AMOUNT>20BEGIN
SET@M_AMT01=@AMOUNT
SET@AMOUNT=(@AMOUNT%10)
SET@M_AMT01=(@M_AMT01-@AMOUNT)/10
SET@WORD=(SELECT@WORD+MTEXT+''FROM@INNTBL_02WHERERECNO=@M_AMT01)
END
IF@AMOUNT<=20AND@AMOUNT>=1BEGIN
SET@WORD=(SELECT@WORD+MTEXT+''FROM@INNTBL_01WHERERECNO=@AMOUNT)
END
--Change
--SET@WORD=@WORD+'rupees'
SET@WORD=@WORD+''
--STEP4:
--CALCULATETHEPAISEALSO.
DECLARE@WORDPVARCHAR(300)
SET@WORDP=''
IF@PAISE<>0BEGIN
IF@PAISE<100AND@PAISE>20BEGIN
DECLARE@PAISE_01VARCHAR(300)
SET@PAISE_01=@PAISE
SET@PAISE=(@PAISE%10)
SET@PAISE_01=(@PAISE_01-@PAISE)/10
SET@WORDP=(SELECT@WORDP+MTEXTFROM@INNTBL_02WHERERECNO=@PAISE_01)
END
IF@PAISE<=20AND@PAISE>=1BEGIN
SET@WORDP=(SELECT@WORDP+MTEXTFROM@INNTBL_01WHERERECNO=@PAISE)
END
SET@WORD=@WORD+'and'+@WORDP+'paisa'
END
IF@AMOUNT>=1000000000BEGIN
SET@WORD=''
END
ReturnUPPER(@WORD+'ONLY')
END
0