[Home] [Help]
824: ------------------------------------------------------------
825: l_debug_info := 'clear the header/line level return/audit reason/instructions in AERH/AERL';
826: ------------------------------------------------------------
827: AP_WEB_DB_EXPRPT_PKG.clearAuditReturnReasonInstr(p_report_header_id);
828: AP_WEB_DB_EXPLINE_PKG.clearAuditReturnReasonInstr(p_report_header_id);
829:
830: ----------------------------------------------------------
831: l_debug_info := 'clear Item Attribute AUDIT_RETURN_REASON';
832: ---------------------------------------------------------
995:
996: l_table_row VARCHAR2(2000);
997: l_line_num NUMBER := 0;
998:
999: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1000: V_DistLineNumber AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1001: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1002: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1003: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
996: l_table_row VARCHAR2(2000);
997: l_line_num NUMBER := 0;
998:
999: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1000: V_DistLineNumber AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1001: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1002: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1003: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1004: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
998:
999: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1000: V_DistLineNumber AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1001: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1002: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1003: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1004: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1005: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1006: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
999: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1000: V_DistLineNumber AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1001: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1002: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1003: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1004: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1005: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1006: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1007: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1001: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1002: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1003: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1004: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1005: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1006: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1007: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1008: -- Grants Integration
1009: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1002: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1003: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1004: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1005: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1006: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1007: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1008: -- Grants Integration
1009: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1010: V_AwardSetID NUMBER := NULL;
1003: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1004: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1005: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1006: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1007: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1008: -- Grants Integration
1009: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1010: V_AwardSetID NUMBER := NULL;
1011: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1007: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1008: -- Grants Integration
1009: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1010: V_AwardSetID NUMBER := NULL;
1011: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1012: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1013: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1014: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1015: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1008: -- Grants Integration
1009: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1010: V_AwardSetID NUMBER := NULL;
1011: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1012: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1013: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1014: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1015: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1016: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1009: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1010: V_AwardSetID NUMBER := NULL;
1011: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1012: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1013: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1014: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1015: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1016: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1017: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1010: V_AwardSetID NUMBER := NULL;
1011: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1012: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1013: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1014: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1015: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1016: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1017: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1018: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1011: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1012: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1013: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1014: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1015: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1016: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1017: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1018: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1019: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1012: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1013: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1014: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1015: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1016: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1017: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1018: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1019: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1020: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1013: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1014: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1015: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1016: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1017: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1018: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1019: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1020: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1021: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1015: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1016: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1017: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1018: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1019: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1020: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1021: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1022: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1016: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1017: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1018: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1019: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1020: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1021: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1022: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1017: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1018: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1019: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1020: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1021: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1022: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1018: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1019: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1020: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1021: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1022: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1019: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1020: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1021: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1022: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1020: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1021: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1022: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1021: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1022: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1022: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1023: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1024: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1025: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1026: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1034: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1027: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1034: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1035: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1028: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1034: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1035: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1036: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1029: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1034: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1035: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1036: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1037: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1030: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1034: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1035: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1036: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1037: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1038:
1031: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1034: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1035: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1036: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1037: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1038:
1039:
1032: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1034: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1035: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1036: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1037: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1038:
1039:
1040: l_debug_info VARCHAR2(200);
1033: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1034: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1035: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1036: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1037: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1038:
1039:
1040: l_debug_info VARCHAR2(200);
1041:
1041:
1042: BEGIN
1043:
1044: ------------------------------------------------------------------------
1045: l_debug_info := 'calling AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor';
1046: ------------------------------------------------------------------------
1047: IF (AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor(l_report_header_id,
1048: ExpenseReportLinesCursor)) THEN
1049:
1043:
1044: ------------------------------------------------------------------------
1045: l_debug_info := 'calling AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor';
1046: ------------------------------------------------------------------------
1047: IF (AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor(l_report_header_id,
1048: ExpenseReportLinesCursor)) THEN
1049:
1050: LOOP
1051: FETCH ExpenseReportLinesCursor INTO
1459:
1460: ----------------------------------------------------------------
1461: l_debug_info := 'Reset AP Validation errors';
1462: -----------------------------------------------------------------
1463: AP_WEB_DB_EXPLINE_PKG.ResetAPValidationErrors(l_report_header_id);
1464:
1465: ----------------------------------------------------------------
1466: l_debug_info := 'Unset Is Default Cost Center Used?';
1467: -----------------------------------------------------------------
1780: ----------------------------------------------------------------------
1781: PROCEDURE HandleInvalidDistCCID(p_report_header_id IN AP_EXPENSE_REPORT_HEADERS.report_header_id%TYPE,
1782: p_report_distribution_id IN AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID,
1783: p_payment_due IN VARCHAR2,
1784: p_exp_type_parameter_id IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1785: p_personalParameterId IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1786: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1787: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1788: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1781: PROCEDURE HandleInvalidDistCCID(p_report_header_id IN AP_EXPENSE_REPORT_HEADERS.report_header_id%TYPE,
1782: p_report_distribution_id IN AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID,
1783: p_payment_due IN VARCHAR2,
1784: p_exp_type_parameter_id IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1785: p_personalParameterId IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1786: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1787: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1788: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1789: p_ReportLineId IN AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id,
1782: p_report_distribution_id IN AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID,
1783: p_payment_due IN VARCHAR2,
1784: p_exp_type_parameter_id IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1785: p_personalParameterId IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1786: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1787: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1788: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1789: p_ReportLineId IN AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id,
1790: p_exp_dist_ccid IN AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID,
1785: p_personalParameterId IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1786: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1787: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1788: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1789: p_ReportLineId IN AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id,
1790: p_exp_dist_ccid IN AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID,
1791: p_chart_of_accounts_id IN AP_WEB_DB_AP_INT_PKG.glsob_chartOfAccountsID) IS
1792: ----------------------------------------------------------------------
1793: l_debug_info VARCHAR2(1000);
1786: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1787: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1788: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1789: p_ReportLineId IN AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id,
1790: p_exp_dist_ccid IN AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID,
1791: p_chart_of_accounts_id IN AP_WEB_DB_AP_INT_PKG.glsob_chartOfAccountsID) IS
1792: ----------------------------------------------------------------------
1793: l_debug_info VARCHAR2(1000);
1794:
1861: l_ven_allow_awt_flag AP_WEB_DB_AP_INT_PKG.vendors_allowAWTFlag;
1862: l_ven_awt_group_id AP_WEB_DB_AP_INT_PKG.vendors_awtGroupID;
1863: l_default_emp_ccid AP_WEB_DB_HR_INT_PKG.empCurrent_defaultCodeCombID;
1864: l_default_emp_segments AP_OIE_KFF_SEGMENTS_T;
1865: l_exp_dist_ccid AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID;
1866: l_id_flex_structure_name fnd_id_flex_structures_vl.id_flex_structure_name%TYPE;
1867:
1868: l_employee_ccid AP_WEB_DB_EXPRPT_PKG.expHdr_employeeCCID;
1869: l_employee_id AP_WEB_DB_EXPRPT_PKG.expHdr_employeeID;
1877: l_payment_due VARCHAR2(10) := C_IndividualPay;
1878:
1879: l_debug_info VARCHAR2(1000);
1880:
1881: V_PADefaultDistCCID AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID;
1882: V_ConcatSegs VARCHAR2(2000);
1883: V_ConcatIDs VARCHAR2(2000);
1884: V_ConcatDescrs VARCHAR2(300);
1885: V_ErrMsg VARCHAR2(2000);--2048712
1921: V_HeaderAttribute13 AP_WEB_DB_EXPRPT_PKG.expHdr_attr13;
1922: V_HeaderAttribute14 AP_WEB_DB_EXPRPT_PKG.expHdr_attr14;
1923: V_HeaderAttribute15 AP_WEB_DB_EXPRPT_PKG.expHdr_attr15;
1924:
1925: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1926: l_dist_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1927: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1928: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1929: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1922: V_HeaderAttribute14 AP_WEB_DB_EXPRPT_PKG.expHdr_attr14;
1923: V_HeaderAttribute15 AP_WEB_DB_EXPRPT_PKG.expHdr_attr15;
1924:
1925: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1926: l_dist_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1927: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1928: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1929: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1930: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1924:
1925: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1926: l_dist_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1927: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1928: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1929: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1930: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1931: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1932: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1925: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1926: l_dist_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1927: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1928: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1929: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1930: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1931: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1932: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1933: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1927: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1928: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1929: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1930: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1931: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1932: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1933: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1934: -- Grants Integration
1935: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1928: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1929: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1930: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1931: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1932: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1933: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1934: -- Grants Integration
1935: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1936: V_AwardSetID NUMBER := NULL;
1929: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1930: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1931: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1932: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1933: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1934: -- Grants Integration
1935: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1936: V_AwardSetID NUMBER := NULL;
1937: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1933: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1934: -- Grants Integration
1935: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1936: V_AwardSetID NUMBER := NULL;
1937: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1938: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1939: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1940: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1941: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1934: -- Grants Integration
1935: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1936: V_AwardSetID NUMBER := NULL;
1937: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1938: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1939: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1940: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1941: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1942: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1935: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1936: V_AwardSetID NUMBER := NULL;
1937: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1938: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1939: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1940: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1941: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1942: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1943: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1936: V_AwardSetID NUMBER := NULL;
1937: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1938: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1939: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1940: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1941: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1942: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1943: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1944: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1937: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1938: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1939: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1940: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1941: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1942: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1943: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1944: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1945: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1938: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1939: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1940: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1941: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1942: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1943: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1944: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1945: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1946: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1939: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1940: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1941: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1942: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1943: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1944: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1945: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1946: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1947: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1941: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1942: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1943: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1944: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1945: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1946: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1947: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1948: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1942: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1943: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1944: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1945: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1946: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1947: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1948: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1943: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1944: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1945: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1946: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1947: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1948: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1944: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1945: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1946: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1947: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1948: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1945: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1946: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1947: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1948: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1946: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1947: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1948: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1947: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1948: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1948: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1949: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1950: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1951: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1952: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1953: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1961: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1954: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1961: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1962: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1955: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1961: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1962: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1963: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1956: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1961: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1962: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1963: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1964: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1957: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1961: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1962: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1963: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1964: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1965:
1958: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1961: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1962: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1963: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1964: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1965:
1966: l_concatenated_segments varchar2(2000);
1959: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1961: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1962: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1963: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1964: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1965:
1966: l_concatenated_segments varchar2(2000);
1967:
1960: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1961: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1962: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1963: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1964: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1965:
1966: l_concatenated_segments varchar2(2000);
1967:
1968: l_header_error_message VARCHAR2(2000);
1980: l_cash_line_num NUMBER := 0;
1981: l_ccard_line_num NUMBER := 0;
1982: l_yes VARCHAR2(80);
1983: l_no VARCHAR2(80);
1984: l_rounding_error_ccid AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID;
1985: l_card_program_id NUMBER := 0;
1986:
1987: l_existing_segments AP_OIE_KFF_SEGMENTS_T;
1988: l_new_segments AP_OIE_KFF_SEGMENTS_T;
2098: l_debug_info := 'end preparation for Project Account Generation';
2099: ------------------------------------------------------------
2100:
2101: ------------------------------------------------------------------------
2102: l_debug_info := 'calling AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor';
2103: ------------------------------------------------------------------------
2104: IF (AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor(p_report_header_id,
2105: ExpenseReportLinesCursor)) THEN
2106:
2100:
2101: ------------------------------------------------------------------------
2102: l_debug_info := 'calling AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor';
2103: ------------------------------------------------------------------------
2104: IF (AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor(p_report_header_id,
2105: ExpenseReportLinesCursor)) THEN
2106:
2107: ---------------------------------------------------------
2108: l_debug_info := 'Retrieve Payment Due From System Option';
2477: l_debug_info := 'check to see if line error occurred';
2478: ------------------------------------------------------------------------
2479: if (l_add_to_line_error) then
2480:
2481: AP_WEB_DB_EXPLINE_PKG.UpdateAPValidationError(
2482: p_report_header_id => p_report_header_id,
2483: p_dist_line_number => l_dist_line_number,
2484: p_ap_validation_error => l_line_error_message);
2485:
2620: ---------------------------------------------------
2621: l_debug_info := 'Update ap_expense_report_lines';
2622: ---------------------------------------------------
2623: -- 7/24: insertion of receipt_required_flag is moved to the submit package.
2624: IF (NOT AP_WEB_DB_EXPLINE_PKG.SetAWTGroupIDAndJustif(p_report_header_id,
2625: l_sys_allow_awt_flag,
2626: l_ven_allow_awt_flag,
2627: l_ven_awt_group_id)) THEN
2628: NULL;
2740: ----------------------------------------------------------------
2741: l_debug_info := 'Get the receipts missing flag';
2742: ----------------------------------------------------------------
2743: --chiho:1369557:
2744: IF ( AP_WEB_DB_EXPLINE_PKG.GetReceiptsMissingFlag(
2745: l_report_header_id,
2746: l_receipts_missing_flag) ) THEN
2747:
2748: IF ( l_receipts_missing_flag = 'Y' ) THEN
2754: * notification while the report was created from another report is due to
2755: * missing receipts.
2756: */
2757:
2758: IF AP_WEB_DB_EXPLINE_PKG.GetShortpaidFlag(l_report_header_id, l_shortpaid_flag) THEN
2759: IF (l_shortpaid_flag = 'Y' ) THEN
2760: fnd_message.set_name('SQLAP', 'OIE_WF_APPROVAL_POLICY_NOTE');
2761: l_warning_msg := FND_MESSAGE.Get;
2762:
2784:
2785: END IF;
2786: END IF;
2787:
2788: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
2789: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RULES_VIOLATE');
2790: l_warning_msg := FND_MESSAGE.Get;
2791:
2792: WF_ENGINE.SetItemAttrText(
2872: p_actid IN NUMBER,
2873: p_funmode IN VARCHAR2,
2874: p_result OUT NOCOPY VARCHAR2) IS
2875: ----------------------------------------------------------------------
2876: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
2877: l_sum_limit NUMBER;
2878: l_sum_violations NUMBER;
2879: l_sum_missing_receipts NUMBER;
2880: l_currency VARCHAR2(50);
2911:
2912: -------------------------------------------------------------------------
2913: l_debug_info := 'Calculate Total Receipt Missing Amt for Expense Report';
2914: -------------------------------------------------------------------------
2915: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetReceiptMissingTotal(l_report_header_id,
2916: l_sum_missing_receipts)) THEN
2917: l_sum_missing_receipts := 0;
2918: END IF;
2919:
2919:
2920: -------------------------------------------------------------------------
2921: l_debug_info := 'Calculate Total Receipt Violations excluding missing receipt total for Expense Report';
2922: -------------------------------------------------------------------------
2923: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetReceiptViolationsTotal(l_report_header_id,
2924: l_sum_violations)) THEN
2925: l_sum_violations := 0;
2926: END IF;
2927:
2982: p_funmode IN VARCHAR2,
2983: p_result OUT NOCOPY VARCHAR2) IS
2984: ----------------------------------------------------------------------
2985: l_include_missing_receipts VARCHAR2(1);
2986: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
2987: l_num_req_receipts NUMBER;
2988: l_debug_info VARCHAR2(200);
2989: BEGIN
2990:
3003:
3004: ------------------------------------------------------------------
3005: l_debug_info := 'Calculate Number of Lines with Receipt Required';
3006: ------------------------------------------------------------------
3007: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumReceiptRequiredLines(
3008: l_report_header_id, l_num_req_receipts)) THEN
3009: l_num_req_receipts := 0;
3010: END IF;
3011:
3037: p_actid IN NUMBER,
3038: p_funmode IN VARCHAR2,
3039: p_result OUT NOCOPY VARCHAR2) IS
3040: ----------------------------------------------------------------------
3041: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3042: l_num_req_receipt NUMBER;
3043: l_violation VARCHAR2(1);
3044: l_debug_info VARCHAR2(200);
3045: l_mess Wf_Item_Attribute_Values.TEXT_VALUE%TYPE;
3059:
3060: ------------------------------------------------------------------------
3061: l_debug_info := 'Calculate Number of Lines With Justification Required';
3062: ------------------------------------------------------------------------
3063: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumJustReqdLines(l_report_header_id,
3064: l_num_req_receipt)) THEN
3065: l_num_req_receipt := 0;
3066: END IF;
3067:
3071: IF (l_num_req_receipt > 0 ) THEN
3072: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_REQUIRED_MSG');
3073: END IF;
3074:
3075: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
3076: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_MSG');
3077: END IF;
3078:
3079: IF (l_num_req_receipt > 0 ) AND (l_violation = 'Y' ) THEN
3407: p_actid IN NUMBER,
3408: p_funmode IN VARCHAR2,
3409: p_result OUT NOCOPY VARCHAR2) IS
3410: ----------------------------------------------------------------------
3411: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3412: l_orig_expe_report_amt NUMBER;
3413: l_exp_report_amount AP_WEB_DB_EXPRPT_PKG.expHdr_total;
3414: l_orig_exp_report_amt NUMBER;
3415: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
3412: l_orig_expe_report_amt NUMBER;
3413: l_exp_report_amount AP_WEB_DB_EXPRPT_PKG.expHdr_total;
3414: l_orig_exp_report_amt NUMBER;
3415: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
3416: l_amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
3417: l_adjustment_reason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
3418:
3419: l_currency VARCHAR2(50);
3420: l_adjustment_line VARCHAR2(2000);
3413: l_exp_report_amount AP_WEB_DB_EXPRPT_PKG.expHdr_total;
3414: l_orig_exp_report_amt NUMBER;
3415: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
3416: l_amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
3417: l_adjustment_reason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
3418:
3419: l_currency VARCHAR2(50);
3420: l_adjustment_line VARCHAR2(2000);
3421: l_adj_info_body VARCHAR2(2000);
3430: C_CreditLineVersion CONSTANT NUMBER := 1;
3431: C_WF_Version NUMBER := 0;
3432:
3433: /* jrautiai ADJ Fix Start */
3434: AdjustmentsCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
3435: adjustment_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
3436:
3437: l_mess Wf_Item_Attribute_Values.TEXT_VALUE%TYPE;
3438: l_crd_card_count NUMBER := 0;
3431: C_WF_Version NUMBER := 0;
3432:
3433: /* jrautiai ADJ Fix Start */
3434: AdjustmentsCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
3435: adjustment_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
3436:
3437: l_mess Wf_Item_Attribute_Values.TEXT_VALUE%TYPE;
3438: l_crd_card_count NUMBER := 0;
3439:
3496: l_debug_info := 'Retrieve Payment Due From';
3497: ---------------------------------------------------------
3498: l_payment_due := WF_ENGINE.GetItemAttrText(p_item_type,p_item_key,'PAYMENT_DUE_FROM');
3499:
3500: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumCCLinesIncluded(l_report_header_id,
3501: l_crd_card_count)) THEN
3502: l_crd_card_count := 0;
3503: END IF;
3504:
3538: Adjustment was made, return Y and retrieve adjusted lines';
3539: --------------------------------------------------------------------------
3540: -- bug 3404699:round to reimbursment currency precision
3541: IF (AP_UTILITIES_PKG.Ap_Round_Currency(l_orig_exp_report_amt,l_reimb_currency) <>
3542: l_exp_report_amount OR AP_WEB_DB_EXPLINE_PKG.GetAdjustedLineExists(l_report_header_id)) THEN
3543: p_result := 'COMPLETE:Y';
3544:
3545: --------------------------------------------
3546: l_debug_info := 'Calculate Amt Due and Total';
3545: --------------------------------------------
3546: l_debug_info := 'Calculate Amt Due and Total';
3547: --------------------------------------------
3548: /* jrautiai ADJ Fix Start */
3549: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_report_header_id,
3550: l_payment_due,
3551: l_emp_amt,
3552: l_ccard_amt,
3553: l_total)) THEN
3573: ------------------------------------------
3574: l_debug_info := 'Open Adjustments Cursor';
3575: ------------------------------------------
3576: -- jrautiai ADJ Fix
3577: IF (AP_WEB_DB_EXPLINE_PKG.GetAdjustmentsCursor(l_report_header_id, 'ADJUSTMENT', AdjustmentsCursor)) THEN
3578: FOR i IN 1..10 LOOP
3579:
3580: ------------------------------------------
3581: l_debug_info := 'Fetch Adjustments Cursor';
3736: p_actid IN NUMBER,
3737: p_funmode IN VARCHAR2,
3738: p_result OUT NOCOPY VARCHAR2) IS
3739: ----------------------------------------------------------------------
3740: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3741: l_num_req_receipt_not_verified NUMBER;
3742: l_debug_info VARCHAR2(200);
3743: BEGIN
3744:
3756: ----------------------------------------------------------------------
3757: l_debug_info := 'Calculate Number of Lines With Receipt Required that
3758: have not been verified';
3759: ----------------------------------------------------------------------
3760: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumReceiptShortpaidLines(
3761: l_report_header_id,
3762: l_num_req_receipt_not_verified)) THEN
3763: l_num_req_receipt_not_verified := 0;
3764: END IF;
3793: p_actid IN NUMBER,
3794: p_funmode IN VARCHAR2,
3795: p_result OUT NOCOPY VARCHAR2) IS
3796: ----------------------------------------------------------------------
3797: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3798: l_num_req_receipt_not_verified NUMBER;
3799: l_debug_info VARCHAR2(200);
3800: BEGIN
3801:
3814: ----------------------------------------------------------------------
3815: l_debug_info := 'Calculate Number of Lines With Receipt Required that
3816: have not been verified';
3817: ----------------------------------------------------------------------
3818: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumShortpaidLines(l_report_header_id,
3819: l_num_req_receipt_not_verified)) THEN
3820: l_num_req_receipt_not_verified := 0;
3821: END IF;
3822:
3947: p_funmode IN VARCHAR2,
3948: p_notification_type IN VARCHAR2,
3949: p_result OUT NOCOPY VARCHAR2) IS
3950: -------------------------------------------------------------------------
3951: l_exp_report_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3952: l_currency VARCHAR2(15);
3953: l_shortpay_line VARCHAR2(2000);
3954: l_shortpay_info_body VARCHAR2(2000) := '';
3955: l_num_lines NUMBER := 0;
3960: C_CreditLineVersion CONSTANT NUMBER := 1;
3961: C_WF_Version NUMBER := 0;
3962:
3963: -- jrautiai ADJ Fix, changed shortpay to refer the new cursor type.
3964: ShortpaidLinesCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
3965:
3966: -- jrautiai ADJ Fix, fetching the shortpay results into a record of a common type.
3967: shortpay_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
3968:
3963: -- jrautiai ADJ Fix, changed shortpay to refer the new cursor type.
3964: ShortpaidLinesCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
3965:
3966: -- jrautiai ADJ Fix, fetching the shortpay results into a record of a common type.
3967: shortpay_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
3968:
3969:
3970: BEGIN
3971:
4013: ------------------------------------------
4014: l_debug_info := 'Open ShortPaidLines Cursor';
4015: ------------------------------------------
4016: -- jrautiai ADJ Fix, using common cursor with adjustments.
4017: IF (AP_WEB_DB_EXPLINE_PKG.GetAdjustmentsCursor(l_exp_report_id, 'SHORTPAY', ShortpaidLinesCursor)) THEN
4018:
4019: FOR i IN 1..10 LOOP
4020:
4021: ------------------------------------------
4297: l_debug_info := 'Insert the lines that cannot be paid into
4298: ap_expense_report_lines with new report_header_id';
4299: --------------------------------------------------------------------
4300:
4301: IF (AP_WEB_DB_EXPLINE_PKG.AddPolicyShortPaidExpLines(p_new_expense_report_id, p_orig_expense_report_id)) THEN
4302: NULL;
4303: END IF;
4304:
4305: --------------------------------------------------------------------
4324: l_debug_info := 'Insert the lines that cannot be paid into
4325: ap_expense_report_lines with new report_header_id for
4326: missing receipts shortpay';
4327: --------------------------------------------------------------------
4328: IF (AP_WEB_DB_EXPLINE_PKG.AddUnverifiedShortpaidLines(
4329: p_new_expense_report_id, p_orig_expense_report_id)) THEN
4330: NULL;
4331: END IF;
4332:
4443: /* jrautiai ADJ Fix Start */
4444: -----------------------------------------------------------------
4445: l_debug_info := 'Get number of lines not adhereing to policies.';
4446: ------------------------------------------------------------------
4447: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumShortpaidLines(l_report_header_id, l_shortpaid_count)) THEN
4448: l_shortpaid_count := 0;
4449: END IF;
4450:
4451: -----------------------------------------------------------------
4450:
4451: -----------------------------------------------------------------
4452: l_debug_info := 'Get number of lines with policy shortpay.';
4453: ------------------------------------------------------------------
4454: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumPolicyShortpaidLines(l_report_header_id, l_policy_count)) THEN
4455: l_policy_count := 0;
4456: END IF;
4457: /* A line can contain both scenarios, missing receipt and policy violation flag. In that case
4458: * the line is moved to the '-1' report created for the policy violation flag. The variable
4459: * l_shortpaid_count contains the number of lines with either missing receipts and / or with
4460: * policy violation flag. The variable l_policy_count contains lines with only the policy
4461: * violation flag. So the number of lines to be moved to the new missing receipt report
4462: * can be calculated with 'l_shortpaid_count - l_policy_count'. We are not using the function
4463: * AP_WEB_DB_EXPLINE_PKG.GetNumReceiptShortpaidLines
4464: * since that will return all the lines with missing receipts, including ones with also policy
4465: * shortpay flag set to Y, which will not be moved to the missing receipts report.
4466: */
4467: l_missing_receipt_count := l_shortpaid_count - l_policy_count;
4493: 'POLICY');
4494:
4495: /* jrautiai ADJ Fix Start
4496: * recalculate the shortpaid totals after it has been created*/
4497: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_policy_shortpay_id,
4498: l_payment_due,
4499: l_policy_emp_amt,
4500: l_policy_ccard_amt,
4501: l_policy_shortpay_total)) THEN
4561: 'NO_RECEIPTS');
4562:
4563: /* jrautiai ADJ Fix Start
4564: * recalculate the shortpaid totals after it has been created*/
4565: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_no_receipts_shortpay_id,
4566: l_payment_due,
4567: l_no_receipts_emp_amt,
4568: l_no_receipts_ccard_amt,
4569: l_no_receipts_shortpay_total)) THEN
4619: -----------------------------------------------------------------------
4620: l_debug_info := 'Count the lines remaining in the original expense
4621: report';
4622: -----------------------------------------------------------------------
4623: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumberOfExpLines(l_report_header_id,l_count) OR l_count = 0) THEN
4624: -----------------------------------------
4625: l_debug_info := 'Delete the original expense report if everything
4626: is getting shortpaid';
4627: ----------------------------------------------------------------------
4635: l_debug_info := 'Update the total of the original expense report
4636: to not include the amount of the new expense report';
4637: ----------------------------------------------------------------------
4638: /* jrautiai ADJ Fix Start */
4639: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_report_header_id,
4640: l_payment_due,
4641: l_amtDueEmp,
4642: l_amtDueCCardCompany,
4643: l_total)) THEN
4710:
4711: ---------------------------------------------------------------------------
4712: l_debug_info := 'Delete the expense lines for the given expense report id';
4713: ---------------------------------------------------------------------------
4714: IF (NOT AP_WEB_DB_EXPLINE_PKG.DeleteReportLines(p_report_header_id)) THEN
4715: NULL;
4716: END IF;
4717:
4718: ----------------------------------------------------
4989: | none |
4990: *----------------------------------------------------------------------------*/
4991:
4992: PROCEDURE ResetCCardTxns (
4993: p_report_header_id IN AP_WEB_DB_EXPLINE_PKG.expLines_headerID,
4994: p_item_type IN VARCHAR2,
4995: p_item_key IN VARCHAR2)
4996: IS
4997: l_payment_due VARCHAR2(50) := C_IndividualPay;
5005: 'PAYMENT_DUE_FROM');
5006:
5007: l_debug_info := 'Update for Credit Card Integration';
5008: IF (l_payment_due = C_CompanyPay) THEN
5009: IF (NOT AP_WEB_DB_EXPLINE_PKG.DeletePersonalLines(p_report_header_id))
5010: THEN
5011: NULL;
5012: END IF;
5013: END IF;
5037: ROLLBACK;
5038: APP_EXCEPTION.RAISE_EXCEPTION;
5039: END ResetCCardTxns;
5040:
5041: PROCEDURE AMEAbortRequestApprovals(p_rep_header_id IN AP_WEB_DB_EXPLINE_PKG.expLines_headerID)
5042: IS
5043: l_debug_info VARCHAR2(200);
5044: l_wf_active BOOLEAN := FALSE;
5045: l_wf_exist BOOLEAN := FALSE;
5239: end;
5240:
5241: IF FND_PROFILE.VALUE_SPECIFIC('OIE_ENABLE_ADVANCES',NULL,l_n_resp_id,200) = 'PAYABLES' THEN
5242:
5243: AP_WEB_DB_EXPLINE_PKG.resetApplyAdvances(l_report_header_id);
5244: END IF;
5245:
5246:
5247: /* Bug 4019412 */
5244: END IF;
5245:
5246:
5247: /* Bug 4019412 */
5248: AP_WEB_DB_EXPLINE_PKG.resetAPflags(l_report_header_id);
5249:
5250: ------------------------------------------------------------
5251: l_debug_info := 'Set which process to start from';
5252: ------------------------------------------------------------
5659: p_actid IN NUMBER,
5660: p_funmode IN VARCHAR2,
5661: p_result OUT NOCOPY VARCHAR2) IS
5662: ----------------------------------------------------------------------
5663: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
5664: l_debug_info VARCHAR2(200);
5665: BEGIN
5666:
5667: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'start StartFromManagerApproval');
5678:
5679: --------------------------------------------------------------
5680: l_debug_info := 'Update all expense lines as receipt missing';
5681: --------------------------------------------------------------
5682: IF (NOT AP_WEB_DB_EXPLINE_PKG.SetReceiptMissing(l_report_header_id,
5683: 'Y')) THEN
5684: NULL;
5685: END IF;
5686:
5916: ------------------------------------------------------------------
5917: l_debug_info := 'Insert the lines for the credit card company into
5918: ap_expense_report_lines with new report_header_id';
5919: ------------------------------------------------------------------
5920: IF (NOT AP_WEB_DB_EXPLINE_PKG.AddCCReportLines(l_report_header_id,
5921: l_new_report_id)) THEN
5922: NULL;
5923: END IF;
5924:
6041: WF_ENGINE.SetItemAttrNumber(p_item_type,
6042: p_item_key,
6043: 'VENDOR_SITE_ID',
6044: l_vendor_site_id);
6045: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumCCLinesIncluded(l_report_header_id,
6046: l_crd_card_count)) THEN
6047: l_crd_card_count := 0;
6048: END IF;
6049:
7322: l_preparer_display_name wf_users.display_name%type;
7323: l_employee_id NUMBER;
7324: l_employee_name wf_users.name%type;
7325: l_employee_display_name wf_users.display_name%type;
7326: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
7327: l_document_number VARCHAR2(50);
7328: l_total NUMBER;
7329: l_emp_cost_center VARCHAR2(240);
7330: l_doc_cost_center VARCHAR2(240);
7354:
7355: --------------------------------------------------------------
7356: l_debug_info := 'Update all expense lines as receipt missing';
7357: --------------------------------------------------------------
7358: IF (NOT AP_WEB_DB_EXPLINE_PKG.SetReceiptMissing(l_report_header_id,
7359: 'Y')) THEN
7360: NULL;
7361: END IF;
7362:
8923: p_funmode IN VARCHAR2,
8924: p_result OUT NOCOPY VARCHAR2) IS
8925: ---------------------------------------------------------
8926: l_require_proof_of_payment VARCHAR2(1);
8927: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
8928: l_debug_info VARCHAR2(200);
8929: BEGIN
8930:
8931: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'start RequireProofOfPayment');
8949: p_item_key,
8950: 'EXPENSE_REPORT_ID');
8951:
8952:
8953: IF (NOT AP_WEB_DB_EXPLINE_PKG.SetReceiptRequired(l_report_header_id, 'N')) THEN
8954: NULL;
8955: END IF;
8956:
8957: END IF;
9107: * jrautiai ADJ Fix Removed shortpay and adjustment specific logic form elsewhere, so instead here
9108: * we are dealing with both cases using common logic.
9109: */
9110: PROCEDURE BuildAdjustmentInfoLine(p_display_type IN VARCHAR2,
9111: adjustment_rec IN AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType,
9112: p_adjustment_type IN VARCHAR2,
9113: p_currency IN VARCHAR2,
9114: p_adjustment_line IN OUT NOCOPY VARCHAR2) IS
9115:
9308: l_document long;--namrata
9309: l_document_max NUMBER:=25000;--namrata
9310: l_debug_info VARCHAR2(1000);
9311: l_item_type VARCHAR2(30);
9312: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
9313: l_adjustment_line VARCHAR2(2000);
9314: l_adj_info_body VARCHAR2(2000);
9315: l_itemtype VARCHAR2(7);
9316: l_itemkey VARCHAR2(30);
9322: l_prompts AP_WEB_UTILITIES_PKG.prompts_table;
9323: l_title AK_REGIONS_VL.name%TYPE;
9324:
9325: -- Bug 3336259: CC SP and ADJ Fix, changed to refer the new cursor type.
9326: AdjustmentsCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
9327:
9328: -- Bug 3336259: CC SP and ADJ Fix, fetching the results into a record of a common type.
9329: adjustment_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
9330:
9325: -- Bug 3336259: CC SP and ADJ Fix, changed to refer the new cursor type.
9326: AdjustmentsCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
9327:
9328: -- Bug 3336259: CC SP and ADJ Fix, fetching the results into a record of a common type.
9329: adjustment_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
9330:
9331: l_colspan NUMBER :=0;
9332: l_total_adjustment NUMBER :=0;
9333: l_total_amount NUMBER :=0;
9503: /**
9504: Bug 3336259: CC SP and ADJ Fix Start - Removed shortpay and adjustment specific logic, instead we are using the same
9505: * logic for both in GetAdjustmentsCursor and BuildAdjustmentInfoLine.
9506: */
9507: IF (AP_WEB_DB_EXPLINE_PKG.GetAdjustmentsCursor(l_report_header_id, l_adj_code, AdjustmentsCursor)) THEN
9508: LOOP
9509: FETCH AdjustmentsCursor INTO adjustment_rec;
9510: EXIT WHEN AdjustmentsCursor%NOTFOUND;
9511: BuildAdjustmentInfoLine(display_type,
10386:
10387: l_payment_due := WF_ENGINE.GetItemAttrText(p_item_type,p_item_key,'PAYMENT_DUE_FROM');
10388:
10389: IF (l_payment_due = C_CompanyPay) THEN
10390: IF (NOT AP_WEB_DB_EXPLINE_PKG.DeletePersonalLines(l_report_header_id)) THEN
10391: NULL;
10392: END IF;
10393: END IF;
10394:
10420: end;
10421:
10422: IF FND_PROFILE.VALUE_SPECIFIC('OIE_ENABLE_ADVANCES',NULL,l_n_resp_id,200) = 'PAYABLES' THEN
10423:
10424: AP_WEB_DB_EXPLINE_PKG.resetApplyAdvances(l_report_header_id);
10425: END IF;
10426:
10427: /* Bug 4019412 */
10428: AP_WEB_DB_EXPLINE_PKG.resetAPflags(l_report_header_id);
10424: AP_WEB_DB_EXPLINE_PKG.resetApplyAdvances(l_report_header_id);
10425: END IF;
10426:
10427: /* Bug 4019412 */
10428: AP_WEB_DB_EXPLINE_PKG.resetAPflags(l_report_header_id);
10429: ------------------------------------------------------------
10430: l_debug_info := 'Set which process to start from';
10431: ------------------------------------------------------------
10432: -- Indicate which process to start from
11011: 'NonValidatedWebExpense')) THEN
11012: NULL;
11013: END IF;
11014:
11015: AP_WEB_DB_EXPLINE_PKG.resetAPflags(p_rep_header_id);
11016: -- 4001778/3654956
11017: --5060928: reset the Apply Advnaces only if OIE:Enable Advances = "Payables"
11018:
11019: begin
11032: end;
11033:
11034: IF FND_PROFILE.VALUE_SPECIFIC('OIE_ENABLE_ADVANCES',NULL,l_n_resp_id,200) = 'PAYABLES' THEN
11035:
11036: AP_WEB_DB_EXPLINE_PKG.resetApplyAdvances(p_rep_header_id);
11037: END IF;
11038:
11039: --AP_WEB_DB_VIOLATIONS_PKG.deleteViolationEntry(p_rep_header_id);
11040: AP_WEB_AUDIT_QUEUE_UTILS.remove_from_queue(p_rep_header_id);
11195: l_colon NUMBER;
11196: l_itemtype VARCHAR2(7);
11197: l_itemkey VARCHAR2(25);
11198:
11199: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
11200: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11201: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11202: l_days VARCHAR2(4);
11203: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11196: l_itemtype VARCHAR2(7);
11197: l_itemkey VARCHAR2(25);
11198:
11199: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
11200: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11201: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11202: l_days VARCHAR2(4);
11203: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11204: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11197: l_itemkey VARCHAR2(25);
11198:
11199: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
11200: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11201: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11202: l_days VARCHAR2(4);
11203: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11204: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11205: l_receipt_rate VARCHAR2(5);
11199: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
11200: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11201: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11202: l_days VARCHAR2(4);
11203: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11204: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11205: l_receipt_rate VARCHAR2(5);
11206: l_receipt_amt VARCHAR2(10);
11207: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11200: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11201: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11202: l_days VARCHAR2(4);
11203: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11204: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11205: l_receipt_rate VARCHAR2(5);
11206: l_receipt_amt VARCHAR2(10);
11207: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11208: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11203: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11204: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11205: l_receipt_rate VARCHAR2(5);
11206: l_receipt_amt VARCHAR2(10);
11207: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11208: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11209: l_cc_personal_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11210: l_justification AP_WEB_DB_EXPLINE_PKG.expLines_justification;
11211: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11204: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11205: l_receipt_rate VARCHAR2(5);
11206: l_receipt_amt VARCHAR2(10);
11207: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11208: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11209: l_cc_personal_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11210: l_justification AP_WEB_DB_EXPLINE_PKG.expLines_justification;
11211: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11212: l_project_number PA_PROJECTS.segment1%TYPE;
11205: l_receipt_rate VARCHAR2(5);
11206: l_receipt_amt VARCHAR2(10);
11207: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11208: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11209: l_cc_personal_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11210: l_justification AP_WEB_DB_EXPLINE_PKG.expLines_justification;
11211: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11212: l_project_number PA_PROJECTS.segment1%TYPE;
11213: l_task_number AP_WEB_DB_PA_INT_PKG.tasks_taskNum;
11206: l_receipt_amt VARCHAR2(10);
11207: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11208: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11209: l_cc_personal_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11210: l_justification AP_WEB_DB_EXPLINE_PKG.expLines_justification;
11211: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11212: l_project_number PA_PROJECTS.segment1%TYPE;
11213: l_task_number AP_WEB_DB_PA_INT_PKG.tasks_taskNum;
11214: l_award_number GMS_OIE_INT_PKG.gms_awardNum;
11211: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11212: l_project_number PA_PROJECTS.segment1%TYPE;
11213: l_task_number AP_WEB_DB_PA_INT_PKG.tasks_taskNum;
11214: l_award_number GMS_OIE_INT_PKG.gms_awardNum;
11215: l_credit_card_trx_id AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
11216: l_distribution_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
11217: l_line_number NUMBER := 0;
11218: l_primary_number NUMBER := 1;
11219: l_line_display VARCHAR2(5);
11212: l_project_number PA_PROJECTS.segment1%TYPE;
11213: l_task_number AP_WEB_DB_PA_INT_PKG.tasks_taskNum;
11214: l_award_number GMS_OIE_INT_PKG.gms_awardNum;
11215: l_credit_card_trx_id AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
11216: l_distribution_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
11217: l_line_number NUMBER := 0;
11218: l_primary_number NUMBER := 1;
11219: l_line_display VARCHAR2(5);
11220: l_counter NUMBER := 1;
11237: l_prompts AP_WEB_UTILITIES_PKG.prompts_table;
11238: l_title AK_REGIONS_VL.name%TYPE;
11239: l_debug_info VARCHAR2(1000);
11240:
11241: XpenseLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11242: PersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11243:
11244: --Bug 2944363
11245: BothPayPersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11238: l_title AK_REGIONS_VL.name%TYPE;
11239: l_debug_info VARCHAR2(1000);
11240:
11241: XpenseLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11242: PersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11243:
11244: --Bug 2944363
11245: BothPayPersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11246:
11241: XpenseLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11242: PersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11243:
11244: --Bug 2944363
11245: BothPayPersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
11246:
11247:
11248: l_n_org_id Number;
11249:
11249:
11250: l_show_message VARCHAR2(1) := 'N';
11251: l_message VARCHAR2(2000);
11252: l_rules_violated VARCHAR2(1) := 'N';
11253: l_last_dist_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum
11254: := -1;
11255:
11256: l_document long;
11257:
11270:
11271: l_num_both_personal_lines NUMBER := 0; --Bug 2944363
11272: l_payment VARCHAR2(10);--Bug 2944363
11273: l_cc_trxn_date VARCHAR2(50);--Bug 2944363
11274: l_cc_expensed_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;--Bug 2944363
11275: l_cc_curr_code VARCHAR2(20); --Bug 2944363
11276: l_cc_merchant_name AP_CREDIT_CARD_TRXNS_ALL.merchant_name1%TYPE;--Bug 2944363
11277: l_payment_due_from VARCHAR2(10) := 'INDIVIDUAL';
11278:
11442:
11443: --------------------------------------------
11444: l_debug_info := 'get Number of ExpLines';
11445: --------------------------------------------
11446: if (AP_WEB_DB_EXPLINE_PKG.GetNumberOfExpLines(l_report_header_id, l_num_lines)) then null; end if;
11447:
11448: if (l_num_lines = 0) then
11449:
11450: /*Bug 2944363: Dont raise SHORTPAID error if the expense report
11452: an ER in BOTHPAY having only personal CC trx will
11453: also not have any lines.
11454: */
11455: --AMMISHRA - Both Pay Personal Only Lines project.
11456: if (AP_WEB_DB_EXPLINE_PKG.GetNoOfBothPayPersonalLines(l_report_header_id,l_num_both_personal_lines)) then null; end if;
11457:
11458: ----------------------------------------------------------------
11459: l_debug_info := 'Retrieve Profile Option Payment Due From';
11460: ----------------------------------------------------------------
11484:
11485: --------------------------------------------
11486: l_debug_info := 'Open Expense Lines Cursor';
11487: --------------------------------------------
11488: IF (AP_WEB_DB_EXPLINE_PKG.GetDisplayXpenseLinesCursor(l_report_header_id, XpenseLinesCursor)) THEN
11489:
11490: LOOP
11491:
11492: --------------------------------------------
11558:
11559: --------------------------------------------
11560: l_debug_info := 'get Number of Cash/Credit Card lines';
11561: --------------------------------------------
11562: if (AP_WEB_DB_EXPLINE_PKG.GetNumCCLinesIncluded(l_report_header_id, l_num_cc_lines)) then null; end if;
11563: l_num_cash_lines := l_num_lines - l_num_cc_lines;
11564:
11565:
11566: --------------------------------------------
11565:
11566: --------------------------------------------
11567: l_debug_info := 'get Number of Cash/Credit Card lines';
11568: --------------------------------------------
11569: if (AP_WEB_DB_EXPLINE_PKG.GetNumCashLinesWOMerch(l_report_header_id, l_co_merchant_count)) then null; end if;
11570:
11571: --------------------------------------------
11572: l_debug_info := 'loop thru Cash/Credit Card lines';
11573: --------------------------------------------
11613:
11614: l_document := l_document || tr_start;
11615:
11616:
11617: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
11618: l_rules_violated := 'Y';
11619: END IF;
11620:
11621: /* If the profile option is set to APPROVER_ONLY
11672:
11673: --------------------------------------------
11674: l_debug_info := 'Open Expense Lines Cursor';
11675: --------------------------------------------
11676: IF (AP_WEB_DB_EXPLINE_PKG.GetDisplayXpenseLinesCursor(l_report_header_id, l_is_cc_table, XpenseLinesCursor)) THEN
11677:
11678: LOOP
11679:
11680: --------------------------------------------
11963:
11964: --------------------------------------------
11965: l_debug_info := 'get Number of Personal Credit Card lines';
11966: --------------------------------------------
11967: if (AP_WEB_DB_EXPLINE_PKG.GetNumberOfPersonalLines(l_report_header_id, l_num_personal_lines)) then null; end if;
11968:
11969: if (l_num_personal_lines > 0) then
11970:
11971: --------------------------------------------
11988:
11989: --------------------------------------------
11990: l_debug_info := 'Open Personal Lines Cursor';
11991: --------------------------------------------
11992: IF (AP_WEB_DB_EXPLINE_PKG.GetDisplayPersonalLinesCursor(l_report_header_id, PersonalLinesCursor)) THEN
11993:
11994: l_num_lines := 0;
11995: l_cc_personal_total_amt := 0;
11996: LOOP
12079: if (l_show_message = 'N' AND C_BothPay = l_payment) then
12080: --------------------------------------------
12081: l_debug_info := 'get Number of Personal Credit Card lines Both Pay';
12082: --------------------------------------------
12083: if (AP_WEB_DB_EXPLINE_PKG.GetNoOfBothPayPersonalLines(l_report_header_id, l_num_personal_lines)) then null; end if;
12084: if (l_num_personal_lines > 0) then
12085:
12086: --------------------------------------------
12087: l_debug_info := 'Generate Table Header';
12106: ------------------End Of Table Header------------------
12107: --------------------------------------------
12108: l_debug_info := 'Open BothPay Personal Lines Cursor';
12109: --------------------------------------------
12110: IF (AP_WEB_DB_EXPLINE_PKG.GetBothPayPersonalLinesCursor(l_report_header_id, BothPayPersonalLinesCursor)) THEN
12111:
12112: l_num_lines := 0;
12113: l_cc_personal_total_amt := 0;
12114: LOOP
12207: p_funmode IN VARCHAR2,
12208: p_result OUT NOCOPY VARCHAR2) IS
12209: -------------------------------------------------------------------------------
12210: l_debug_info VARCHAR2(200);
12211: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_HeaderID;
12212: l_modified_count NUMBER :=0;
12213: l_new_count NUMBER :=0;
12214: l_mess Wf_Item_Attribute_Values.TEXT_VALUE%TYPE;
12215:
12234: SELECT count(*)
12235: INTO l_modified_count
12236: FROM ap_expense_report_lines xl
12237: WHERE xl.report_header_id = l_report_header_id
12238: AND xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_Modified;
12239:
12240: /* If the system adjusted the mileage rate by adding new lines
12241: and changing the rate in the same report, the notes on the
12242: notification will only display the modified message. Only
12247: SELECT count(*)
12248: INTO l_new_count
12249: FROM ap_expense_report_lines xl
12250: WHERE xl.report_header_id = l_report_header_id
12251: AND (xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_New
12252: OR xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_Split);
12253:
12254: IF (l_new_count > 0 ) THEN
12255: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_MRATE_SPLIT_NOTE');
12248: INTO l_new_count
12249: FROM ap_expense_report_lines xl
12250: WHERE xl.report_header_id = l_report_header_id
12251: AND (xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_New
12252: OR xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_Split);
12253:
12254: IF (l_new_count > 0 ) THEN
12255: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_MRATE_SPLIT_NOTE');
12256: END IF;
12291: p_employee_id IN NUMBER,
12292: p_cumulative_mileage IN NUMBER,
12293: p_schedule_line_array OUT NOCOPY AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array) IS
12294: ---------------------------------------------------------
12295: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
12296: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
12297: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
12298: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12292: p_cumulative_mileage IN NUMBER,
12293: p_schedule_line_array OUT NOCOPY AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array) IS
12294: ---------------------------------------------------------
12295: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
12296: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
12297: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
12298: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12300: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
12293: p_schedule_line_array OUT NOCOPY AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array) IS
12294: ---------------------------------------------------------
12295: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
12296: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
12297: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
12298: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12300: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
12301: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
12294: ---------------------------------------------------------
12295: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
12296: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
12297: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
12298: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12300: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
12301: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
12302: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
12295: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
12296: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
12297: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
12298: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12300: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
12301: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
12302: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
12303: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
12296: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
12297: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
12298: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12300: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
12301: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
12302: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
12303: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
12304: l_policy_id AP_EXPENSE_REPORT_PARAMS.COMPANY_POLICY_ID%TYPE;
12297: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
12298: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12300: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
12301: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
12302: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
12303: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
12304: l_policy_id AP_EXPENSE_REPORT_PARAMS.COMPANY_POLICY_ID%TYPE;
12305: l_distance_uom AP_POL_HEADERS.DISTANCE_UOM%TYPE;
12298: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12300: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
12301: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
12302: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
12303: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
12304: l_policy_id AP_EXPENSE_REPORT_PARAMS.COMPANY_POLICY_ID%TYPE;
12305: l_distance_uom AP_POL_HEADERS.DISTANCE_UOM%TYPE;
12306: l_employee_role_flag AP_POL_HEADERS.EMPLOYEE_ROLE_FLAG%TYPE;
12299: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12300: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
12301: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
12302: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
12303: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
12304: l_policy_id AP_EXPENSE_REPORT_PARAMS.COMPANY_POLICY_ID%TYPE;
12305: l_distance_uom AP_POL_HEADERS.DISTANCE_UOM%TYPE;
12306: l_employee_role_flag AP_POL_HEADERS.EMPLOYEE_ROLE_FLAG%TYPE;
12307: l_distance_thresholds_flag AP_POL_HEADERS.DISTANCE_THRESHOLDS_FLAG%TYPE;
12531: -------------------------------------------------------------------------------
12532: FUNCTION getRate(
12533: p_sh_distance_uom IN AP_POL_HEADERS.distance_uom%TYPE,
12534: p_sh_currency_code IN AP_POL_HEADERS.currency_code%TYPE,
12535: p_mileage_line IN AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Rec,
12536: p_schedule_line IN AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Rec)
12537: RETURN NUMBER IS
12538: -------------------------------------------------------------------------------
12539: l_debug_info VARCHAR2(200);
12616:
12617:
12618: -------------------------------------------------------------------------------
12619: PROCEDURE copyMileageArray(
12620: p_from_array IN AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array,
12621: p_to_array OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array) IS
12622: -------------------------------------------------------------------------------
12623: l_debug_info VARCHAR2(200);
12624:
12617:
12618: -------------------------------------------------------------------------------
12619: PROCEDURE copyMileageArray(
12620: p_from_array IN AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array,
12621: p_to_array OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array) IS
12622: -------------------------------------------------------------------------------
12623: l_debug_info VARCHAR2(200);
12624:
12625: BEGIN
12656: p_daily_distance IN AP_EXPENSE_REPORT_LINES.DAILY_DISTANCE%TYPE,
12657: p_rate IN AP_EXPENSE_REPORT_LINES.avg_mileage_rate%TYPE,
12658: p_report_header_id IN AP_EXPENSE_REPORT_LINES.report_header_id%TYPE,
12659: p_from_index IN AP_EXPENSE_REPORT_LINES.distribution_line_number%TYPE,
12660: p_mileage_line_array IN OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array) IS
12661: -------------------------------------------------------------------------------
12662: l_debug_info VARCHAR2(200);
12663:
12664: BEGIN
12676: p_mileage_line_array(p_index).distance_unit_code := p_mileage_line_array(p_from_index).distance_unit_code;
12677: p_mileage_line_array(p_index).amount := p_rate * p_trip_dist;
12678: p_mileage_line_array(p_index).daily_amount := p_rate * p_trip_dist / p_mileage_line_array(p_from_index).number_of_days;
12679: p_mileage_line_array(p_index).copy_From := p_mileage_line_array(p_from_index).orig_dist_line_number;
12680: p_mileage_line_array(p_index).status := AP_WEB_DB_EXPLINE_PKG.C_New;
12681:
12682: EXCEPTION
12683: WHEN OTHERS THEN
12684: AP_WEB_DB_UTIL_PKG.RaiseException('addToMileageArray');
12689: PROCEDURE updateNewDistNumber(
12690: p_index IN NUMBER,
12691: p_last_index IN NUMBER,
12692: p_added_total IN NUMBER,
12693: p_mileage_line_array IN OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array)IS
12694: -------------------------------------------------------------------------------
12695: l_debug_info VARCHAR2(200);
12696: i NUMBER;
12697: BEGIN
12725: p_sh_currency_code IN AP_POL_HEADERS.CURRENCY_CODE%TYPE,
12726: p_schedule_line_array IN AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array,
12727: p_mileage_line_array_count IN OUT NOCOPY NUMBER,
12728: p_cumulative_mileage IN OUT NOCOPY AP_WEB_EMPLOYEE_INFO.NUMERIC_VALUE%TYPE,
12729: p_mileage_line_array IN OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array)IS
12730: --------------------------------------------------------------------------------
12731: l_cumulative_mileage NUMBER := p_cumulative_mileage;
12732: l_ml_trip_distance NUMBER := p_mileage_line_array(p_ml_index).trip_distance;
12733: l_over_amount NUMBER;
12849: p_mileage_line_array(p_ml_index).daily_amount :=
12850: l_new_rate * p_mileage_line_array(p_ml_index).trip_distance / p_mileage_line_array(p_ml_index).number_of_days;
12851: p_mileage_line_array(p_ml_index).new_dist_line_number :=
12852: p_mileage_line_array(p_ml_index).orig_dist_line_number;
12853: p_mileage_line_array(p_ml_index).status := AP_WEB_DB_EXPLINE_PKG.C_Split;
12854:
12855: l_over_threshold_distance := l_cum_distance - nvl(l_range_high, l_cum_distance);
12856:
12857: ELSE
12962: p_actid IN NUMBER,
12963: p_funmode IN VARCHAR2,
12964: p_result OUT NOCOPY VARCHAR2) IS
12965: -------------------------------------------------------------------------------
12966: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
12967: l_ml_start_date DATE;
12968: l_ml_end_date DATE;
12969: l_ml_numberOfDays NUMBER;
12970: l_ml_distribution_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
12966: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
12967: l_ml_start_date DATE;
12968: l_ml_end_date DATE;
12969: l_ml_numberOfDays NUMBER;
12970: l_ml_distribution_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
12971: l_ml_policy_id AP_POL_HEADERS.policy_id%TYPE;
12972: l_cumulative_mileage AP_WEB_EMPLOYEE_INFO.NUMERIC_VALUE%TYPE;
12973: l_period_id AP_WEB_EMPLOYEE_INFO.PERIOD_ID%TYPE;
12974: l_debug_info VARCHAR2(200);
12973: l_period_id AP_WEB_EMPLOYEE_INFO.PERIOD_ID%TYPE;
12974: l_debug_info VARCHAR2(200);
12975: C_WF_VERSION NUMBER := 0;
12976: l_new_rate NUMBER := 0;
12977: l_ml_avg_mileage_rate AP_WEB_DB_EXPLINE_PKG.expLines_avg_mileage_rate;
12978: l_ml_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12979: l_ml_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12980: c_expense_lines_cursor AP_WEB_DB_EXPLINE_PKG.ExpLinesCursor;
12981: l_employee_id NUMBER;
12974: l_debug_info VARCHAR2(200);
12975: C_WF_VERSION NUMBER := 0;
12976: l_new_rate NUMBER := 0;
12977: l_ml_avg_mileage_rate AP_WEB_DB_EXPLINE_PKG.expLines_avg_mileage_rate;
12978: l_ml_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12979: l_ml_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12980: c_expense_lines_cursor AP_WEB_DB_EXPLINE_PKG.ExpLinesCursor;
12981: l_employee_id NUMBER;
12982: l_schedule_line_array AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array;
12975: C_WF_VERSION NUMBER := 0;
12976: l_new_rate NUMBER := 0;
12977: l_ml_avg_mileage_rate AP_WEB_DB_EXPLINE_PKG.expLines_avg_mileage_rate;
12978: l_ml_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12979: l_ml_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12980: c_expense_lines_cursor AP_WEB_DB_EXPLINE_PKG.ExpLinesCursor;
12981: l_employee_id NUMBER;
12982: l_schedule_line_array AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array;
12983: l_temp NUMBER;
12976: l_new_rate NUMBER := 0;
12977: l_ml_avg_mileage_rate AP_WEB_DB_EXPLINE_PKG.expLines_avg_mileage_rate;
12978: l_ml_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
12979: l_ml_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
12980: c_expense_lines_cursor AP_WEB_DB_EXPLINE_PKG.ExpLinesCursor;
12981: l_employee_id NUMBER;
12982: l_schedule_line_array AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array;
12983: l_temp NUMBER;
12984: l_sh_distance_uom AP_POL_HEADERS.distance_uom%TYPE;
12984: l_sh_distance_uom AP_POL_HEADERS.distance_uom%TYPE;
12985: l_sh_currency_code AP_POL_HEADERS.currency_code%TYPE;
12986: l_index NUMBER := 0;
12987: l_lines_created NUMBER := 0;
12988: l_temp_mileage_line_array AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array;
12989: l_mileage_line_array AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array;
12990: l_mileage_array_count NUMBER;
12991: i NUMBER;
12992: j NUMBER := 1;
12985: l_sh_currency_code AP_POL_HEADERS.currency_code%TYPE;
12986: l_index NUMBER := 0;
12987: l_lines_created NUMBER := 0;
12988: l_temp_mileage_line_array AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array;
12989: l_mileage_line_array AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array;
12990: l_mileage_array_count NUMBER;
12991: i NUMBER;
12992: j NUMBER := 1;
12993: l_orig_distance_travel NUMBER;
13053:
13054: --------------------------------------------
13055: l_debug_info := 'Open Expense Lines Cursor';
13056: --------------------------------------------
13057: IF (AP_WEB_DB_EXPLINE_PKG.GetExpMileageLinesCursor(l_report_header_id, c_expense_lines_cursor)) THEN
13058:
13059: LOOP
13060: --------------------------------------------
13061: l_debug_info := 'Fetch Mileage Lines Cursor';
13290:
13291: l_mileage_line_array(i).new_dist_line_number :=
13292: l_mileage_line_array(i).orig_dist_line_number;
13293:
13294: l_mileage_line_array(i).status := AP_WEB_DB_EXPLINE_PKG.C_Modified;
13295:
13296:
13297: END IF;
13298:
13403:
13404: END IF; -- IF (category_code = 'MILEAGE')
13405: END LOOP;
13406:
13407: AP_WEB_DB_EXPLINE_PKG.updateExpenseMileageLines(l_mileage_line_array, l_bHeaderUpdated);
13408:
13409: -----------------------------------------------------------------------
13410: l_debug_info := 'update display_total item attribute if ap_expense_report_headers has been updated';
13411: -----------------------------------------------------------------------
13511: l_colon NUMBER;
13512: l_itemtype VARCHAR2(7);
13513: l_itemkey VARCHAR2(15);
13514:
13515: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
13516: l_debug_info VARCHAR2(2000);
13517: l_msg VARCHAR2(2000);
13518: l_approver_id NUMBER;
13519: l_total NUMBER;
14013:
14014: ----------------------------------------------------------------
14015: l_debug_info := 'Reset adjustment information';
14016: ----------------------------------------------------------------
14017: AP_WEB_DB_EXPLINE_PKG.ResetShortpayAdjustmentInfo(l_report_header_id);
14018:
14019: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'end ResetShortpayAdjustmentInfo');
14020: EXCEPTION
14021: WHEN OTHERS THEN
14526: ------------------------------------------------------------
14527: l_debug_info := 'clear the header/line level return/audit reason/instructions in AERH/AERL';
14528: ------------------------------------------------------------
14529: AP_WEB_DB_EXPRPT_PKG.clearAuditReturnReasonInstr(l_report_header_id);
14530: AP_WEB_DB_EXPLINE_PKG.clearAuditReturnReasonInstr(l_report_header_id);
14531:
14532: ----------------------------------------------------------
14533: l_debug_info := 'clear Item Attribute AUDIT_RETURN_REASON';
14534: ---------------------------------------------------------
14835: l_num_both_personal_lines NUMBER := 0;
14836:
14837: BEGIN
14838:
14839: IF (AP_WEB_DB_EXPLINE_PKG.GetNoOfBothPayPersonalLines(p_report_header_id,l_num_both_personal_lines)) THEN
14840: NULL;
14841: END IF;
14842:
14843: IF l_num_both_personal_lines > 0 THEN