>>fyi ,  we are using DFSORT  and not Syncsort .

Well that is good news.  On that note then here is the solution.

//STEP0100 EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
US1234567897272
//SORTOUT  DD SYSOUT=*
//SYSIN    DD *
  OPTION COPY
  OUTFIL BUILD=(C'UPDATE K1GHGMT.RTALABLE_ITKM_SG',/,
                C'   SET LAST_CHG_TIMESTAMP = CURRENT TIMESTAMP',/,
                C'      ,LAST_CHANGE_USERID = ''',C'WKYT',C'''',/,
                C' WHERE COUNTRY_CODE       = ''',01,02,C'''',/,
                C'   AND PLU_ITEM_NBR       = ',03,09,/,
                C'   AND ITEM_NBR           = ',12,04,/,
                C';',/,
                C'COMMIT;',80:X)
/*

The output from the above is

UPDATE K1GHGMT.RTALABLE_ITKM_SG
   SET LAST_CHG_TIMESTAMP = CURRENT TIMESTAMP
      ,LAST_CHANGE_USERID = 'WKYT'
 WHERE COUNTRY_CODE       = 'US'
   AND PLU_ITEM_NBR       = 123456789
   AND ITEM_NBR           = 7272
;
COMMIT;


Thanks,
Kolusu
DFSORT Development
IBM Corporation

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to