[Home] [Help]
10: X_FONT_SIZE in NUMBER,
11: X_FONT_STYLE in NUMBER,
12: X_NAME in VARCHAR2
13: ) is
14: cursor C is select ROWID from BSC_SYS_LABELS_B
15: where SOURCE_TYPE = X_SOURCE_TYPE
16: and SOURCE_CODE = X_SOURCE_CODE
17: and LABEL_ID = X_LABEL_ID
18: ;
16: and SOURCE_CODE = X_SOURCE_CODE
17: and LABEL_ID = X_LABEL_ID
18: ;
19: begin
20: insert into BSC_SYS_LABELS_B (
21: SOURCE_TYPE,
22: SOURCE_CODE,
23: LABEL_ID,
24: LEFT_POSITION,
83: LEFT_POSITION,
84: TOP_POSITION,
85: FONT_SIZE,
86: FONT_STYLE
87: from BSC_SYS_LABELS_B
88: where SOURCE_TYPE = X_SOURCE_TYPE
89: and SOURCE_CODE = X_SOURCE_CODE
90: and LABEL_ID = X_LABEL_ID
91: for update of SOURCE_TYPE nowait;
148: X_FONT_STYLE in NUMBER,
149: X_NAME in VARCHAR2
150: ) is
151: begin
152: update BSC_SYS_LABELS_B set
153: LEFT_POSITION = X_LEFT_POSITION,
154: TOP_POSITION = X_TOP_POSITION,
155: FONT_SIZE = X_FONT_SIZE,
156: FONT_STYLE = X_FONT_STYLE
189: if (sql%notfound) then
190: raise no_data_found;
191: end if;
192:
193: delete from BSC_SYS_LABELS_B
194: where SOURCE_TYPE = X_SOURCE_TYPE
195: and SOURCE_CODE = X_SOURCE_CODE
196: and LABEL_ID = X_LABEL_ID;
197:
205: begin
206: delete from BSC_SYS_LABELS_TL T
207: where not exists
208: (select NULL
209: from BSC_SYS_LABELS_B B
210: where B.SOURCE_TYPE = T.SOURCE_TYPE
211: and B.SOURCE_CODE = T.SOURCE_CODE
212: and B.LABEL_ID = T.LABEL_ID
213: );