Razzak,

With a little manipulation of your code, I was able to get the desired result.
Thanks again for having this list.
For someone like myself who has had little training (thankful for the week 
spent with you), it has been a great help.

James Belisle

Making Information Systems People Friendly Since 1990
[cid:[email protected]]

From: [email protected] [mailto:[email protected]] On Behalf Of 
Jim Belisle
Sent: Monday, April 13, 2020 5:20 PM
To: [email protected]
Subject: RE: [RBASE-L] - REPLACING INFORMATION

I will try that.

James Belisle

Making Information Systems People Friendly Since 1990
[cid:[email protected]]

From: [email protected] [mailto:[email protected]] On Behalf Of 
A. Razzak Memon
Sent: Monday, April 13, 2020 5:15 PM
To: [email protected]
Subject: Re: [RBASE-L] - REPLACING INFORMATION

Jim,

A DECLARE CURSOR may be needed to update those specific records.

-- Start of Code
-- Update Part Information Contents

CLEAR ALL VAR
SET VAR vPARTNAMEPC TEXT = NULL
SET VAR vSrchReplDesc TEXT = NULL
SET VAR vSearchString TEXT = '2x10 8'
SET VAR vReplaceString TEXT = '2x10x96'

SET VAR vCheckCursor INTEGER = (CHKCUR('c1'))
IF vCheckCursor = 1 THEN
DROP CURSOR c1
ENDIF

DECLARE c1 CURSOR FOR SELECT PARTNAMEPC FROM PARTINFO +
WHERE PARTNAMEPC CONTAINS 'RP%-7'
OPEN c1
FETCH c1 INTO vPARTNAMEPC INDICATOR iv1
WHILE SQLCODE <> 100 THEN
SET VAR vSrchReplDesc =
(SRPL(.vPARTNAMEPC,.vSearchString,.vReplaceString,0))
UPDATE PARTINFO SET PARTNAMEPC = .vSrchReplDesc WHERE CURRENT OF c1
FETCH c1 INTO vPARTNAMEPC INDICATOR iv1
ENDWHILE

DROP CURSOR c1
PAUSE 2 USING 'Done.'
RETURN

Hope it helps!

Very Best R:egards,

Razzak




At 05:03 PM 4/13/2020, Jim Belisle wrote:

>I am wanting to replace ONLY specific wording in a specific column
>leaving the rest of the wording in the field.
>I have looked at the SRPL function and tried this code but it does
>not update the column for those rows meeting the filter.
>I have also tried it using the 0 for the last argument with no success.
>
>UPDATE PARTINFO SET PARTNAMEPC = (SRPL('2x10 8','2x10
>8','2x10x96',1)) where PARTNUM CONTAINS 'RP%-7'
>
>Any blues clues?
>
>James Belisle

--
For group guidelines, visit 
http://www.rbase.com/support/usersgroup_guidelines.php
---
You received this message because you are subscribed to the Google Groups 
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to 
[email protected]<mailto:[email protected]>.
To view this discussion on the web visit 
https://groups.google.com/d/msgid/rbase-l/202004132215.03DMFCNn010025%40atl4mhob15.registeredsite.com.
________________________________

-- 
For group guidelines, visit 
http://www.rbase.com/support/usersgroup_guidelines.php
--- 
You received this message because you are subscribed to the Google Groups 
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
To view this discussion on the web visit 
https://groups.google.com/d/msgid/rbase-l/CY4PR0201MB339436BF73DD13F17E571C76A0A20%40CY4PR0201MB3394.namprd02.prod.outlook.com.

Reply via email to