String find and replace 1

[Steve688]

I am trying to search a string for an errant space at the end of a name, and then replace the record with the name minus the space at the end. This will help in some record comparisons later down the line.

I'm pretty sure that I am missing only something small, Thanks in advance.

srcTC.open(sourcefile)
srcTC.edit()
	while not srcTC.eot()
             
     	  Fname = srcTC."FIRSTNAME"
   	  Fnsize = (Fname.size())  ;// reports the amount of characters in the Firstname field.
	  if subStr(Fname,1,Fnsize - 1 ) = " "  then
	     srcTC."FIRSTNAME" = subStr(Fname,1,Fnsize - 1)
	  else
	  endIf

  	  if srcTC."ADDRCORRECT" = "" then
	     srcTC."ADDRCORRECT" = "Y" 
	  else
	  endIf
	  if srcTC."CANCELCODE" = "DC" then
	     srcTC."CANCELCODE" = "D" 
	  else
	  endIf
	    status = "  Fixing source file"
	    srcTC.nextrecord()
	endWhile
	srcTC.close()

 

[TonyMcGuire]

Is the space the last character in the field?

If so, you can just TRIM it.

srcTC."firstname"=rtrim(srcTC."firstname")

Although Paradox doesn't usually allow a trailing space to be stored in a field.

Even at that, your substr() (ie. start character 1 thru all characters EXCEPT the last one) statement is looking for all but the last character of 'firstname' to equal " ", which isn't likely to happen.

Tony McGuire

http://www.thedbcommunity.com

"It's not about having enough time. It's about priorities.

 

[Steve688]

Hi Tony,

Yes, when they do occur, they are at the very end of the string. rTrim did the trick, Thanks! I didn't know about that function before.

Cheers!
-Steve

 

[TonyMcGuire]

Rtrim is 'right' trim.

Ltrim is 'left' trim.

(Just in case)

Tony McGuire

http://www.thedbcommunity.com

"It's not about having enough time. It's about priorities.