BEGIN

INSERT INTO MNEWS 

(MYEAR, MMONTH, MNEWS1, MNEWS2, MNEWS3, MNEWS4, MNEWS5, MNEWS6, ATTACH1)

VALUES (:P18_YEAR, :P18_MONTH, :P18_NEW_1, :P18_NEW_2, :P18_NEW_3, :P18_NEW_4, :P18_NEW_5, :P18_NEW_6, :P18_ATTACH1) ;

COMMIT;

END;

=====================================================

BEGIN

UPDATE MNEWS

SET  

 MYEAR = :P18_YEAR,

 MMONTH = :P18_MONTH,  

 MNEWS1 = :P18_NEW_1,

 MNEWS2 = :P18_NEW_2,

 MNEWS3 = :P18_NEW_3,

 MNEWS4 = :P18_NEW_4,

 MNEWS5 = :P18_NEW_5,

 MNEWS6 = :P18_NEW_6

WHERE MNEWS_ID = :P18_ID;

COMMIT;

END;