0% found this document useful (0 votes)

373 views105 pages

Absence Creation From Backend

This document provides steps for applying an absence transaction and initiating an approval workflow from Oracle Apps R12 using PL/SQL. It includes creating views to retrieve employee data, a procedure to generate XML for the transaction, and a package to create the absence transaction record and notification for approval. Sample code is provided to test and approve the transaction.

Uploaded by

kiran

We take content rights seriously. If you suspect this is your content, claim it here.

Available Formats

Download as TXT, PDF, TXT or read online on Scribd

0% found this document useful (0 votes)

373 views105 pages

Absence Creation From Backend

Uploaded by

kiran

We take content rights seriously. If you suspect this is your content, claim it here.

Available Formats

Download as TXT, PDF, TXT or read online on Scribd

You are on page 1/ 105

Oracle Apps KT

This blog is sharing knowledge of my experience and others. Please do test in your
test environment before deploying into prod instance.

Monday, April 16, 2018

Apply Absence SSHR Transaction and Initiate AME Workflow from plsql Oracle Apps R12
here are the steps
1. create views
2. create procedure for xml
3. create package for create absence txn sshr.
4. run the sample code and check the tables hr_api_transactions and columns like
transaction_document
5. check the query to know the notification_id for approval from backend.
6. approve from backend using package and redo the same step 5, until complete.

1. views

1.1 --just check the function id and replace in below view.

CREATE OR REPLACE FORCE VIEW APPS.FUJ_SSHR_PERSINFO

(
LOGINWORKERNUMBER,
PRSNNAME,
PRSNJOBID,
PRSNID,
PRSNPOSITIONID,
PRSNBGID,
PRSNJOBNAME,
PRSNASSIGNMENTID,
PRSNGRADEID,
LOGINPRSNID,
ASGSTARTDATE,
PRSNLOCATIONID,
PRSNMGRID,
EFFECTIVEDATE,
PCALLEDID,
PRSNORGANIZATIONID,
PRSNPOSITIONNAME,
PRSNPAYROLLID,
PRSNMGRNAME,
DATENOTIFICATION,
LASTUPDATEDATE,
CREATIONDATE
)
AS
SELECT papf.employee_number
loginworkernumber,
full_name
prsnname,
paaf.job_id
prsnjobid,
papf.person_id
prsnid,
paaf.position_id
prsnpositionid,
papf.business_group_id
prsnbgid,
pj.NAME
prsnjobname,
paaf.assignment_id
prsnassignmentid,
paaf.grade_id
prsngradeid,
paaf.person_id
loginprsnid,
TO_CHAR (paaf.effective_start_date, 'yyyy-mm-dd')
asgstartdate,
paaf.location_id
prsnlocationid,
supervisor_id
prsnmgrid,
TO_CHAR (TRUNC (SYSDATE), 'yyyy-mm-dd')
effectivedate,
12238
pcalledid --function_id
,
paaf.organization_id
prsnorganizationid,
pp.NAME
prsnpositionname,
paaf.payroll_id
prsnpayrollid,
(SELECT full_name
FROM per_all_people_f papf2
WHERE papf2.person_id = paaf.supervisor_id
AND TRUNC (SYSDATE) BETWEEN papf2.effective_start_date
AND papf2.effective_end_date)
prsnmgrname,
TO_CHAR (SYSDATE, 'yyyy-mm-dd hh:mi:ss')
datenotification --format 2018-04-14 10:44:19.0
,
TO_CHAR (SYSDATE, 'yyyy-mm-dd hh:mi:ss')
lastupdatedate,
TO_CHAR (SYSDATE, 'yyyy-mm-dd hh:mi:ss')
creationdate
--,'000100000004'||RAWTOHEX(PER_ABSENCE_ATTENDANCES_S.CURRVAL) CDATA
FROM per_all_people_f papf,
per_all_assignments_f paaf,
per_jobs pj,
per_positions pp
WHERE papf.person_id = paaf.person_id
AND pj.job_id(+) = paaf.job_id
AND pp.position_id(+) = paaf.position_id
AND TRUNC (SYSDATE) BETWEEN papf.effective_start_date
AND papf.effective_end_date
AND TRUNC (SYSDATE) BETWEEN paaf.effective_start_date
AND paaf.effective_end_date
AND primary_flag = 'Y'
--AND papf.person_id = 26876;
;

-----------------------------------------------------------------------------------
--------------------------------------------------------------
1.2 --just check the function id and replace in below view.
/* Formatted on 9/23/2018 1:23:57 PM (QP5 v5.326) */
CREATE OR REPLACE FORCE VIEW APPS.FUJ_SSHR_PERSINFO_MGR
(
PRSNNAME,
PRSNJOBID,
PRSNID,
PRSNPOSITIONID,
PRSNBGID,
PRSNJOBNAME,
PRSNASSIGNMENTID,
PRSNGRADEID,
LOGINPRSNID,
ASGSTARTDATE,
PRSNLOCATIONID,
PRSNMGRID,
EFFECTIVEDATE,
PCALLEDID,
PRSNORGANIZATIONID,
PRSNPOSITIONNAME,
PRSNPAYROLLID,
PRSNMGRNAME,
DATENOTIFICATION,
LOGINWORKERNUMBER,
LASTUPDATEDATE,
CREATIONDATE,
LOGINPRSNMGRNAME,
LOGINPRSNMGRID
)
AS
SELECT full_name
prsnname,
paaf.job_id
prsnjobid,
papf.person_id
prsnid,
paaf.position_id
prsnpositionid,
papf.business_group_id
prsnbgid,
pj.NAME
prsnjobname,
paaf.assignment_id
prsnassignmentid,
paaf.grade_id
prsngradeid,
paaf.person_id
loginprsnid,
TO_CHAR (paaf.effective_start_date, 'yyyy-mm-dd')
asgstartdate,
paaf.location_id
prsnlocationid,
supervisor_id
prsnmgrid,
TO_CHAR (TRUNC (SYSDATE), 'yyyy-mm-dd')
effectivedate,
12238
pcalledid,
paaf.organization_id
prsnorganizationid,
pp.NAME
prsnpositionname,
paaf.payroll_id
prsnpayrollid,
(SELECT full_name
FROM per_all_people_f papf2
WHERE papf2.person_id = paaf.supervisor_id
AND TRUNC (SYSDATE) BETWEEN papf2.effective_start_date
AND papf2.effective_end_date)
prsnmgrname,
TO_CHAR (SYSDATE, 'yyyy-mm-dd hh:mi:ss')
datenotification,
(SELECT papf2.employee_number
FROM per_all_people_f papf2
WHERE papf2.person_id = paaf.supervisor_id
AND TRUNC (SYSDATE) BETWEEN papf2.effective_start_date
AND papf2.effective_end_date
AND ROWNUM = 1)
loginworkernumber,
TO_CHAR (SYSDATE, 'yyyy-mm-dd hh:mi:ss')
lastupdatedate,
TO_CHAR (SYSDATE, 'yyyy-mm-dd hh:mi:ss')
creationdate,
(SELECT full_name
FROM per_all_people_f papf3
WHERE papf3.person_id =
(SELECT supervisor_id
FROM per_all_assignments_f paaf4
WHERE paaf4.person_id = paaf.supervisor_id
AND TRUNC (SYSDATE) BETWEEN
paaf4.effective_start_date
AND
paaf4.effective_end_date)
AND TRUNC (SYSDATE) BETWEEN papf3.effective_start_date
AND papf3.effective_end_date)
loginprsnmgrname,
(SELECT papf3.person_id
FROM per_all_people_f papf3
WHERE papf3.person_id =
(SELECT supervisor_id
FROM per_all_assignments_f paaf4
WHERE paaf4.person_id = paaf.supervisor_id
AND TRUNC (SYSDATE) BETWEEN
paaf4.effective_start_date
AND
paaf4.effective_end_date)
AND TRUNC (SYSDATE) BETWEEN papf3.effective_start_date
AND papf3.effective_end_date)
loginprsnmgrid
FROM per_all_people_f papf,
per_all_assignments_f paaf,
per_jobs pj,
per_positions pp
WHERE papf.person_id = paaf.person_id
AND pj.job_id(+) = paaf.job_id
AND pp.position_id(+) = paaf.position_id
AND TRUNC (SYSDATE) BETWEEN papf.effective_start_date
AND papf.effective_end_date
AND TRUNC (SYSDATE) BETWEEN paaf.effective_start_date
AND paaf.effective_end_date
AND primary_flag = 'Y';

-----------------------------------------------------------------------------------
--------------------------------------------------------------

2.1 Procedure change KFF 'FUJ_People_Group_Flexfield' to your Flexfield value

and 'AED' currency to your local currency.

CREATE OR REPLACE PROCEDURE APPS.P_XML_TRANSACTION_DOCUMENT2

(
p_TransactionId NUMBER, --1
p_LoginPrsnId NUMBER ,
p_PrsnId number,
p_pCalledId number ,
p_AbsenceAttdId number, --PER_ABSENCE_ATTENDANCES_S.NEXTVAL
P_TransactionRefId number , --PER_ABSENCE_ATTENDANCES_S.CURRVAL
p_AbsenceAction varchar2 ,
p_AbsenceAttendanceTypeId number,
p_AbsAttendanceReasonId Number default null,-->1061</
p_AbsenceDays number ,
p_DateStart varchar2 ,
p_DateEnd varchar2 ,
p_comments varchar2 default null,
p_userid number ,
P_xml out clob,
p_msg out varchar2
)
AS
--p_TransactionId number := 12345;
--p_LoginPrsnId number := 26876;
--p_PrsnId number := 26876;
--p_pCalledId number := 12238;
--p_AbsenceAttdId := PER_ABSENCE_ATTENDANCES_S.NEXTVAL ;--
PER_ABSENCE_ATTENDANCES_S.CURRVAL TransactionRefId,
--P_TransactionRefId := PER_ABSENCE_ATTENDANCES_S.CURRVAL;
--p_AbsenceAction varchar2(200) := 'CreateMode';
--p_AbsenceAttendanceTypeId number := 64;
--p_AbsenceDays number := 1;
--p_DateStart varchar2(200) := '2018-08-03';
--p_DateEnd varchar2(200) := '2018-08-03' ;
--p_DateNotification varchar2(200) := to_char(sysdate,'yyyy-mm-dd hh:mi:ss');

v_TransactionRefId number := p_AbsenceAttdId;

v_userId number := p_userid;
v_sessionid number := fnd_global.session_id;

l_xmltype XMLTYPE;
l_domdoc dbms_xmldom.DOMDocument;
l_root_node dbms_xmldom.DOMNode;

l_supp_numEle dbms_xmldom.DOMElement;
l_supp_name_element dbms_xmldom.DOMElement;
l_cnode_element2 dbms_xmldom.DOMElement;--
dbms_xmldom.DOMProcessingInstruction;--
l_cnode_node2 dbms_xmldom.DOMNode;

l_supp_num_node dbms_xmldom.DOMNode;
l_supp_name_node dbms_xmldom.DOMNode;

l_supp_num_tnode dbms_xmldom.DOMNode;
l_supp_name_tnode dbms_xmldom.DOMNode;

l_supp_num_text dbms_xmldom.DOMText;
l_supp_name_text dbms_xmldom.DOMText;

l_TransCtx_element dbms_xmldom.DOMElement;
l_TransCtx_node dbms_xmldom.DOMNode;

l_TransCache_element dbms_xmldom.DOMElement;
l_TransCache_node dbms_xmldom.DOMNode;

l_AM_element dbms_xmldom.DOMElement;
l_AM_node dbms_xmldom.DOMNode;

l_EoApiMapEO_element dbms_xmldom.DOMElement;
l_EoApiMapEO_node dbms_xmldom.DOMNode;
l_EoApiMapEO_name_text dbms_xmldom.DOMText;
l_EoApiMapEO_name_tnode dbms_xmldom.DOMNode;

l_cd_element dbms_xmldom.DOMElement;
l_cd_node dbms_xmldom.DOMNode;

l_TXN_element dbms_xmldom.DOMElement;
l_TXN_node dbms_xmldom.DOMNode;

l_EO_element dbms_xmldom.DOMElement;
l_EO_node dbms_xmldom.DOMNode;

l_EO2_element dbms_xmldom.DOMElement;
l_EO2_node dbms_xmldom.DOMNode;

l_TransactionsEORow_element dbms_xmldom.DOMElement;
l_TransactionsEORow_node dbms_xmldom.DOMNode;

l_EoApiMap_element dbms_xmldom.DOMElement;
l_EoApiMap_node dbms_xmldom.DOMNode;

l_PerAbsAttendEORow_element dbms_xmldom.DOMElement;
l_PerAbsAttendEORow_node dbms_xmldom.DOMNode;

l_sup_node dbms_xmldom.DOMNode;
l_Transaction_node dbms_xmldom.DOMNode;
l_sup_element dbms_xmldom.DOMElement;

l_EOCDATA_name_element dbms_xmldom.DOMCDataSection;
l_EOCDATA_name_node dbms_xmldom.DOMNode;
l_EOCDATA_name_tnode dbms_xmldom.DOMNode;
l_EOCDATA_name_text dbms_xmldom.DOMText;

l_EOCDATA2_name_element dbms_xmldom.DOMCDataSection;
l_EOCDATA2_name_node dbms_xmldom.DOMNode;
l_EOCDATA2_name_tnode dbms_xmldom.DOMNode;
l_EOCDATA2_name_text dbms_xmldom.DOMText;

l_PrsnJobName_numEle dbms_xmldom.DOMElement;
l_PrsnJobName_num_node dbms_xmldom.DOMNode;
l_PrsnJobName_num_tnode dbms_xmldom.DOMNode;
l_PrsnJobName_num_text dbms_xmldom.DOMText;

l_PrsnAsgFlag_numEle dbms_xmldom.DOMElement;
l_PrsnAsgFlag_num_node dbms_xmldom.DOMNode;
l_PrsnAsgFlag_num_tnode dbms_xmldom.DOMNode;
l_PrsnAsgFlag_num_text dbms_xmldom.DOMText;

l_LoginPrsnNpwFlag_numEle dbms_xmldom.DOMElement;
l_LoginPrsnNpwFlag_num_node dbms_xmldom.DOMNode;

l_LoginPrsnNpwFlag_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnNpwFlag_num_text dbms_xmldom.DOMText;

l_FyiDetails_numEle dbms_xmldom.DOMElement;
l_FyiDetails_num_node dbms_xmldom.DOMNode;
l_FyiDetails_num_tnode dbms_xmldom.DOMNode;
l_FyiDetails_num_text dbms_xmldom.DOMText;

l_PrsnBgId_numEle dbms_xmldom.DOMElement;
l_PrsnBgId_num_node dbms_xmldom.DOMNode;
l_PrsnBgId_num_tnode dbms_xmldom.DOMNode;
l_PrsnBgId_num_text dbms_xmldom.DOMText;

l_EmpGen_numEle dbms_xmldom.DOMElement;
l_EmpGen_num_node dbms_xmldom.DOMNode;
l_EmpGen_num_tnode dbms_xmldom.DOMNode;
l_EmpGen_num_text dbms_xmldom.DOMText;

l_PrsnNpwFlag_numEle dbms_xmldom.DOMElement;
l_PrsnNpwFlag_num_node dbms_xmldom.DOMNode;
l_PrsnNpwFlag_num_tnode dbms_xmldom.DOMNode;
l_PrsnNpwFlag_num_text dbms_xmldom.DOMText;

l_ItemType_numEle dbms_xmldom.DOMElement;
l_ItemType_num_node dbms_xmldom.DOMNode;
l_ItemType_num_tnode dbms_xmldom.DOMNode;
l_ItemType_num_text dbms_xmldom.DOMText;

l_PrsnJobId_numEle dbms_xmldom.DOMElement;
l_PrsnJobId_num_node dbms_xmldom.DOMNode;
l_PrsnJobId_num_tnode dbms_xmldom.DOMNode;
l_PrsnJobId_num_text dbms_xmldom.DOMText;

l_AsgStartDate_numEle dbms_xmldom.DOMElement;
l_AsgStartDate_num_node dbms_xmldom.DOMNode;
l_AsgStartDate_num_tnode dbms_xmldom.DOMNode;
l_AsgStartDate_num_text dbms_xmldom.DOMText;

l_PrsnGradeId_numEle dbms_xmldom.DOMElement;
l_PrsnGradeId_num_node dbms_xmldom.DOMNode;
l_PrsnGradeId_num_tnode dbms_xmldom.DOMNode;
l_PrsnGradeId_num_text dbms_xmldom.DOMText;

l_txnRefId_numEle dbms_xmldom.DOMElement;
l_txnRefId_num_node dbms_xmldom.DOMNode;
l_txnRefId_num_tnode dbms_xmldom.DOMNode;
l_txnRefId_num_text dbms_xmldom.DOMText;

l_LoginPrsnLegCode_numEle dbms_xmldom.DOMElement;
l_LoginPrsnLegCode_num_node dbms_xmldom.DOMNode;

l_LoginPrsnLegCode_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnLegCode_num_text dbms_xmldom.DOMText;

l_PrsnMgrId_numEle dbms_xmldom.DOMElement;
l_PrsnMgrId_num_node dbms_xmldom.DOMNode;
l_PrsnMgrId_num_tnode dbms_xmldom.DOMNode;
l_PrsnMgrId_num_text dbms_xmldom.DOMText;

l_PrsnAssignmentId_numEle dbms_xmldom.DOMElement;
l_PrsnAssignmentId_num_node dbms_xmldom.DOMNode;
l_PrsnAssignmentId_num_tnode dbms_xmldom.DOMNode;
l_PrsnAssignmentId_num_text dbms_xmldom.DOMText;

l_PrsnLegCode_numEle dbms_xmldom.DOMElement;
l_PrsnLegCode_num_node dbms_xmldom.DOMNode;
l_PrsnLegCode_num_tnode dbms_xmldom.DOMNode;
l_PrsnLegCode_num_text dbms_xmldom.DOMText;

l_LoginPrsnId_numEle dbms_xmldom.DOMElement;
l_LoginPrsnId_num_node dbms_xmldom.DOMNode;
l_LoginPrsnId_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnId_num_text dbms_xmldom.DOMText;

l_LogPrsnCon_numEle dbms_xmldom.DOMElement;
l_LogPrsnCon_num_node dbms_xmldom.DOMNode;
l_LogPrsnCon_num_tnode dbms_xmldom.DOMNode;
l_LogPrsnCon_num_text dbms_xmldom.DOMText;

l_pNtfSubMsg_numEle dbms_xmldom.DOMElement;
l_pNtfSubMsg_num_node dbms_xmldom.DOMNode;
l_pNtfSubMsg_num_tnode dbms_xmldom.DOMNode;
l_pNtfSubMsg_num_text dbms_xmldom.DOMText;

l_ProductCode_numEle dbms_xmldom.DOMElement;
l_ProductCode_num_node dbms_xmldom.DOMNode;
l_ProductCode_num_tnode dbms_xmldom.DOMNode;
l_ProductCode_num_text dbms_xmldom.DOMText;
l_EffectiveDate_numEle dbms_xmldom.DOMElement;
l_EffectiveDate_num_node dbms_xmldom.DOMNode;
l_EffectiveDate_num_tnode dbms_xmldom.DOMNode;

l_EffectiveDate_num_text dbms_xmldom.DOMText;

l_SSHR_WF_BASED_numEle dbms_xmldom.DOMElement;
l_SSHR_WF_BASED_num_node dbms_xmldom.DOMNode;
l_SSHR_WF_BASED_num_tnode dbms_xmldom.DOMNode;
l_SSHR_WF_BASED_num_text dbms_xmldom.DOMText;

l_HeaderType_numEle dbms_xmldom.DOMElement;
l_HeaderType_num_node dbms_xmldom.DOMNode;
l_HeaderType_num_tnode dbms_xmldom.DOMNode;
l_HeaderType_num_text dbms_xmldom.DOMText;

l_PrsnBgCurrencyCode_numEle dbms_xmldom.DOMElement;
l_PrsnBgCurrencyCode_num_node dbms_xmldom.DOMNode;
l_PrsnBgCurrencyCode_num_tnode dbms_xmldom.DOMNode;
l_PrsnBgCurrencyCode_num_text dbms_xmldom.DOMText;

l_LoginWorkerNumber_numEle dbms_xmldom.DOMElement;
l_LoginWorkerNumber_num_node dbms_xmldom.DOMNode;
l_LoginWorkerNumber_num_tnode dbms_xmldom.DOMNode;
l_LoginWorkerNumber_num_text dbms_xmldom.DOMText;

l_TxnStatus_numEle dbms_xmldom.DOMElement;
l_TxnStatus_num_node dbms_xmldom.DOMNode;
l_TxnStatus_num_tnode dbms_xmldom.DOMNode;
l_TxnStatus_num_text dbms_xmldom.DOMText;

l_PrsnPositionId_numEle dbms_xmldom.DOMElement;
l_PrsnPositionId_num_node dbms_xmldom.DOMNode;
l_PrsnPositionId_num_tnode dbms_xmldom.DOMNode;
l_PrsnPositionId_num_text dbms_xmldom.DOMText;

l_prsnOrgId_numEle dbms_xmldom.DOMElement;
l_prsnOrgId_num_node dbms_xmldom.DOMNode;
l_prsnOrgId_num_tnode dbms_xmldom.DOMNode;
l_prsnOrgId_num_text dbms_xmldom.DOMText;

l_PrsnMgrName_numEle dbms_xmldom.DOMElement;
l_PrsnMgrName_num_node dbms_xmldom.DOMNode;
l_PrsnMgrName_num_tnode dbms_xmldom.DOMNode;
l_PrsnMgrName_num_text dbms_xmldom.DOMText;

l_PrsnEmpFlag_numEle dbms_xmldom.DOMElement;
l_PrsnEmpFlag_num_node dbms_xmldom.DOMNode;
l_PrsnEmpFlag_num_tnode dbms_xmldom.DOMNode;
l_PrsnEmpFlag_num_text dbms_xmldom.DOMText;
l_PrsnPositionName_numEle dbms_xmldom.DOMElement;
l_PrsnPositionName_num_node dbms_xmldom.DOMNode;

l_PrsnPositionName_num_tnode dbms_xmldom.DOMNode;
l_PrsnPositionName_num_text dbms_xmldom.DOMText;

l_PrsnContextSet_numEle dbms_xmldom.DOMElement;
l_PrsnContextSet_num_node dbms_xmldom.DOMNode;
l_PrsnContextSet_num_tnode dbms_xmldom.DOMNode;
l_PrsnContextSet_num_text dbms_xmldom.DOMText;

l_LoginPrsnMgrName_numEle dbms_xmldom.DOMElement;
l_LoginPrsnMgrName_num_node dbms_xmldom.DOMNode;
l_LoginPrsnMgrName_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnMgrName_num_text dbms_xmldom.DOMText;

l_PrsnKfstrCode_numEle dbms_xmldom.DOMElement;
l_PrsnKfstrCode_num_node dbms_xmldom.DOMNode;
l_PrsnKfstrCode_num_tnode dbms_xmldom.DOMNode;
l_PrsnKfstrCode_num_text dbms_xmldom.DOMText;

l_PrsnLocationId_numEle dbms_xmldom.DOMElement;
l_PrsnLocationId_num_node dbms_xmldom.DOMNode;
l_PrsnLocationId_num_tnode dbms_xmldom.DOMNode;
l_PrsnLocationId_num_text dbms_xmldom.DOMText;

l_TransactionId_numEle dbms_xmldom.DOMElement;
l_TransactionId_num_node dbms_xmldom.DOMNode;
l_TransactionId_num_tnode dbms_xmldom.DOMNode;
l_TransactionId_num_text dbms_xmldom.DOMText;

l_ReviewTemRNAtt_numEle dbms_xmldom.DOMElement;
l_ReviewTemRNAtt_num_node dbms_xmldom.DOMNode;
l_ReviewTemRNAtt_num_tnode dbms_xmldom.DOMNode;
l_ReviewTemRNAtt_num_text dbms_xmldom.DOMText;

l_pCalledId_numEle dbms_xmldom.DOMElement;
l_pCalledId_num_node dbms_xmldom.DOMNode;
l_pCalledId_num_tnode dbms_xmldom.DOMNode;
l_pCalledId_num_text dbms_xmldom.DOMText;

l_LoginPrsnType_numEle dbms_xmldom.DOMElement;
l_LoginPrsnType_num_node dbms_xmldom.DOMNode;
l_LoginPrsnType_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnType_num_text dbms_xmldom.DOMText;

l_LoginPrsnEmpFlag_numEle dbms_xmldom.DOMElement;
l_LoginPrsnEmpFlag_num_node dbms_xmldom.DOMNode;
l_LoginPrsnEmpFlag_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnEmpFlag_num_text dbms_xmldom.DOMText;

l_SS_RevFLMode_numEle dbms_xmldom.DOMElement;
l_SS_RevFLMode_num_node dbms_xmldom.DOMNode;
l_SS_RevFLMode_num_tnode dbms_xmldom.DOMNode;
l_SS_RevFLMode_num_text dbms_xmldom.DOMText;

l_pAMEAppId_numEle dbms_xmldom.DOMElement;
l_pAMEAppId_num_node dbms_xmldom.DOMNode;
l_pAMEAppId_num_tnode dbms_xmldom.DOMNode;
l_pAMEAppId_num_text dbms_xmldom.DOMText;

l_PrsnName_numEle dbms_xmldom.DOMElement;
l_PrsnName_num_node dbms_xmldom.DOMNode;
l_PrsnName_num_tnode dbms_xmldom.DOMNode;
l_PrsnName_num_text dbms_xmldom.DOMText;

l_PrsnPayrollId_numEle dbms_xmldom.DOMElement;
l_PrsnPayrollId_num_node dbms_xmldom.DOMNode;
l_PrsnPayrollId_num_tnode dbms_xmldom.DOMNode;
l_PrsnPayrollId_num_text dbms_xmldom.DOMText;

l_ProcessName_numEle dbms_xmldom.DOMElement;
l_ProcessName_num_node dbms_xmldom.DOMNode;
l_ProcessName_num_tnode dbms_xmldom.DOMNode;
l_ProcessName_num_text dbms_xmldom.DOMText;

l_PerzFunctionName_numEle dbms_xmldom.DOMElement;
l_PerzFunctionName_num_node dbms_xmldom.DOMNode;
l_PerzFunctionName_num_tnode dbms_xmldom.DOMNode;
l_PerzFunctionName_num_text dbms_xmldom.DOMText;

l_LoginPrsnBgId_numEle dbms_xmldom.DOMElement;
l_LoginPrsnBgId_num_node dbms_xmldom.DOMNode;
l_LoginPrsnBgId_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnBgId_num_text dbms_xmldom.DOMText;

l_pCalledFrom_numEle dbms_xmldom.DOMElement;
l_pCalledFrom_num_node dbms_xmldom.DOMNode;
l_pCalledFrom_num_tnode dbms_xmldom.DOMNode;
l_pCalledFrom_num_text dbms_xmldom.DOMText;

l_TxnIdentifier_numEle dbms_xmldom.DOMElement;
l_TxnIdentifier_num_node dbms_xmldom.DOMNode;
l_TxnIdentifier_num_tnode dbms_xmldom.DOMNode;
l_TxnIdentifier_num_text dbms_xmldom.DOMText;

l_TxnRefTab_numEle dbms_xmldom.DOMElement;
l_TxnRefTab_num_node dbms_xmldom.DOMNode;
l_TxnRefTab_num_tnode dbms_xmldom.DOMNode;
l_TxnRefTab_num_text dbms_xmldom.DOMText;

L_PerzLocCode_numEle dbms_xmldom.DOMElement;
L_PerzLocCode_num_node dbms_xmldom.DOMNode;
L_PerzLocCode_num_tnode dbms_xmldom.DOMNode;
L_PerzLocCode_num_text dbms_xmldom.DOMText;

l_RelaunchFunction_numEle dbms_xmldom.DOMElement;
l_RelaunchFunction_num_node dbms_xmldom.DOMNode;
l_RelaunchFunction_num_tnode dbms_xmldom.DOMNode;
l_RelaunchFunction_num_text dbms_xmldom.DOMText;
l_pAMETranType_numEle dbms_xmldom.DOMElement;
l_pAMETranType_num_node dbms_xmldom.DOMNode;
l_pAMETranType_num_tnode dbms_xmldom.DOMNode;
l_pAMETranType_num_text dbms_xmldom.DOMText;

l_pApprovalReqd_numEle dbms_xmldom.DOMElement;
l_pApprovalReqd_num_node dbms_xmldom.DOMNode;
l_pApprovalReqd_num_tnode dbms_xmldom.DOMNode;
l_pApprovalReqd_num_text dbms_xmldom.DOMText;

l_NtfAttachAttr_numEle dbms_xmldom.DOMElement;
l_NtfAttachAttr_num_node dbms_xmldom.DOMNode;
l_NtfAttachAttr_num_tnode dbms_xmldom.DOMNode;
l_NtfAttachAttr_num_text dbms_xmldom.DOMText;

l_TransactionType_numEle dbms_xmldom.DOMElement;
l_TransactionType_num_node dbms_xmldom.DOMNode;
l_TransactionType_num_tnode dbms_xmldom.DOMNode;
l_TransactionType_num_text dbms_xmldom.DOMText;

l_PrsnId_numEle dbms_xmldom.DOMElement;
l_PrsnId_num_node dbms_xmldom.DOMNode;
l_PrsnId_num_tnode dbms_xmldom.DOMNode;
l_PrsnId_num_text dbms_xmldom.DOMText;

l_CreatorPrsnId_numEle dbms_xmldom.DOMElement;
l_CreatorPrsnId_num_node dbms_xmldom.DOMNode;
l_CreatorPrsnId_num_tnode dbms_xmldom.DOMNode;
l_CreatorPrsnId_num_text dbms_xmldom.DOMText;

l_LoginPrsnName_numEle dbms_xmldom.DOMElement;
l_LoginPrsnName_num_node dbms_xmldom.DOMNode;
l_LoginPrsnName_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnName_num_text dbms_xmldom.DOMText;

l_PerzOrgId_numEle dbms_xmldom.DOMElement;
l_PerzOrgId_num_node dbms_xmldom.DOMNode;
l_PerzOrgId_num_tnode dbms_xmldom.DOMNode;
l_PerzOrgId_num_text dbms_xmldom.DOMText;

l_PrsnType_numEle dbms_xmldom.DOMElement;
l_PrsnType_num_node dbms_xmldom.DOMNode;
l_PrsnType_num_tnode dbms_xmldom.DOMNode;
l_PrsnType_num_text dbms_xmldom.DOMText;

l_AttachCheck_numEle dbms_xmldom.DOMElement;
l_AttachCheck_num_node dbms_xmldom.DOMNode;
l_AttachCheck_num_tnode dbms_xmldom.DOMNode;
l_AttachCheck_num_text dbms_xmldom.DOMText;

l_LoginPrsnMgrId_numEle dbms_xmldom.DOMElement;
l_LoginPrsnMgrId_num_node dbms_xmldom.DOMNode;
l_LoginPrsnMgrId_num_tnode dbms_xmldom.DOMNode;
l_LoginPrsnMgrId_num_text dbms_xmldom.DOMText;

l_prsnSecGrpId_numEle dbms_xmldom.DOMElement;
l_prsnSecGrpId_num_node dbms_xmldom.DOMNode;
l_prsnSecGrpId_num_tnode dbms_xmldom.DOMNode;
l_prsnSecGrpId_num_text dbms_xmldom.DOMText;

l_AbsenceAction_numEle dbms_xmldom.DOMElement;
l_AbsenceAction_num_node dbms_xmldom.DOMNode;
l_AbsenceAction_num_tnode dbms_xmldom.DOMNode;
l_AbsenceAction_num_text dbms_xmldom.DOMText;

l_AbsenceAttdId_numEle dbms_xmldom.DOMElement;
l_AbsenceAttdId_num_node dbms_xmldom.DOMNode;
l_AbsenceAttdId_num_tnode dbms_xmldom.DOMNode;
l_AbsenceAttdId_num_text dbms_xmldom.DOMText;

l_AbsAttendReaId_numEle dbms_xmldom.DOMElement;
l_AbsAttendReaId_num_node dbms_xmldom.DOMNode;
l_AbsAttendReaId_num_tnode dbms_xmldom.DOMNode;
l_AbsAttendReaId_num_text dbms_xmldom.DOMText;

--p_AbsAttendanceReasonId

l_OVN_numEle dbms_xmldom.DOMElement;
l_OVN_num_node dbms_xmldom.DOMNode;
l_OVN_num_tnode dbms_xmldom.DOMNode;
l_OVN_num_text dbms_xmldom.DOMText;

l_Comments_numEle dbms_xmldom.DOMElement;
l_Comments_num_node dbms_xmldom.DOMNode;
l_Comments_num_tnode dbms_xmldom.DOMNode;
l_Comments_num_text dbms_xmldom.DOMText;

l_LinkAbsIdAbsEO_numEle dbms_xmldom.DOMElement;
l_LinkAbsIdAbsEO_num_node dbms_xmldom.DOMNode;

l_CreationDate_numEle dbms_xmldom.DOMElement;
l_CreationDate_num_node dbms_xmldom.DOMNode;
l_CreationDate_num_tnode dbms_xmldom.DOMNode;
l_CreationDate_num_text dbms_xmldom.DOMText;

l_CreatedBy_numEle dbms_xmldom.DOMElement;
l_CreatedBy_num_node dbms_xmldom.DOMNode;
l_CreatedBy_num_tnode dbms_xmldom.DOMNode;
l_CreatedBy_num_text dbms_xmldom.DOMText;

l_LastUpdateLogin_numEle dbms_xmldom.DOMElement;
l_LastUpdateLogin_num_node dbms_xmldom.DOMNode;
l_LastUpdateLogin_num_tnode dbms_xmldom.DOMNode;
l_LastUpdateLogin_num_text dbms_xmldom.DOMText;

l_LastUpdatedBy_numEle dbms_xmldom.DOMElement;
l_LastUpdatedBy_num_node dbms_xmldom.DOMNode;
l_LastUpdatedBy_num_tnode dbms_xmldom.DOMNode;
l_LastUpdatedBy_num_text dbms_xmldom.DOMText;
l_LastUpdateDate_numEle dbms_xmldom.DOMElement;
l_LastUpdateDate_num_node dbms_xmldom.DOMNode;
l_LastUpdateDate_num_tnode dbms_xmldom.DOMNode;
l_LastUpdateDate_num_text dbms_xmldom.DOMText;

l_TimeProjSt_numEle dbms_xmldom.DOMElement;
l_TimeProjSt_num_node dbms_xmldom.DOMNode;
l_TimeProjSt_num_tnode dbms_xmldom.DOMNode;
l_TimeProjSt_num_text dbms_xmldom.DOMText;

l_TimeProjEndnumEle dbms_xmldom.DOMElement;
l_TimeProjEndnum_node dbms_xmldom.DOMNode;
l_TimeProjEndnum_tnode dbms_xmldom.DOMNode;
l_TimeProjEndnum_text dbms_xmldom.DOMText;

l_DateStart_numEle dbms_xmldom.DOMElement;
l_DateStart_num_node dbms_xmldom.DOMNode;
l_DateStart_num_tnode dbms_xmldom.DOMNode;
l_DateStart_num_text dbms_xmldom.DOMText;

l_DatePrjStrt_numEle dbms_xmldom.DOMElement;
l_DatePrjStrt_num_node dbms_xmldom.DOMNode;
l_DatePrjStrt_num_tnode dbms_xmldom.DOMNode;
l_DatePrjStrt_num_text dbms_xmldom.DOMText;

l_DateProjEnd_numEle dbms_xmldom.DOMElement;
l_DateProjEnd_num_node dbms_xmldom.DOMNode;
l_DateProjEnd_num_tnode dbms_xmldom.DOMNode;
l_DateProjEnd_num_text dbms_xmldom.DOMText;

l_DateNoti_numEle dbms_xmldom.DOMElement;
l_DateNoti_num_node dbms_xmldom.DOMNode;
l_DateNoti_num_tnode dbms_xmldom.DOMNode;
l_DateNoti_num_text dbms_xmldom.DOMText;

l_DateEnd_numEle dbms_xmldom.DOMElement;
l_DateEnd_num_node dbms_xmldom.DOMNode;
l_DateEnd_num_tnode dbms_xmldom.DOMNode;
l_DateEnd_num_text dbms_xmldom.DOMText;

l_AbsenceHours_numEle dbms_xmldom.DOMElement;
l_AbsenceHours_num_node dbms_xmldom.DOMNode;
l_AbsenceHours_num_tnode dbms_xmldom.DOMNode;
l_AbsenceHours_num_text dbms_xmldom.DOMText;

l_AbsenceDays_numEle dbms_xmldom.DOMElement;
l_AbsenceDays_num_node dbms_xmldom.DOMNode;
l_AbsenceDays_num_tnode dbms_xmldom.DOMNode;
l_AbsenceDays_num_text dbms_xmldom.DOMText;

l_PersonId_numEle dbms_xmldom.DOMElement;
l_PersonId_num_node dbms_xmldom.DOMNode;
l_PersonId_num_tnode dbms_xmldom.DOMNode;
l_PersonId_num_text dbms_xmldom.DOMText;

l_AbsAttTypeId_numEle dbms_xmldom.DOMElement;
l_AbsAttTypeId_num_node dbms_xmldom.DOMNode;
l_AbsAttTypeId_num_tnode dbms_xmldom.DOMNode;
l_AbsAttTypeId_num_text dbms_xmldom.DOMText;

l_BusinessGroupId_numEle dbms_xmldom.DOMElement;
l_BusinessGroupId_num_node dbms_xmldom.DOMNode;
l_BusinessGroupId_num_tnode dbms_xmldom.DOMNode;
l_BusinessGroupId_num_text dbms_xmldom.DOMText;

l_AbsAttId_numEle dbms_xmldom.DOMElement;
l_AbsAttId_num_node dbms_xmldom.DOMNode;
l_AbsAttId_num_tnode dbms_xmldom.DOMNode;
l_AbsAttId_num_text dbms_xmldom.DOMText;

BEGIN

-- Create an empty XML document

l_domdoc := dbms_xmldom.newDomDocument;

-- Create a root node

l_root_node := dbms_xmldom.makeNode(l_domdoc);

-- Create a new Supplier Node and add it to the root node

--l_sup_node := dbms_xmldom.appendChild( l_root_node ,
dbms_xmldom.makeNode(dbms_xmldom.createElement(l_domdoc, 'SUPPLIER_ADDRESS')));
l_Transaction_node := dbms_xmldom.appendChild( l_root_node ,
dbms_xmldom.makeNode(dbms_xmldom.createElement(l_domdoc, 'Transaction')));

FOR sup_rec IN (SELECT A.*

,'000100000004'||RAWTOHEX(PER_ABSENCE_ATTENDANCES_S.CURRVAL) CDATA
FROM FUJ_SSHR_PERSINFO A
where PrsnId = p_PrsnId
)
LOOP

-- For each record, create a new Supplier element

-- and add this new Supplier element to the Supplier Parent node
l_TransCtx_element := dbms_xmldom.createElement(l_domdoc, 'TransCtx' );
l_TransCtx_node :=
dbms_xmldom.appendChild(l_Transaction_node,dbms_xmldom.makeNode(l_TransCtx_element)
);

l_EoApiMap_element := dbms_xmldom.createElement(l_domdoc, 'EoApiMap' );

l_EoApiMap_node :=
dbms_xmldom.appendChild(l_Transaction_node,dbms_xmldom.makeNode(l_EoApiMap_element)
);

l_EoApiMapEO_element := dbms_xmldom.createElement(l_domdoc, 'EO' );

dbms_xmldom.setAttribute(l_EoApiMapEO_element,'Name',
'oracle.apps.per.schema.server.PerAbsenceAttendancesEO');
l_EoApiMapEO_node :=
dbms_xmldom.appendChild(l_EoApiMap_node,dbms_xmldom.makeNode(l_EoApiMapEO_element))
;
l_EoApiMapEO_name_text := dbms_xmldom.createTextNode(l_domdoc,
'HR_PERSON_ABSENCE_SWI.PROCESS_API' );
l_EoApiMapEO_name_tnode :=
dbms_xmldom.appendChild(l_EoApiMapEO_node,dbms_xmldom.makeNode(l_EoApiMapEO_name_te
xt));

l_TransCache_element := dbms_xmldom.createElement(l_domdoc, 'TransCache' );

l_TransCache_node :=
dbms_xmldom.appendChild(l_Transaction_node,dbms_xmldom.makeNode(l_TransCache_elemen
t));

l_AM_element := dbms_xmldom.createElement(l_domdoc, 'AM' );

dbms_xmldom.setAttribute(l_AM_element,'MomVer', '1044362310593');
l_AM_node :=
dbms_xmldom.appendChild(l_TransCache_node,dbms_xmldom.makeNode(l_AM_element));

l_cd_element := dbms_xmldom.createElement(l_domdoc, 'cd' );

l_cd_node :=
dbms_xmldom.appendChild(l_AM_node,dbms_xmldom.makeNode(l_cd_element));

l_TXN_element := dbms_xmldom.createElement(l_domdoc, 'TXN' );

dbms_xmldom.setAttribute(l_TXN_element,'Def', '0');
dbms_xmldom.setAttribute(l_TXN_element,'New', '0');
dbms_xmldom.setAttribute(l_TXN_element,'Lok', '2');
dbms_xmldom.setAttribute(l_TXN_element,'pcid', '91');
l_TXN_node :=
dbms_xmldom.appendChild(l_AM_node,dbms_xmldom.makeNode(l_TXN_element));

l_EO_element := dbms_xmldom.createElement(l_domdoc, 'EO' );

dbms_xmldom.setAttribute(l_EO_element,'Name',
'oracle.apps.per.schema.server.PerAbsenceAttendancesEO');
l_EO_node :=
dbms_xmldom.appendChild(l_TXN_node,dbms_xmldom.makeNode(l_EO_element));

l_EOCDATA_name_element := dbms_xmldom.createCDATASection(l_domdoc,
sup_rec.CDATA );
l_EOCDATA_name_node :=
dbms_xmldom.appendChild(l_EO_node,dbms_xmldom.makeNode(l_EOCDATA_name_element));
l_EOCDATA_name_text := dbms_xmldom.createTextNode(l_domdoc, sup_rec.CDATA);
l_EOCDATA_name_tnode :=
dbms_xmldom.appendChild(l_EOCDATA_name_node,dbms_xmldom.makeNode(l_EOCDATA_name_tex
t));

l_PerAbsAttendEORow_element := dbms_xmldom.createElement(l_domdoc,
'PerAbsenceAttendancesEORow' );
dbms_xmldom.setAttribute(l_PerAbsAttendEORow_element,'PS', '0');
dbms_xmldom.setAttribute(l_PerAbsAttendEORow_element,'PK', 'Y');
l_PerAbsAttendEORow_node :=
dbms_xmldom.appendChild(l_EO_node,dbms_xmldom.makeNode(l_PerAbsAttendEORow_element)
);

l_EO2_element := dbms_xmldom.createElement(l_domdoc, 'EO' );

dbms_xmldom.setAttribute(l_EO2_element,'Name',
'oracle.apps.per.schema.server.TransactionsEO');
l_EO2_node :=
dbms_xmldom.appendChild(l_TXN_node,dbms_xmldom.makeNode(l_EO2_element));

l_EOCDATA2_name_element := dbms_xmldom.createCDATASection(l_domdoc,
sup_rec.CDATA);
l_EOCDATA2_name_node :=
dbms_xmldom.appendChild(l_EO2_node,dbms_xmldom.makeNode(l_EOCDATA2_name_element));
l_EOCDATA2_name_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.CDATA );
l_EOCDATA2_name_tnode :=
dbms_xmldom.appendChild(l_EOCDATA2_name_node,dbms_xmldom.makeNode(l_EOCDATA2_name_t
ext));

l_TransactionsEORow_element := dbms_xmldom.createElement(l_domdoc,
'TransactionsEORow' );
dbms_xmldom.setAttribute(l_TransactionsEORow_element,'PS', '0');
l_TransactionsEORow_node :=
dbms_xmldom.appendChild(l_EO2_node,dbms_xmldom.makeNode(l_TransactionsEORow_element
));

-- Each Supplier node will get a Number node which contains the Supplier Number
as text
l_supp_numEle := dbms_xmldom.createElement(l_domdoc, 'TransactionGroup' );
l_supp_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_supp_numEle));
l_supp_num_text := dbms_xmldom.createTextNode(l_domdoc, 'ABSENCE_MGMT' );
l_supp_num_tnode :=
dbms_xmldom.appendChild(l_supp_num_node,dbms_xmldom.makeNode(l_supp_num_text));

l_PrsnJobName_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnJobName' ); --

l_domdoc constant
l_PrsnJobName_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnJobName_numEle))
;--l_TransCtx_node parent
l_PrsnJobName_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnJobName );--column of cursor
l_PrsnJobName_num_tnode :=
dbms_xmldom.appendChild(l_PrsnJobName_num_node,dbms_xmldom.makeNode(l_PrsnJobName_n
um_text));
l_PrsnNpwFlag_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnNpwFlag' ); --
l_domdoc constant
l_PrsnNpwFlag_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnNpwFlag_numEle))
;--l_TransCtx_node parent
l_PrsnNpwFlag_num_text := dbms_xmldom.createTextNode(l_domdoc, 'A' );--column
of cursor
l_PrsnNpwFlag_num_tnode :=
dbms_xmldom.appendChild(l_PrsnNpwFlag_num_node,dbms_xmldom.makeNode(l_PrsnNpwFlag_n
um_text));

l_EmpGen_numEle := dbms_xmldom.createElement(l_domdoc, 'EmployeeGeneration' );

--l_domdoc constant
l_EmpGen_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_EmpGen_numEle));--
l_TransCtx_node parent
l_EmpGen_num_text := dbms_xmldom.createTextNode(l_domdoc, 'A' );--column of
cursor
l_EmpGen_num_tnode :=
dbms_xmldom.appendChild(l_EmpGen_num_node,dbms_xmldom.makeNode(l_EmpGen_num_text));

l_PrsnBgId_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnBgId' ); --

l_domdoc constant
l_PrsnBgId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnBgId_numEle));--
l_TransCtx_node parent
l_PrsnBgId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PRSNBGID );--column of cursor
l_PrsnBgId_num_tnode :=
dbms_xmldom.appendChild(l_PrsnBgId_num_node,dbms_xmldom.makeNode(l_PrsnBgId_num_tex
t));

l_FyiDetails_numEle := dbms_xmldom.createElement(l_domdoc, 'FyiDetails' ); --

l_domdoc constant
l_FyiDetails_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_FyiDetails_numEle));
--l_TransCtx_node parent
l_FyiDetails_num_text := dbms_xmldom.createTextNode(l_domdoc, 'Y' );--column
of cursor
l_FyiDetails_num_tnode :=
dbms_xmldom.appendChild(l_FyiDetails_num_node,dbms_xmldom.makeNode(l_FyiDetails_num
_text));

l_LoginPrsnNpwFlag_numEle := dbms_xmldom.createElement(l_domdoc,
'LoginPrsnNpwFlag' ); --l_domdoc constant
l_LoginPrsnNpwFlag_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginPrsnNpwFlag_num
Ele));--l_TransCtx_node parent
l_LoginPrsnNpwFlag_num_text := dbms_xmldom.createTextNode(l_domdoc, 'A' );--
column of cursor
l_LoginPrsnNpwFlag_num_tnode :=
dbms_xmldom.appendChild(l_LoginPrsnNpwFlag_num_node,dbms_xmldom.makeNode(l_LoginPrs
nNpwFlag_num_text));

l_PrsnAsgFlag_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnAsgFlag' ); --

l_domdoc constant
l_PrsnAsgFlag_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnAsgFlag_numEle))
;--l_TransCtx_node parent
l_PrsnAsgFlag_num_text := dbms_xmldom.createTextNode(l_domdoc, 'Y' );--column
of cursor
l_PrsnAsgFlag_num_tnode :=
dbms_xmldom.appendChild(l_PrsnAsgFlag_num_node,dbms_xmldom.makeNode(l_PrsnAsgFlag_n
um_text));

l_EffectiveDate_numEle := dbms_xmldom.createElement(l_domdoc, 'EffectiveDate' );

--l_domdoc constant
dbms_xmldom.setAttribute(l_EffectiveDate_numEle,'dataType', 'd');
l_EffectiveDate_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_EffectiveDate_numEle
));--l_TransCtx_node parent
l_EffectiveDate_num_text := dbms_xmldom.createTextNode(l_domdoc,
to_char(sysdate,'yyyy-mm-dd'));--column of cursor
l_EffectiveDate_num_tnode :=
dbms_xmldom.appendChild(l_EffectiveDate_num_node,dbms_xmldom.makeNode(l_EffectiveDa
te_num_text));

l_ProductCode_numEle := dbms_xmldom.createElement(l_domdoc, 'ProductCode' ); --

l_pNtfSubMsg_numEle := dbms_xmldom.createElement(l_domdoc, 'pNtfSubMsg' ); --

l_domdoc constant
l_pNtfSubMsg_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_pNtfSubMsg_numEle));
--l_TransCtx_node parent
l_pNtfSubMsg_num_text := dbms_xmldom.createTextNode(l_domdoc,
'HR_ABS_NTF_SUB_MSG' );--column of cursor
l_pNtfSubMsg_num_tnode :=
dbms_xmldom.appendChild(l_pNtfSubMsg_num_node,dbms_xmldom.makeNode(l_pNtfSubMsg_num
_text));

l_LogPrsnCon_numEle := dbms_xmldom.createElement(l_domdoc,
'LoginPrsnContextSet' ); --l_domdoc constant
dbms_xmldom.setAttribute(l_LogPrsnCon_numEle,'dataType', 'b');
l_LogPrsnCon_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LogPrsnCon_numEle));
--l_TransCtx_node parent
l_LogPrsnCon_num_text := dbms_xmldom.createTextNode(l_domdoc, 'true');--
column of cursor
l_LogPrsnCon_num_tnode :=
dbms_xmldom.appendChild(l_LogPrsnCon_num_node,dbms_xmldom.makeNode(l_LogPrsnCon_num
_text));

l_LoginPrsnId_numEle := dbms_xmldom.createElement(l_domdoc, 'LoginPrsnId' ); --

l_domdoc constant
l_LoginPrsnId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginPrsnId_numEle))
;--l_TransCtx_node parent
l_LoginPrsnId_num_text := dbms_xmldom.createTextNode(l_domdoc,
p_LoginPrsnId );--column of cursor
l_LoginPrsnId_num_tnode :=
dbms_xmldom.appendChild(l_LoginPrsnId_num_node,dbms_xmldom.makeNode(l_LoginPrsnId_n
um_text));

l_PrsnLegCode_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnLegCode' ); --

l_domdoc constant
l_PrsnLegCode_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnLegCode_numEle))
;--l_TransCtx_node parent
l_PrsnLegCode_num_text := dbms_xmldom.createTextNode(l_domdoc, 'AE' );--
column of cursor
l_PrsnLegCode_num_tnode :=
dbms_xmldom.appendChild(l_PrsnLegCode_num_node,dbms_xmldom.makeNode(l_PrsnLegCode_n
um_text));

l_PrsnMgrId_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnMgrId' ); --

l_domdoc constant
l_PrsnMgrId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnMgrId_numEle));-
-l_TransCtx_node parent
l_PrsnMgrId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnMgrId );--column of cursor
l_PrsnMgrId_num_tnode :=
dbms_xmldom.appendChild(l_PrsnMgrId_num_node,dbms_xmldom.makeNode(l_PrsnMgrId_num_t
ext));

l_LoginPrsnLegCode_numEle := dbms_xmldom.createElement(l_domdoc,
'LoginPrsnLegCode' ); --l_domdoc constant
l_LoginPrsnLegCode_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginPrsnLegCode_num
Ele));--l_TransCtx_node parent
l_LoginPrsnLegCode_num_text := dbms_xmldom.createTextNode(l_domdoc, 'AE' );--
column of cursor
l_LoginPrsnLegCode_num_tnode :=
dbms_xmldom.appendChild(l_LoginPrsnLegCode_num_node,dbms_xmldom.makeNode(l_LoginPrs
nLegCode_num_text));

l_txnRefId_numEle := dbms_xmldom.createElement(l_domdoc, 'TransactionRefId' );

--l_domdoc constant
dbms_xmldom.setAttribute(l_txnRefId_numEle,'dataType', 'n');
l_txnRefId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_txnRefId_numEle));--
l_TransCtx_node parent
l_txnRefId_num_text := dbms_xmldom.createTextNode(l_domdoc,
v_TransactionRefId);--column of cursor
l_txnRefId_num_tnode :=
dbms_xmldom.appendChild(l_txnRefId_num_node,dbms_xmldom.makeNode(l_txnRefId_num_tex
t));

l_PrsnGradeId_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnGradeId' ); --

l_domdoc constant
l_PrsnGradeId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnGradeId_numEle))
;--l_TransCtx_node parent
l_PrsnGradeId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnGradeId );--column of cursor
l_PrsnGradeId_num_tnode :=
dbms_xmldom.appendChild(l_PrsnGradeId_num_node,dbms_xmldom.makeNode(l_PrsnGradeId_n
um_text));

l_AsgStartDate_numEle := dbms_xmldom.createElement(l_domdoc, 'AsgStartDate' );

--l_domdoc constant
dbms_xmldom.setAttribute(l_AsgStartDate_numEle,'dataType', 'd');
l_AsgStartDate_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_AsgStartDate_numEle)
);--l_TransCtx_node parent
l_AsgStartDate_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.AsgStartDate );--column of cursor
l_AsgStartDate_num_tnode :=
dbms_xmldom.appendChild(l_AsgStartDate_num_node,dbms_xmldom.makeNode(l_AsgStartDate
_num_text));

l_PrsnJobId_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnJobId' ); --

l_domdoc constant
l_PrsnJobId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnJobId_numEle));-
-l_TransCtx_node parent
l_PrsnJobId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnJobId );--column of cursor
l_PrsnJobId_num_tnode :=
dbms_xmldom.appendChild(l_PrsnJobId_num_node,dbms_xmldom.makeNode(l_PrsnJobId_num_t
ext));

l_ItemType_numEle := dbms_xmldom.createElement(l_domdoc, 'ItemType' ); --

l_domdoc constant
l_ItemType_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_ItemType_numEle));--
l_TransCtx_node parent
l_ItemType_num_text := dbms_xmldom.createTextNode(l_domdoc, 'HRSSA' );--
column of cursor
l_ItemType_num_tnode :=
dbms_xmldom.appendChild(l_ItemType_num_node,dbms_xmldom.makeNode(l_ItemType_num_tex
t));

l_PrsnContextSet_numEle := dbms_xmldom.createElement(l_domdoc,
'PrsnContextSet' ); --l_domdoc constant
dbms_xmldom.setAttribute(l_PrsnContextSet_numEle,'dataType', 'b');
l_PrsnContextSet_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnContextSet_numEl
e));--l_TransCtx_node parent
l_PrsnContextSet_num_text := dbms_xmldom.createTextNode(l_domdoc, 'true' );--
column of cursor
l_PrsnContextSet_num_tnode :=
dbms_xmldom.appendChild(l_PrsnContextSet_num_node,dbms_xmldom.makeNode(l_PrsnContex
tSet_num_text));

l_LoginPrsnEmpFlag_numEle := dbms_xmldom.createElement(l_domdoc,
'LoginPrsnEmpFlag' ); --l_domdoc constant
l_LoginPrsnEmpFlag_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginPrsnEmpFlag_num
Ele));--l_TransCtx_node parent
l_LoginPrsnEmpFlag_num_text := dbms_xmldom.createTextNode(l_domdoc, 'A' );--
column of cursor
l_LoginPrsnEmpFlag_num_tnode :=
dbms_xmldom.appendChild(l_LoginPrsnEmpFlag_num_node,dbms_xmldom.makeNode(l_LoginPrs
nEmpFlag_num_text));

l_LoginPrsnType_numEle := dbms_xmldom.createElement(l_domdoc, 'LoginPrsnType' );

--l_domdoc constant
l_LoginPrsnType_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginPrsnType_numEle
));--l_TransCtx_node parent
l_LoginPrsnType_num_text := dbms_xmldom.createTextNode(l_domdoc, 'E' );--
column of cursor
l_LoginPrsnType_num_tnode :=
dbms_xmldom.appendChild(l_LoginPrsnType_num_node,dbms_xmldom.makeNode(l_LoginPrsnTy
pe_num_text));

l_pCalledId_numEle := dbms_xmldom.createElement(l_domdoc, 'pCalledId' ); --

l_domdoc constant
dbms_xmldom.setAttribute(l_pCalledId_numEle,'dataType', 'n');
l_pCalledId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_pCalledId_numEle));-
-l_TransCtx_node parent
l_pCalledId_num_text := dbms_xmldom.createTextNode(l_domdoc,
p_pCalledId );--column of cursor
l_pCalledId_num_tnode :=
dbms_xmldom.appendChild(l_pCalledId_num_node,dbms_xmldom.makeNode(l_pCalledId_num_t
ext));

l_ReviewTemRNAtt_numEle := dbms_xmldom.createElement(l_domdoc,
'ReviewTemplateRNAttr' ); --l_domdoc constant
l_ReviewTemRNAtt_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_ReviewTemRNAtt_numEl
e));--l_TransCtx_node parent
l_ReviewTemRNAtt_num_text := dbms_xmldom.createTextNode(l_domdoc,
'HR_ABS_NTF_SS' );--column of cursor
l_ReviewTemRNAtt_num_tnode :=
dbms_xmldom.appendChild(l_ReviewTemRNAtt_num_node,dbms_xmldom.makeNode(l_ReviewTemR
NAtt_num_text));

l_TransactionId_numEle := dbms_xmldom.createElement(l_domdoc, 'TransactionId' );

--l_domdoc constant
l_TransactionId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_TransactionId_numEle
));--l_TransCtx_node parent
l_TransactionId_num_text := dbms_xmldom.createTextNode(l_domdoc,
P_TransactionId);--column of cursor
l_TransactionId_num_tnode :=
dbms_xmldom.appendChild(l_TransactionId_num_node,dbms_xmldom.makeNode(l_Transaction
Id_num_text));

l_PrsnLocationId_numEle := dbms_xmldom.createElement(l_domdoc,
'PrsnLocationId' ); --l_domdoc constant
l_PrsnLocationId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnLocationId_numEl
e));--l_TransCtx_node parent
l_PrsnLocationId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnLocationId );--column of cursor
l_PrsnLocationId_num_tnode :=
dbms_xmldom.appendChild(l_PrsnLocationId_num_node,dbms_xmldom.makeNode(l_PrsnLocati
onId_num_text));

l_PrsnKfstrCode_numEle := dbms_xmldom.createElement(l_domdoc,
'PrsnKflexStructCode' ); --l_domdoc constant
l_PrsnKfstrCode_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnKfstrCode_numEle
));--l_TransCtx_node parent
l_PrsnKfstrCode_num_text := dbms_xmldom.createTextNode(l_domdoc,
'FUJ_People_Group_Flexfield' );--column of cursor
l_PrsnKfstrCode_num_tnode :=
dbms_xmldom.appendChild(l_PrsnKfstrCode_num_node,dbms_xmldom.makeNode(l_PrsnKfstrCo
de_num_text));

l_LoginPrsnMgrName_numEle := dbms_xmldom.createElement(l_domdoc,
'LoginPrsnMgrName' ); --l_domdoc constant
l_LoginPrsnMgrName_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginPrsnMgrName_num
Ele));--l_TransCtx_node parent
l_LoginPrsnMgrName_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PRSNMGRNAME );--column of cursor
l_LoginPrsnMgrName_num_tnode :=
dbms_xmldom.appendChild(l_LoginPrsnMgrName_num_node,dbms_xmldom.makeNode(l_LoginPrs
nMgrName_num_text));

l_PrsnPositionName_numEle := dbms_xmldom.createElement(l_domdoc,
'PrsnPositionName' ); --l_domdoc constant
l_PrsnPositionName_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnPositionName_num
Ele));--l_TransCtx_node parent
l_PrsnPositionName_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnPositionName );--column of cursor
l_PrsnPositionName_num_tnode :=
dbms_xmldom.appendChild(l_PrsnPositionName_num_node,dbms_xmldom.makeNode(l_PrsnPosi
tionName_num_text));

l_PrsnEmpFlag_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnEmpFlag' ); --

l_domdoc constant
l_PrsnEmpFlag_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnEmpFlag_numEle))
;--l_TransCtx_node parent
l_PrsnEmpFlag_num_text := dbms_xmldom.createTextNode(l_domdoc, 'A' );--column
of cursor
l_PrsnEmpFlag_num_tnode :=
dbms_xmldom.appendChild(l_PrsnEmpFlag_num_node,dbms_xmldom.makeNode(l_PrsnEmpFlag_n
um_text));

l_PrsnMgrName_numEle := dbms_xmldom.createElement(l_domdoc, 'PrsnMgrName' ); --

l_prsnOrgId_numEle := dbms_xmldom.createElement(l_domdoc,
'PrsnOrganizationId' ); --l_domdoc constant
l_prsnOrgId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_prsnOrgId_numEle));-
-l_TransCtx_node parent
l_prsnOrgId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnOrganizationId );--column of cursor
l_prsnOrgId_num_tnode :=
dbms_xmldom.appendChild(l_prsnOrgId_num_node,dbms_xmldom.makeNode(l_prsnOrgId_num_t
ext));

l_PrsnPositionId_numEle := dbms_xmldom.createElement(l_domdoc,
'PrsnPositionId' ); --l_domdoc constant
l_PrsnPositionId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnPositionId_numEl
e));--l_TransCtx_node parent
l_PrsnPositionId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnPositionId );--column of cursor
l_PrsnPositionId_num_tnode :=
dbms_xmldom.appendChild(l_PrsnPositionId_num_node,dbms_xmldom.makeNode(l_PrsnPositi
onId_num_text));

l_TxnStatus_numEle := dbms_xmldom.createElement(l_domdoc, 'TxnStatus' ); --

l_domdoc constant
l_TxnStatus_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_TxnStatus_numEle));-
-l_TransCtx_node parent
l_TxnStatus_num_text := dbms_xmldom.createTextNode(l_domdoc, 'W' );--column
of cursor
l_TxnStatus_num_tnode :=
dbms_xmldom.appendChild(l_TxnStatus_num_node,dbms_xmldom.makeNode(l_TxnStatus_num_t
ext));

l_LoginWorkerNumber_numEle := dbms_xmldom.createElement(l_domdoc,
'LoginWorkerNumber' ); --l_domdoc constant
l_LoginWorkerNumber_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginWorkerNumber_nu
mEle));--l_TransCtx_node parent
l_LoginWorkerNumber_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.LoginWorkerNumber );--column of cursor
l_LoginWorkerNumber_num_tnode :=
dbms_xmldom.appendChild(l_LoginWorkerNumber_num_node,dbms_xmldom.makeNode(l_LoginWo
rkerNumber_num_text));

l_PrsnBgCurrencyCode_numEle := dbms_xmldom.createElement(l_domdoc,
'PrsnBgCurrencyCode' ); --l_domdoc constant
l_PrsnBgCurrencyCode_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnBgCurrencyCode_n
umEle));--l_TransCtx_node parent
l_PrsnBgCurrencyCode_num_text := dbms_xmldom.createTextNode(l_domdoc,
'AED' );--column of cursor
l_PrsnBgCurrencyCode_num_tnode :=
dbms_xmldom.appendChild(l_PrsnBgCurrencyCode_num_node,dbms_xmldom.makeNode(l_PrsnBg
CurrencyCode_num_text));

l_HeaderType_numEle := dbms_xmldom.createElement(l_domdoc, 'HeaderType' ); --

l_domdoc constant
l_HeaderType_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_HeaderType_numEle));
--l_TransCtx_node parent
l_HeaderType_num_text := dbms_xmldom.createTextNode(l_domdoc,
'PER_HEADER' );--column of cursor
l_HeaderType_num_tnode :=
dbms_xmldom.appendChild(l_HeaderType_num_node,dbms_xmldom.makeNode(l_HeaderType_num
_text));

l_SSHR_WF_BASED_numEle := dbms_xmldom.createElement(l_domdoc, 'SSHR_WF_BASED' );

--l_domdoc constant
dbms_xmldom.setAttribute(l_SSHR_WF_BASED_numEle,'dataType', 'b');
l_SSHR_WF_BASED_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_SSHR_WF_BASED_numEle
));--l_TransCtx_node parent
l_SSHR_WF_BASED_num_text := dbms_xmldom.createTextNode(l_domdoc, 'true' );--
column of cursor
l_SSHR_WF_BASED_num_tnode :=
dbms_xmldom.appendChild(l_SSHR_WF_BASED_num_node,dbms_xmldom.makeNode(l_SSHR_WF_BAS
ED_num_text));

l_prsnSecGrpId_numEle:= dbms_xmldom.createElement(l_domdoc,
'PrsnSecurityGroupId' ); --l_domdoc constant
l_prsnSecGrpId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_prsnSecGrpId_numEle)
);--l_TransCtx_node parent
l_prsnSecGrpId_num_text := dbms_xmldom.createTextNode(l_domdoc, '0' );--
column of cursor
l_prsnSecGrpId_num_tnode :=
dbms_xmldom.appendChild(l_prsnSecGrpId_num_node,dbms_xmldom.makeNode(l_prsnSecGrpId
_num_text));

l_AttachCheck_numEle:= dbms_xmldom.createElement(l_domdoc, 'AttachCheck' ); --

l_domdoc constant
l_AttachCheck_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_AttachCheck_numEle))
;--l_TransCtx_node parent
l_AttachCheck_num_text := dbms_xmldom.createTextNode(l_domdoc, 'Y');--column
of cursor
l_AttachCheck_num_tnode :=
dbms_xmldom.appendChild(l_AttachCheck_num_node,dbms_xmldom.makeNode(l_AttachCheck_n
um_text));

l_PrsnType_numEle:= dbms_xmldom.createElement(l_domdoc, 'PrsnType' ); --

l_domdoc constant
l_PrsnType_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnType_numEle));--
l_TransCtx_node parent
l_PrsnType_num_text := dbms_xmldom.createTextNode(l_domdoc, 'E' );--column of
cursor
l_PrsnType_num_tnode :=
dbms_xmldom.appendChild(l_PrsnType_num_node,dbms_xmldom.makeNode(l_PrsnType_num_tex
t));

l_PerzOrgId_numEle:= dbms_xmldom.createElement(l_domdoc, 'PerzOrganizationId'

); --l_domdoc constant
l_PerzOrgId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PerzOrgId_numEle));-
-l_TransCtx_node parent
l_PerzOrgId_num_text := dbms_xmldom.createTextNode(l_domdoc, sup_rec.PRSNBGID
);--column of cursor
l_PerzOrgId_num_tnode :=
dbms_xmldom.appendChild(l_PerzOrgId_num_node,dbms_xmldom.makeNode(l_PerzOrgId_num_t
ext));

l_LoginPrsnName_numEle:= dbms_xmldom.createElement(l_domdoc,
'LoginPrsnName' ); --l_domdoc constant
l_LoginPrsnName_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginPrsnName_numEle
));--l_TransCtx_node parent
l_LoginPrsnName_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PRSNNAME );--column of cursor
l_LoginPrsnName_num_tnode :=
dbms_xmldom.appendChild(l_LoginPrsnName_num_node,dbms_xmldom.makeNode(l_LoginPrsnNa
me_num_text));

l_PrsnId_numEle:= dbms_xmldom.createElement(l_domdoc, 'PrsnId' ); --l_domdoc

constant
l_PrsnId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnId_numEle));--
l_TransCtx_node parent
l_PrsnId_num_text := dbms_xmldom.createTextNode(l_domdoc, sup_rec.LOGINPRSNID
);--column of cursor
l_PrsnId_num_tnode :=
dbms_xmldom.appendChild(l_PrsnId_num_node,dbms_xmldom.makeNode(l_PrsnId_num_text));

l_TransactionType_numEle:= dbms_xmldom.createElement(l_domdoc,
'TransactionType' ); --l_domdoc constant
l_TransactionType_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_TransactionType_numE
le));--l_TransCtx_node parent
l_TransactionType_num_text := dbms_xmldom.createTextNode(l_domdoc, 'WF' );--
column of cursor
l_TransactionType_num_tnode :=
dbms_xmldom.appendChild(l_TransactionType_num_node,dbms_xmldom.makeNode(l_Transacti
onType_num_text));

l_NtfAttachAttr_numEle:= dbms_xmldom.createElement(l_domdoc,
'NtfAttachAttr' ); --l_domdoc constant
l_NtfAttachAttr_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_NtfAttachAttr_numEle
));--l_TransCtx_node parent
l_NtfAttachAttr_num_text := dbms_xmldom.createTextNode(l_domdoc,
'FND:entity=PQH_SS_ATTACHMENT'||'&'||'amp;pk1name=TransactionId'||'&'||'amp;pk1valu
e='||p_TransactionId );--column of cursor
l_NtfAttachAttr_num_tnode :=
dbms_xmldom.appendChild(l_NtfAttachAttr_num_node,dbms_xmldom.makeNode(l_NtfAttachAt
tr_num_text));

l_pApprovalReqd_numEle:= dbms_xmldom.createElement(l_domdoc,
'pApprovalReqd' ); --l_domdoc constant
l_pApprovalReqd_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_pApprovalReqd_numEle
));--l_TransCtx_node parent
l_pApprovalReqd_num_text := dbms_xmldom.createTextNode(l_domdoc,'YD' );--
column of cursor
l_pApprovalReqd_num_tnode :=
dbms_xmldom.appendChild(l_pApprovalReqd_num_node,dbms_xmldom.makeNode(l_pApprovalRe
qd_num_text));

l_pAMETranType_numEle:= dbms_xmldom.createElement(l_domdoc, 'pAMETranType' );

l_RelaunchFunction_numEle:= dbms_xmldom.createElement(l_domdoc,
'RelaunchFunction' ); --l_domdoc constant
l_RelaunchFunction_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_RelaunchFunction_num
Ele));--l_TransCtx_node parent
l_RelaunchFunction_num_text := dbms_xmldom.createTextNode(l_domdoc,
'HR_ABS_ENTRY_PAGE_SS' );--column of cursor
l_RelaunchFunction_num_tnode :=
dbms_xmldom.appendChild(l_RelaunchFunction_num_node,dbms_xmldom.makeNode(l_Relaunch
Function_num_text));

L_PerzLocCode_numEle:= dbms_xmldom.createElement(l_domdoc,
'PerzLocalizationCode' ); --l_domdoc constant
L_PerzLocCode_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(L_PerzLocCode_numEle))
;--l_TransCtx_node parent
L_PerzLocCode_num_text := dbms_xmldom.createTextNode(l_domdoc, 'AE' );--
column of cursor
L_PerzLocCode_num_tnode :=
dbms_xmldom.appendChild(L_PerzLocCode_num_node,dbms_xmldom.makeNode(L_PerzLocCode_n
um_text));

l_TxnRefTab_numEle:= dbms_xmldom.createElement(l_domdoc,
'TransactionRefTable' ); --l_domdoc constant
l_TxnRefTab_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_TxnRefTab_numEle));-
-l_TransCtx_node parent
l_TxnRefTab_num_text := dbms_xmldom.createTextNode(l_domdoc,
'PER_ABSENCE_ATTENDANCES' );--column of cursor
l_TxnRefTab_num_tnode :=
dbms_xmldom.appendChild(l_TxnRefTab_num_node,dbms_xmldom.makeNode(l_TxnRefTab_num_t
ext));

l_TxnIdentifier_numEle:= dbms_xmldom.createElement(l_domdoc,
'TransactionIdentifier' ); --l_domdoc constant
l_TxnIdentifier_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_TxnIdentifier_numEle
));--l_TransCtx_node parent
l_TxnIdentifier_num_text := dbms_xmldom.createTextNode(l_domdoc,
'ABSENCES');--column of cursor
l_TxnIdentifier_num_tnode :=
dbms_xmldom.appendChild(l_TxnIdentifier_num_node,dbms_xmldom.makeNode(l_TxnIdentifi
er_num_text));

l_pCalledFrom_numEle:= dbms_xmldom.createElement(l_domdoc, 'pCalledFrom' ); --

l_LoginPrsnBgId_numEle:= dbms_xmldom.createElement(l_domdoc,
'LoginPrsnBgId' ); --l_domdoc constant
l_LoginPrsnBgId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_LoginPrsnBgId_numEle
));--l_TransCtx_node parent
l_LoginPrsnBgId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PRSNBGID);--column of cursor
l_LoginPrsnBgId_num_tnode :=
dbms_xmldom.appendChild(l_LoginPrsnBgId_num_node,dbms_xmldom.makeNode(l_LoginPrsnBg
Id_num_text));

l_PerzFunctionName_numEle:= dbms_xmldom.createElement(l_domdoc,
'PerzFunctionName' ); --l_domdoc constant
l_PerzFunctionName_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PerzFunctionName_num
Ele));--l_TransCtx_node parent
l_PerzFunctionName_num_text := dbms_xmldom.createTextNode(l_domdoc,
'HR_LOA_SS' );--column of cursor
l_PerzFunctionName_num_tnode :=
dbms_xmldom.appendChild(l_PerzFunctionName_num_node,dbms_xmldom.makeNode(l_PerzFunc
tionName_num_text));

l_ProcessName_numEle:= dbms_xmldom.createElement(l_domdoc, 'ProcessName' );

--l_domdoc constant
l_ProcessName_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_ProcessName_numEle))
;--l_TransCtx_node parent
l_ProcessName_num_text := dbms_xmldom.createTextNode(l_domdoc,
'HR_GENERIC_APPROVAL_PRC' );--column of cursor
l_ProcessName_num_tnode :=
dbms_xmldom.appendChild(l_ProcessName_num_node,dbms_xmldom.makeNode(l_ProcessName_n
um_text));

l_PrsnPayrollId_numEle:= dbms_xmldom.createElement(l_domdoc,
'PrsnPayrollId' ); --l_domdoc constant
l_PrsnPayrollId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_PrsnPayrollId_numEle
));--l_TransCtx_node parent
l_PrsnPayrollId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PrsnPayrollId );--column of cursor
l_PrsnPayrollId_num_tnode :=
dbms_xmldom.appendChild(l_PrsnPayrollId_num_node,dbms_xmldom.makeNode(l_PrsnPayroll
Id_num_text));

l_PrsnName_numEle:= dbms_xmldom.createElement(l_domdoc, 'PrsnName' ); --

l_pAMEAppId_numEle:= dbms_xmldom.createElement(l_domdoc, 'pAMEAppId' ); --

l_domdoc constant
l_pAMEAppId_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_pAMEAppId_numEle));-
-l_TransCtx_node parent
l_pAMEAppId_num_text := dbms_xmldom.createTextNode(l_domdoc, '800' );--column
of cursor
l_pAMEAppId_num_tnode :=
dbms_xmldom.appendChild(l_pAMEAppId_num_node,dbms_xmldom.makeNode(l_pAMEAppId_num_t
ext));

l_SS_RevFLMode_numEle:= dbms_xmldom.createElement(l_domdoc,
'SSHR_REVIEW_FLOW_MODE' ); --l_domdoc constant
l_SS_RevFLMode_num_node :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_SS_RevFLMode_numEle)
);--l_TransCtx_node parent
l_SS_RevFLMode_num_text := dbms_xmldom.createTextNode(l_domdoc,
'WF_REVIEW_PAGE' );--column of cursor
l_SS_RevFLMode_num_tnode :=
dbms_xmldom.appendChild(l_SS_RevFLMode_num_node,dbms_xmldom.makeNode(l_SS_RevFLMode
_num_text));

l_cnode_element2 := dbms_xmldom.createElement(l_domdoc, 'CNode' );--

dbms_xmldom.createProcessingInstruction(l_domdoc, 'CNode','Test="1"' );
dbms_xmldom.setAttribute(l_cnode_element2,'name', 'AbsenceParams');
dbms_xmldom.setAttribute(l_cnode_element2,'type', 'Ht');
l_cnode_node2 :=
dbms_xmldom.appendChild(l_TransCtx_node,dbms_xmldom.makeNode(l_cnode_element2));

l_AbsenceAttdId_numEle := dbms_xmldom.createElement(l_domdoc, 'AbsenceAttdId' );

--l_domdoc constant
l_AbsenceAttdId_num_node :=
dbms_xmldom.appendChild(l_cnode_node2,dbms_xmldom.makeNode(l_AbsenceAttdId_numEle))
;--l_TransCtx_node parent
l_AbsenceAttdId_num_text := dbms_xmldom.createTextNode(l_domdoc,
p_AbsenceAttdId );--column of cursor
l_AbsenceAttdId_num_tnode :=
dbms_xmldom.appendChild(l_AbsenceAttdId_num_node,dbms_xmldom.makeNode(l_AbsenceAttd
Id_num_text));

l_AbsenceAction_numEle := dbms_xmldom.createElement(l_domdoc, 'AbsenceAction' );

--l_domdoc constant
l_AbsenceAction_num_node :=
dbms_xmldom.appendChild(l_cnode_node2,dbms_xmldom.makeNode(l_AbsenceAction_numEle))
;--l_TransCtx_node parent
l_AbsenceAction_num_text := dbms_xmldom.createTextNode(l_domdoc,
p_AbsenceAction );--column of cursor
l_AbsenceAction_num_tnode :=
dbms_xmldom.appendChild(l_AbsenceAction_num_node,dbms_xmldom.makeNode(l_AbsenceActi
on_num_text));

l_AbsAttId_numEle := dbms_xmldom.createElement(l_domdoc,
'AbsenceAttendanceId' ); --l_domdoc constant
l_AbsAttId_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_AbsAttId_nu
mEle));--l_TransCtx_node parent
l_AbsAttId_num_text := dbms_xmldom.createTextNode(l_domdoc,
p_AbsenceAttdId );--column of cursor
l_AbsAttId_num_tnode :=
dbms_xmldom.appendChild(l_AbsAttId_num_node,dbms_xmldom.makeNode(l_AbsAttId_num_tex
t));

if p_AbsAttendanceReasonId is not null then

l_AbsAttendReaId_numEle := dbms_xmldom.createElement(l_domdoc,
'AbsAttendanceReasonId' ); --l_domdoc constant
l_AbsAttendReaId_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_AbsAttendRe
aId_numEle));--l_TransCtx_node parent
l_AbsAttendReaId_num_text := dbms_xmldom.createTextNode(l_domdoc,
p_AbsAttendanceReasonId );--column of cursor
l_AbsAttendReaId_num_tnode :=
dbms_xmldom.appendChild(l_AbsAttendReaId_num_node,dbms_xmldom.makeNode(l_AbsAttendR
eaId_num_text));
end if;

l_BusinessGroupId_numEle := dbms_xmldom.createElement(l_domdoc,
'BusinessGroupId' ); --l_domdoc constant
l_BusinessGroupId_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_BusinessGro
upId_numEle));--l_TransCtx_node parent
l_BusinessGroupId_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.PRSNBGID );--column of cursor
l_BusinessGroupId_num_tnode :=
dbms_xmldom.appendChild(l_BusinessGroupId_num_node,dbms_xmldom.makeNode(l_BusinessG
roupId_num_text));

l_AbsAttTypeId_numEle := dbms_xmldom.createElement(l_domdoc,
'AbsenceAttendanceTypeId' ); --l_domdoc constant
l_AbsAttTypeId_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_AbsAttTypeI
d_numEle));--l_TransCtx_node parent
l_AbsAttTypeId_num_text := dbms_xmldom.createTextNode(l_domdoc,
p_AbsenceAttendanceTypeId);--column of cursor
l_AbsAttTypeId_num_tnode :=
dbms_xmldom.appendChild(l_AbsAttTypeId_num_node,dbms_xmldom.makeNode(l_AbsAttTypeId
_num_text));

l_PersonId_numEle := dbms_xmldom.createElement(l_domdoc, 'PersonId' ); --

l_domdoc constant
l_PersonId_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_PersonId_nu
mEle));--l_TransCtx_node parent
l_PersonId_num_text := dbms_xmldom.createTextNode(l_domdoc, p_PrsnId );--
column of cursor
l_PersonId_num_tnode :=
dbms_xmldom.appendChild(l_PersonId_num_node,dbms_xmldom.makeNode(l_PersonId_num_tex
t));

l_AbsenceDays_numEle := dbms_xmldom.createElement(l_domdoc, 'AbsenceDays' ); --

l_domdoc constant
l_AbsenceDays_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_AbsenceDays
_numEle));--l_TransCtx_node parent
l_AbsenceDays_num_text := dbms_xmldom.createTextNode(l_domdoc,
p_AbsenceDays );--column of cursor
l_AbsenceDays_num_tnode :=
dbms_xmldom.appendChild(l_AbsenceDays_num_node,dbms_xmldom.makeNode(l_AbsenceDays_n
um_text));

l_AbsenceHours_numEle := dbms_xmldom.createElement(l_domdoc, 'AbsenceHours' );

--l_domdoc constant
dbms_xmldom.setAttribute(l_AbsenceHours_numEle,'null', 'true');
l_AbsenceHours_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_AbsenceHour
s_numEle));--l_TransCtx_node parent
--l_AbsenceHours_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.segment1 );--column of cursor
--l_AbsenceHours_num_tnode :=
dbms_xmldom.appendChild(l_AbsenceHours_num_node,dbms_xmldom.makeNode(l_AbsenceHours
_num_text));

l_DateEnd_numEle := dbms_xmldom.createElement(l_domdoc, 'DateEnd' ); --

l_domdoc constant
l_DateEnd_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_DateEnd_num
Ele));--l_TransCtx_node parent
l_DateEnd_num_text := dbms_xmldom.createTextNode(l_domdoc, p_DateEnd );--
column of cursor
l_DateEnd_num_tnode :=
dbms_xmldom.appendChild(l_DateEnd_num_node,dbms_xmldom.makeNode(l_DateEnd_num_text)
);

l_DateNoti_numEle := dbms_xmldom.createElement(l_domdoc, 'DateNotification' );

--l_domdoc constant
l_DateNoti_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_DateNoti_nu
mEle));--l_TransCtx_node parent
l_DateNoti_num_text := dbms_xmldom.createTextNode(l_domdoc,
TO_CHAR(SYSDATE,'YYYY-MM-DD HH:MI:SS') );--column of cursor
l_DateNoti_num_tnode :=
dbms_xmldom.appendChild(l_DateNoti_num_node,dbms_xmldom.makeNode(l_DateNoti_num_tex
t));

l_DatePrjStrt_numEle := dbms_xmldom.createElement(l_domdoc,
'DateProjectedStart' ); --l_domdoc constant
dbms_xmldom.setAttribute(l_DatePrjStrt_numEle,'null', 'true');
l_DatePrjStrt_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_DatePrjStrt
_numEle));--l_TransCtx_node parent
--l_DatePrjStrt_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.segment1 );--column of cursor
--l_DatePrjStrt_num_tnode :=
dbms_xmldom.appendChild(l_DatePrjStrt_num_node,dbms_xmldom.makeNode(l_DatePrjStrt_n
um_text));

l_DateStart_numEle := dbms_xmldom.createElement(l_domdoc, 'DateStart' ); --

l_domdoc constant
l_DateStart_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_DateStart_n
umEle));--l_TransCtx_node parent
l_DateStart_num_text := dbms_xmldom.createTextNode(l_domdoc, p_DateStart );--
column of cursor
l_DateStart_num_tnode :=
dbms_xmldom.appendChild(l_DateStart_num_node,dbms_xmldom.makeNode(l_DateStart_num_t
ext));

l_TimeProjEndnumEle := dbms_xmldom.createElement(l_domdoc, 'TimeProjectedEnd' );

--l_domdoc constant
dbms_xmldom.setAttribute(l_TimeProjEndnumEle,'null', 'true');
l_TimeProjEndnum_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_TimeProjEnd
numEle));--l_TransCtx_node parent
--l_TimeProjEndnum_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.segment1 );--column of cursor
--l_TimeProjEndnum_tnode :=
dbms_xmldom.appendChild(l_TimeProjEndnum_node,dbms_xmldom.makeNode(l_TimeProjEndnum
_text));

l_TimeProjSt_numEle := dbms_xmldom.createElement(l_domdoc,
'TimeProjectedStart' ); --l_domdoc constant
dbms_xmldom.setAttribute(l_TimeProjSt_numEle,'null', 'true');
l_TimeProjSt_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_TimeProjSt_
numEle));--l_TransCtx_node parent
--l_TimeProjSt_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.segment1 );--column of cursor
--l_TimeProjSt_num_tnode :=
dbms_xmldom.appendChild(l_TimeProjSt_num_node,dbms_xmldom.makeNode(l_TimeProjSt_num
_text));

l_LastUpdateDate_numEle := dbms_xmldom.createElement(l_domdoc,
'LastUpdateDate' ); --l_domdoc constant
l_LastUpdateDate_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_LastUpdateD
ate_numEle));--l_TransCtx_node parent
l_LastUpdateDate_num_text := dbms_xmldom.createTextNode(l_domdoc,
TO_CHAR(SYSDATE,'YYYY-MM-DD HH:MI:SS') );--column of cursor
l_LastUpdateDate_num_tnode :=
dbms_xmldom.appendChild(l_LastUpdateDate_num_node,dbms_xmldom.makeNode(l_LastUpdate
Date_num_text));

l_LastUpdatedBy_numEle := dbms_xmldom.createElement(l_domdoc,
'LastUpdatedBy' ); --l_domdoc constant
l_LastUpdatedBy_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_LastUpdated
By_numEle));--l_TransCtx_node parent
l_LastUpdatedBy_num_text := dbms_xmldom.createTextNode(l_domdoc,
v_userId );--column of cursor
l_LastUpdatedBy_num_tnode :=
dbms_xmldom.appendChild(l_LastUpdatedBy_num_node,dbms_xmldom.makeNode(l_LastUpdated
By_num_text));
l_LastUpdateLogin_numEle := dbms_xmldom.createElement(l_domdoc,
'LastUpdateLogin' ); --l_domdoc constant
l_LastUpdateLogin_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_LastUpdateL
ogin_numEle));--l_TransCtx_node parent
l_LastUpdateLogin_num_text := dbms_xmldom.createTextNode(l_domdoc,
v_sessionid );--column of cursor
l_LastUpdateLogin_num_tnode :=
dbms_xmldom.appendChild(l_LastUpdateLogin_num_node,dbms_xmldom.makeNode(l_LastUpdat
eLogin_num_text));

l_CreatedBy_numEle := dbms_xmldom.createElement(l_domdoc, 'CreatedBy' ); --

l_domdoc constant
l_CreatedBy_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_CreatedBy_n
umEle));--l_TransCtx_node parent
l_CreatedBy_num_text := dbms_xmldom.createTextNode(l_domdoc, v_userId );--
column of cursor
l_CreatedBy_num_tnode :=
dbms_xmldom.appendChild(l_CreatedBy_num_node,dbms_xmldom.makeNode(l_CreatedBy_num_t
ext));

l_CreationDate_numEle := dbms_xmldom.createElement(l_domdoc,
'CreationDate' ); --l_domdoc constant
l_CreationDate_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_CreationDat
e_numEle));--l_TransCtx_node parent
l_CreationDate_num_text := dbms_xmldom.createTextNode(l_domdoc,
TO_CHAR(SYSDATE,'YYYY-MM-DD HH:MI:SS') );--column of cursor
l_CreationDate_num_tnode :=
dbms_xmldom.appendChild(l_CreationDate_num_node,dbms_xmldom.makeNode(l_CreationDate
_num_text));

l_OVN_numEle := dbms_xmldom.createElement(l_domdoc, 'ObjectVersionNumber' ); --

l_domdoc constant
dbms_xmldom.setAttribute(l_OVN_numEle,'null', 'true');
l_OVN_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_OVN_numEle)
);--l_TransCtx_node parent
--l_OVN_num_text := dbms_xmldom.createTextNode(l_domdoc,
sup_rec.segment1 );--column of cursor
--l_OVN_num_tnode :=
dbms_xmldom.appendChild(l_OVN_num_node,dbms_xmldom.makeNode(l_OVN_num_text));

l_Comments_numEle := dbms_xmldom.createElement(l_domdoc, 'Comments' ); --

l_domdoc constant
l_Comments_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_Comments_nu
mEle));--l_TransCtx_node parent
l_Comments_num_text := dbms_xmldom.createTextNode(l_domdoc, p_comments );--
column of cursor
l_Comments_num_tnode :=
dbms_xmldom.appendChild(l_Comments_num_node,dbms_xmldom.makeNode(l_Comments_num_tex
t));

l_LinkAbsIdAbsEO_numEle := dbms_xmldom.createElement(l_domdoc,
'LinkedAbsenceIdPerAbsenceAttendancesEO' ); --l_domdoc constant
l_LinkAbsIdAbsEO_num_node :=
dbms_xmldom.appendChild(l_PerAbsAttendEORow_node,dbms_xmldom.makeNode(l_LinkAbsIdAb
sEO_numEle));--l_TransCtx_node parent

END LOOP;

l_xmltype := dbms_xmldom.getXmlType(l_domdoc);
dbms_xmldom.freeDocument(l_domdoc);

--dbms_output.put_line(l_xmltype.getClobVal);
--insert into xml_document values(1,l_xmltype.getClobVal);
commit;

p_msg := 'S';
p_xml := l_xmltype.getClobVal;

exception when others then

p_msg := 'E';

END;

--select 1 from dual

-----------------------------------------------------------------------------------
-----------------------------------------------------------------------------------
--------------
2.2 xml for managers.
change the KFF as per your setup.

CREATE OR REPLACE PROCEDURE APPS.P_XML_TRANSACTION_DOCUMENT_MGR

v_TransactionRefId number := p_AbsenceAttdId;

v_userId number := p_userid;
v_sessionid number := fnd_global.session_id;

l_xmltype XMLTYPE;
l_domdoc dbms_xmldom.DOMDocument;
l_root_node dbms_xmldom.DOMNode;

l_supp_numEle dbms_xmldom.DOMElement;
l_supp_name_element dbms_xmldom.DOMElement;

l_cnode_element2 dbms_xmldom.DOMElement;--
dbms_xmldom.DOMProcessingInstruction;--
l_cnode_node2 dbms_xmldom.DOMNode;