sqlplus执行pl/sql程序块一般结构

--修改教材出版年月
DECLARE
  --声明
  VI_VERSIONYYYYMM   DATE;
  CURSOR cur1 IS SELECT TEXTBOOKID,VERSIONYYYYMM FROM TEXTBOOK;
BEGIN
  --可执行语句
  UPDATE TEXTBOOK SET VERSIONYYYYMM=trim(VERSIONYYYYMM)||'-1-1' ;
 
  FOR curA IN  cur1 LOOP
  BEGIN
    SELECT TO_DATE(curA.VERSIONYYYYMM,'yyyy-mm-dd') INTO  VI_VERSIONYYYYMM FROM dual;
   EXCEPTION
   WHEN OTHERS THEN
  BEGIN
     UPDATE TEXTBOOK SET VERSIONYYYYMM=to_char(SYSDATE,'yyyy-mm-dd') WHERE TEXTBOOKID=curA.TEXTBOOKID;
  END;
  END;
  END LOOP;
  COMMIT;
end;