[Home] [Help]
35: X_PROGRAM_UPDATE_DATE in DATE,
36: X_WMS_EXCLUSIVE in VARCHAR2,
37: X_SQL_STMT in VARCHAR2 DEFAULT null
38: ) is
39: cursor C is select ROWID from WMS_LABEL_FIELDS_B
40: where LABEL_FIELD_ID = X_LABEL_FIELD_ID
41: ;
42: begin
43: insert into WMS_LABEL_FIELDS_B (
39: cursor C is select ROWID from WMS_LABEL_FIELDS_B
40: where LABEL_FIELD_ID = X_LABEL_FIELD_ID
41: ;
42: begin
43: insert into WMS_LABEL_FIELDS_B (
44: LABEL_FIELD_ID,
45: DOCUMENT_ID,
46: FIELD_LIST_UPDATED_FLAG,
47: COLUMN_NAME,
193: ATTRIBUTE14,
194: ATTRIBUTE15,
195: WMS_EXCLUSIVE,
196: SQL_STMT
197: from WMS_LABEL_FIELDS_B
198: where LABEL_FIELD_ID = X_LABEL_FIELD_ID
199: for update of LABEL_FIELD_ID nowait;
200: recinfo c%rowtype;
201:
308: X_WMS_EXCLUSIVE in VARCHAR2,
309: X_SQL_STMT in VARCHAR2 DEFAULT NULL
310: ) is
311: begin
312: update WMS_LABEL_FIELDS_B set
313: DOCUMENT_ID = X_DOCUMENT_ID,
314: FIELD_LIST_UPDATED_FLAG = X_FIELD_LIST_UPDATED_FLAG,
315: COLUMN_NAME = X_COLUMN_NAME,
316: ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
365: /*if (sql%notfound) then -- Commented for Bug 13038717
366: raise no_data_found;
367: end if;*/
368:
369: delete from WMS_LABEL_FIELDS_B
370: where LABEL_FIELD_ID = X_LABEL_FIELD_ID;
371:
372: /* if (sql%notfound) then -- Commented for Bug 13038717
373: raise no_data_found;
379: begin
380: delete from WMS_LABEL_FIELDS_TL T
381: where not exists
382: (select NULL
383: from WMS_LABEL_FIELDS_B B
384: where B.LABEL_FIELD_ID = T.LABEL_FIELD_ID
385: );
386:
387: update WMS_LABEL_FIELDS_TL T set (