1: PACKAGE BODY BSC_SYS_IMAGES_PKG AS
2: /* $Header: BSCSYSIB.pls 120.0 2005/06/01 16:33:57 appldev noship $ */
3:
4: PROCEDURE UPDATE_ROW
5: (
42: ) IS
43: -- L_BLOB BLOB;
44: -- L_BFILE BFILE;
45: BEGIN
46: UPDATE BSC_SYS_IMAGES
47: SET DESCRIPTION = X_DESCRIPTION,
48: WIDTH = X_WIDTH,
49: HEIGHT = X_HEIGHT,
50: MIME_TYPE = X_MIME_TYPE,
104: X_CREATED_BY IN NUMBER,
105: X_LAST_UPDATED_BY IN NUMBER,
106: X_LAST_UPDATE_LOGIN IN NUMBER
107: ) IS
108: CURSOR C IS SELECT ROWID FROM BSC_SYS_IMAGES WHERE IMAGE_ID = X_IMAGE_ID;
109: L_ROWID VARCHAR2(100);
110: -- L_BLOB BLOB;
111: -- L_BFILE BFILE;
112: BEGIN
109: L_ROWID VARCHAR2(100);
110: -- L_BLOB BLOB;
111: -- L_BFILE BFILE;
112: BEGIN
113: INSERT INTO BSC_SYS_IMAGES
114: (
115: IMAGE_ID,
116: FILE_NAME,
117: DESCRIPTION,
155: END IF;
156: CLOSE C;
157: END INSERT_ROW;
158:
159: END BSC_SYS_IMAGES_PKG;