[Home] [Help]
57: OR pk5_value = p_pk5_value);
58:
59:
60: --
61: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
62: --
63: BEGIN
64: IF l_debug_level > 0 THEN
65: oe_debug_pub.add( 'OE_FND_ATTACHMENTS_PUB.ADD_ATTACHMENT:BEGIN' || P_ENTITY_NAME || ' , '||P_PK1_VALUE ||' , '||P_PK2_VALUE ) ;
61: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
62: --
63: BEGIN
64: IF l_debug_level > 0 THEN
65: oe_debug_pub.add( 'OE_FND_ATTACHMENTS_PUB.ADD_ATTACHMENT:BEGIN' || P_ENTITY_NAME || ' , '||P_PK1_VALUE ||' , '||P_PK2_VALUE ) ;
66: END IF;
67:
68: -- Standard call to check for call compatibility
69: -----------------------------------------------------------------------
80: l_attachment_exists := TRUE; -- assume
81: open C_ATCHMT;
82: fetch C_ATCHMT into l_dummy;
83: IF l_debug_level > 0 THEN
84: oe_debug_pub.add( 'OE_FND_ATTACHMENTS_PUB.ATTACHMENT EXISTS DUMMY=' || L_DUMMY ) ;
85: END IF;
86: if (C_ATCHMT%NOTFOUND) then
87: l_attachment_exists := FALSE;
88: close C_ATCHMT;
91: end if;
92:
93: if (l_attachment_exists = FALSE) then
94: IF l_debug_level > 0 THEN
95: oe_debug_pub.add( 'OE_FND_ATTACHMENTS_PUB.ADD_ATTACHMENT:CALLING PVT.ADD_ATTACHMENT!' ) ;
96: END IF;
97:
98: Oe_Fnd_Attachments_PVT.Add_Attachment(
99: p_api_version => 1.0,
114:
115: end if;
116:
117: IF l_debug_level > 0 THEN
118: oe_debug_pub.add( 'OE_FND_ATTACHMENTS_PUB.ADD_ATTACHMENT:END' ) ;
119: END IF;
120:
121: END Add_Attachment;
122:
159:
160:
161:
162: --
163: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
164: --
165: BEGIN
166:
167: -- Standard call to check for call compatibility
333: l_msg_count number;
334: l_msg_data varchar2(255);
335:
336: --
337: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
338: --
339: BEGIN
340:
341: -- NOTE: done in PVT package
361:
362: EXCEPTION
363: WHEN OTHERS THEN
364: IF l_debug_level > 0 THEN
365: oe_debug_pub.add( 'OFA:ADD_ATTACHMENTS_AUTOMATIC:AN EXCCEPTION HAS OCCURED' ) ;
366: END IF;
367:
368: fnd_message.set_name('OE', 'OE_APPLY_ATTACHMENT_EXCEPTION');
369: fnd_msg_pub.count_and_get( p_count => x_msg_count,
414: WHERE category_id = p_document_category;
415:
416:
417: --
418: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
419: --
420: BEGIN
421:
422: IF l_debug_level > 0 THEN
419: --
420: BEGIN
421:
422: IF l_debug_level > 0 THEN
423: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:BEGIN' ) ;
424: END IF;
425: -- do the basic validations to test null document
426: -------------------------------------------------
427: if (p_document_text IS NULL) then
425: -- do the basic validations to test null document
426: -------------------------------------------------
427: if (p_document_text IS NULL) then
428: IF l_debug_level > 0 THEN
429: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:DOCUMENT TEXT IS NULL' ) ;
430: END IF;
431: fnd_message.set_name('FND', 'ATCHMT-NULL DOCUMENT');
432: fnd_msg_pub.add;
433: raise G_INVALID_PARAMETER_EXCEPTION;
436: -- do the basic validations on security type
437: ---------------------------------------------
438: if (p_security_type <> G_SECURITY_TYPE_NONE AND p_security_id IS NULL) then
439: IF l_debug_level > 0 THEN
440: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:INVALID SECURITY COMBINATION' ) ;
441: END IF;
442: fnd_message.set_name('FND', 'SECURITY_TYPE_NULL');
443: fnd_msg_pub.add;
444: raise G_INVALID_PARAMETER_EXCEPTION;
464: open C_CATEGORY;
465: fetch C_CATEGORY into l_dummy;
466: if (C_CATEGORY%NOTFOUND) then
467: IF l_debug_level > 0 THEN
468: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:INVALID CATEGORY ID' ) ;
469: END IF;
470: close C_CATEGORY;
471: fnd_message.set_name('FND', 'INVALID_DOCUMENT_CATEGORY');
472: fnd_msg_pub.add;
478:
479: -- data is valid, create the document by calling fnd_documents_pkg.insert_row
480: -----------------------------------------------------------------------------
481: IF l_debug_level > 0 THEN
482: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:INSERING A ROW-> FND_DOCUMENTS_PKG.INSERT_ROW' ) ;
483: END IF;
484:
485: fnd_documents_pkg.insert_row (
486: x_rowid => l_rowid
529:
530: -- now we need to insert the document text in fnd_document_short_text table
531: ---------------------------------------------------------------------------
532: IF l_debug_level > 0 THEN
533: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:INSERING A ROW INTO FND_DOCUMENTS_SHORT_TEXT ID' || TO_CHAR ( L_DOCUMENT_ID ) ) ;
534: END IF;
535:
536: INSERT INTO fnd_documents_short_text
537: (
549: if(p_commit = fnd_api.G_TRUE) then
550: commit;
551: end if;
552: IF l_debug_level > 0 THEN
553: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:END' ) ;
554: END IF;
555:
556: EXCEPTION
557:
556: EXCEPTION
557:
558: WHEN G_INVALID_PARAMETER_EXCEPTION THEN
559: IF l_debug_level > 0 THEN
560: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:AN INVALID PARAM EXCCEPTION HAS OCCURED' ) ;
561: END IF;
562: fnd_msg_pub.count_and_get( p_count => x_msg_count,
563: p_data => x_msg_data
564: );
565: x_return_status := fnd_api.G_RET_STS_ERROR;
566:
567: WHEN OTHERS THEN
568: IF l_debug_level > 0 THEN
569: oe_debug_pub.add( 'OFA:CREATE_SHORT_TEXT_DOCUMENT:AN EXCCEPTION HAS OCCURED' ) ;
570: END IF;
571:
572: fnd_message.set_name('OE', 'CREATE_DOCUMENT_UNEXPECTED_ERROR');
573: fnd_msg_pub.add;
592: l_program_application_id number:=fnd_global.PROG_APPL_ID;
593: l_request_id number:=fnd_global.CONC_REQUEST_ID;
594:
595: --
596: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
597: --
598: BEGIN
599:
600: