zOs/SQL/KUDT

UPDATE   OA1T.TXC102A1
        SET XC102_RUNSTART_TS = '2002-01-01-00.00.00.000000'
     --   , XC102_RECIP_BUID  = ''
;
COMMIT
;
SELECT COUNT(*), MIN(XC102_RUNSTART_TS), MAX(XC102_RUNSTART_TS)
               , SUM(LENGTH(XC102_ACT_CONTENT))
    FROM OA1T.TXC102A1
    FOR UPDATE
;
XOMMIT
;
UPDATE   OA1T.TXC102A1
        SET XC102_RUNSTART_TS = '2006-02-01-06.27.28.123'
;
X
XNSERT INTO OA1T.TXC102A1 SELECT * FROM OA1T.TXC102A1;
COMMIT;
SELECT COUNT(*), MIN(XC102_RUNSTART_TS), MAX(XC102_RUNSTART_TS)
               , SUM(LENGTH(XC102_ACT_CONTENT))
    FROM OA1T.TXC102A1
    FOR UPDATE
;
;
XX
SELECT *        FROM OA1T.TXC102A1
   FETCH FIRST 20 ROWS ONLY
;