Re: sql update of srcdta in cl source

this is one way I do it, using parms
for the part of the line that changes.
I have another method for actual "source"
data members, requires an extra step,
send back a reply if you want the longer version

UPDATE
DATALIB1/UXX0AC
SET
UXX30FTP = SUBSTR(UXX30FTP,1,25)||&MONTH||&YEAR
WHERE
SUBSTR(UXX30FTP,1,3) = 'PUT'








On Tue, Dec 7, 2010 at 10:53 AM, David FOXWELL <David.FOXWELL@xxxxxxxxx>wrote:

Hi,

I want to modify this in a clp source :

MY_LABEL: CALL PGM(MGR123401)

So it becomes

MY_LABEL: CALL PGM(MGR589801)


I'm trying to use the REPLACE function in sql. I've added the label for the
WHERE clause. The program name is a standard, ie, prefix MGR 4 numbers and
suffix(in this case 01) I know the new number, 5898, but I cannot be sure of
the old number to replace. I could presume the program name occupies the
same position in the field SRCDTA but that won't always work.

Something like UPDATE Myfile SET SRCDTA = REPLACE ( SRCDTA, '1234',
MyNewNumber) WHERE SRCDTA LIKE 'MY_LABEL:%'


Ideas?
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.