41: , X_ATTRIBUTE14 VARCHAR2
42: , X_ATTRIBUTE15 VARCHAR2
43: ) IS
44:
45: cursor C is select QUALIFIER_ID from QP_QUALIFIERS
46: where QUALIFIER_ID = X_QUALIFIER_ID;
47:
48:
49:
49:
50: BEGIN
51:
52:
53: insert into QP_QUALIFIERS
54: (
55: QUALIFIER_ID
56: , CREATION_DATE
57: , CREATED_BY
184: , X_ATTRIBUTE15 VARCHAR2
185: ) IS
186:
187:
188: cursor C is select * from QP_QUALIFIERS
189: where QUALIFIER_ID = X_QUALIFIER_ID
190: for update of QUALIFIER_ID nowait;
191: Recinfo C%ROWTYPE;
192:
411: ) IS
412:
413: begin
414:
415: UPDATE QP_QUALIFIERS
416: SET
417: QUALIFIER_ID = X_QUALIFIER_ID
418: , CREATION_DATE = X_CREATION_DATE
419: , CREATED_BY = X_CREATED_BY
469: ) IS
470: begin
471:
472: if (X_HEADER_LINE_FLAG = 'H') then
473: delete from QP_QUALIFIERS
474: where LIST_HEADER_ID = X_ID;
475: else
476: delete from QP_QUALIFIERS
477: where LIST_LINE_ID = X_ID;
472: if (X_HEADER_LINE_FLAG = 'H') then
473: delete from QP_QUALIFIERS
474: where LIST_HEADER_ID = X_ID;
475: else
476: delete from QP_QUALIFIERS
477: where LIST_LINE_ID = X_ID;
478: end if;
479:
480: if (SQL%NOTFOUND) then