In a given number if the fourth digit is 0 i wanto remove th

vijaydev · Post by **vijaydev** » Sat Jun 30, 2007 6:07 am

I want to remove the 0 if it is 4th byte from the given number.

Eg

123045678 -- i need 12345678
9870124 -- i need 987124
80124578 -- i need 80124578

Pls. help, Thanks in Advance

Vijay

JoshGeorge · Post by **JoshGeorge** » Sat Jun 30, 2007 6:25 am

You can try something like this :

Code: Select all

if In.string[4,1] = 0 then In.string[4,1] = '' Else In.string
or
if In.string[4,1] = 0 then In.string[1,3]:In.string[5,Len(In.string)] Else In.string

vijaydev · Post by **vijaydev** » Sat Jun 30, 2007 7:41 am

Thank you Joshy George

vijay

ray.wurlod · Post by **ray.wurlod** » Sat Jun 30, 2007 7:55 am

The first suggestion won't work, because you can't have an assignment statement in an expression. (In.string[4,1] = '') will be treated as a comparison expression and always return 0 (for False).

The second suggestion is a good one.

JoshGeorge · Post by **JoshGeorge** » Sat Jun 30, 2007 8:06 am

Rightly said, only the second one will work

Code: Select all

if In.string[4,1] = 0 then In.string[1,3]:In.string[5,Len(In.string)] Else In.string