Topic by deepa v
Content
PROCEDURE INSERT_BULLETIN
(
ip_BULLETIN_TITLE IN VARCHAR2,
ip_CONTENT IN VARCHAR2,
ip_COM_CD IN VARCHAR2,
ip_PHONE_NO IN VARCHAR2,
ip_EMAIL IN VARCHAR2,
ip_IMAGE IN VARCHAR2,
ip_ATTACHMENT IN VARCHAR2,
error_code OUT NUMBER,
error_text OUT VARCHAR2
)
IS
s_bulletin NUMBER;
s_seq_bulletin VARCHAR2(30);
s_image VARCHAR2(100);
s_attachment VARCHAR2(100);
BEGIN
error_code := 0;
error_text := SQLERRM;
INSERT INTO TBL_BULLETIN
(
BULLETIN_TITLE,
CONTENT,
COM_CD,
PHONE_NO,
EMAIL
)
VALUES(ip_BULLETIN_TITLE,
ip_CONTENT ,
ip_COM_CD ,
ip_PHONE_NO,
ip_EMAIL
);
SELECT SEQ_BULLETIN.CURRVAL INTO s_bulletin FROM DUAL;
SELECT to_char(s_bulletin,'0000000') INTO s_seq_bulletin FROM DUAL;
SELECT SUBSTR(ip_IMAGE,INSTR(ip_IMAGE, '.', -1))INTO s_image FROM DUAL;
SELECT SUBSTR(ip_ATTACHMENT,INSTR(ip_ATTACHMENT, '.', -1))INTO s_attachment FROM DUAL;
--IF ip_IMAGE IS NOT NULL AND ip_ATTACHMENT IS NOT NULL THEN
UPDATE
TBL_BULLETIN
SET
IMAGE = 'BI_'+ s_seq_bulletin + s_image,
ATTACHMENT = 'BI_'+ s_seq_bulletin + s_attachment
WHERE
BULLETIN_ID = s_bulletin;
My table bulletin is not getting updated with the image values