[Home] [Help]
1: PACKAGE BODY jdr_mds_internal AS
2: /* $Header: JDRMDINB.pls 120.3 2005/09/02 11:38:31 nigoel noship $ */
3: -----------------------------------------------------------------------------
4: ---------------------------- PRIVATE VARIABLES ------------------------------
5: -----------------------------------------------------------------------------
726: BEGIN
727: -- ###
728: -- ### Should we allow the dropping of child documents and/or packages?
729: -- ###
730: jdr_mds_internal.deleteDocument(docID, TRUE);
731: END;
732:
733:
734: --
1193: -- Specifying a document name will initiate the export. Thereafter, a NULL
1194: -- document name should be passed in until the export is complete.
1195: -- That is, to export an entire document, you should do:
1196: --
1197: -- firstChunk := jdr_mds_internal.exportDocumentAsXML('/oracle/apps/fnd/mydoc');
1198: -- LOOP
1199: -- nextChunk := jdr_mds_internal.exportDocumentAsXML(NULL);
1200: -- EXIT WHEN nextChunk IS NULL;
1201: -- END LOOP;
1195: -- That is, to export an entire document, you should do:
1196: --
1197: -- firstChunk := jdr_mds_internal.exportDocumentAsXML('/oracle/apps/fnd/mydoc');
1198: -- LOOP
1199: -- nextChunk := jdr_mds_internal.exportDocumentAsXML(NULL);
1200: -- EXIT WHEN nextChunk IS NULL;
1201: -- END LOOP;
1202: --
1203: -- Parameters:
1242: -- Specifying a document name will initiate the export. Thereafter, a NULL
1243: -- document name should be passed in until the export is complete.
1244: -- That is, to export an entire document, you should do:
1245: --
1246: -- firstChunk := jdr_mds_internal.exportDocumentAsXML(isDone,
1247: -- '/oracle/apps/fnd/mydoc');
1248: -- WHILE (isDone = 0)
1249: -- nextChunk := jdr_mds_internal.exportDocumentAsXML(isDone, NULL);
1250: -- END LOOP;
1245: --
1246: -- firstChunk := jdr_mds_internal.exportDocumentAsXML(isDone,
1247: -- '/oracle/apps/fnd/mydoc');
1248: -- WHILE (isDone = 0)
1249: -- nextChunk := jdr_mds_internal.exportDocumentAsXML(isDone, NULL);
1250: -- END LOOP;
1251: --
1252: -- Parameters:
1253: -- exportFinished - OUT NOCOPY /* file.sql.39 change */ parameter which indicates whether or not the export
1384: END IF;
1385:
1386: -- component ref which equals "." indicates a top-level component
1387: IF (r_trans.atl_comp_ref = '.') THEN
1388: compref := jdr_mds_internal.getDocumentName(r_trans.atl_comp_docid);
1389: ELSIF (INSTR(r_trans.atl_comp_ref, ':') <> 1) THEN
1390: compref := jdr_mds_internal.getDocumentName(r_trans.atl_comp_docid) ||
1391: '..' || r_trans.atl_comp_ref;
1392: ELSE
1386: -- component ref which equals "." indicates a top-level component
1387: IF (r_trans.atl_comp_ref = '.') THEN
1388: compref := jdr_mds_internal.getDocumentName(r_trans.atl_comp_docid);
1389: ELSIF (INSTR(r_trans.atl_comp_ref, ':') <> 1) THEN
1390: compref := jdr_mds_internal.getDocumentName(r_trans.atl_comp_docid) ||
1391: '..' || r_trans.atl_comp_ref;
1392: ELSE
1393: -- #(3260414) Views need to be handled specially. If the component
1394: -- reference is something like: :reg.region2, then the reference
1393: -- #(3260414) Views need to be handled specially. If the component
1394: -- reference is something like: :reg.region2, then the reference
1395: -- should be: docname:reg..region2...id, not docname..:reg.region2...id
1396: dotpos := INSTR(r_trans.atl_comp_ref, '.');
1397: compref := jdr_mds_internal.getDocumentName(r_trans.atl_comp_docid);
1398: IF (dotpos > 0) THEN
1399: compref := compref ||
1400: SUBSTR(r_trans.atl_comp_ref, 1, dotpos - 1) || '..' ||
1401: SUBSTR(r_trans.atl_comp_ref, dotpos + 1);
2132:
2133: -- Retrieve all of the customization documents which customize the
2134: -- specified base document.
2135: CURSOR c_documents(fullName VARCHAR2, baseName VARCHAR2) IS
2136: SELECT path_docid, created_by, jdr_mds_internal.getDocumentName(path_docid)
2137: FROM jdr_attributes, jdr_paths
2138: WHERE path_docid = att_comp_docid AND
2139: path_name = baseName AND
2140: att_comp_seq = 0 AND