[Home] [Help]
841: ------------------------------------------------------------
842: l_debug_info := 'clear the header/line level return/audit reason/instructions in AERH/AERL';
843: ------------------------------------------------------------
844: AP_WEB_DB_EXPRPT_PKG.clearAuditReturnReasonInstr(p_report_header_id);
845: AP_WEB_DB_EXPLINE_PKG.clearAuditReturnReasonInstr(p_report_header_id);
846:
847: ----------------------------------------------------------
848: l_debug_info := 'clear Item Attribute AUDIT_RETURN_REASON';
849: ---------------------------------------------------------
1012:
1013: l_table_row VARCHAR2(2000);
1014: l_line_num NUMBER := 0;
1015:
1016: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1017: V_DistLineNumber AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1018: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1019: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1020: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1013: l_table_row VARCHAR2(2000);
1014: l_line_num NUMBER := 0;
1015:
1016: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1017: V_DistLineNumber AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1018: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1019: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1020: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1021: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1015:
1016: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1017: V_DistLineNumber AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1018: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1019: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1020: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1021: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1022: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1023: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1016: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1017: V_DistLineNumber AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1018: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1019: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1020: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1021: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1022: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1023: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1024: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1018: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1019: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1020: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1021: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1022: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1023: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1024: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1025: -- Grants Integration
1026: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1019: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1020: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1021: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1022: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1023: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1024: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1025: -- Grants Integration
1026: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1027: V_AwardSetID NUMBER := NULL;
1020: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1021: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1022: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1023: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1024: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1025: -- Grants Integration
1026: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1027: V_AwardSetID NUMBER := NULL;
1028: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1024: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1025: -- Grants Integration
1026: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1027: V_AwardSetID NUMBER := NULL;
1028: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1029: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1030: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1031: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1032: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1025: -- Grants Integration
1026: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1027: V_AwardSetID NUMBER := NULL;
1028: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1029: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1030: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1031: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1032: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1033: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1026: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1027: V_AwardSetID NUMBER := NULL;
1028: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1029: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1030: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1031: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1032: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1033: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1034: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1027: V_AwardSetID NUMBER := NULL;
1028: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1029: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1030: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1031: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1032: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1033: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1034: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1035: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1028: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1029: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1030: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1031: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1032: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1033: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1034: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1035: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1036: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1029: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1030: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1031: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1032: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1033: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1034: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1035: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1036: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1037: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1030: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1031: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1032: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1033: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1034: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1035: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1036: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1037: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1038: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1032: V_WebParamID AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1033: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1034: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1035: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1036: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1037: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1038: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1039: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1033: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1034: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1035: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1036: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1037: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1038: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1039: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1034: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1035: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1036: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1037: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1038: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1039: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1035: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1036: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1037: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1038: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1039: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1036: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1037: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1038: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1039: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1037: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1038: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1039: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1038: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1039: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1039: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1040: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1041: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1042: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1043: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1051: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1044: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1051: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1052: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1045: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1051: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1052: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1053: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1046: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1051: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1052: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1053: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1054: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1047: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1051: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1052: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1053: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1054: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1055:
1048: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1051: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1052: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1053: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1054: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1055:
1056:
1049: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1051: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1052: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1053: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1054: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1055:
1056:
1057: l_debug_info VARCHAR2(200);
1050: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1051: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1052: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1053: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1054: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1055:
1056:
1057: l_debug_info VARCHAR2(200);
1058:
1058:
1059: BEGIN
1060:
1061: ------------------------------------------------------------------------
1062: l_debug_info := 'calling AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor';
1063: ------------------------------------------------------------------------
1064: IF (AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor(l_report_header_id,
1065: ExpenseReportLinesCursor)) THEN
1066:
1060:
1061: ------------------------------------------------------------------------
1062: l_debug_info := 'calling AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor';
1063: ------------------------------------------------------------------------
1064: IF (AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor(l_report_header_id,
1065: ExpenseReportLinesCursor)) THEN
1066:
1067: LOOP
1068: FETCH ExpenseReportLinesCursor INTO
1476:
1477: ----------------------------------------------------------------
1478: l_debug_info := 'Reset AP Validation errors';
1479: -----------------------------------------------------------------
1480: AP_WEB_DB_EXPLINE_PKG.ResetAPValidationErrors(l_report_header_id);
1481:
1482: ----------------------------------------------------------------
1483: l_debug_info := 'Unset Is Default Cost Center Used?';
1484: -----------------------------------------------------------------
1797: ----------------------------------------------------------------------
1798: PROCEDURE HandleInvalidDistCCID(p_report_header_id IN AP_EXPENSE_REPORT_HEADERS.report_header_id%TYPE,
1799: p_report_distribution_id IN AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID,
1800: p_payment_due IN VARCHAR2,
1801: p_exp_type_parameter_id IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1802: p_personalParameterId IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1803: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1804: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1805: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1798: PROCEDURE HandleInvalidDistCCID(p_report_header_id IN AP_EXPENSE_REPORT_HEADERS.report_header_id%TYPE,
1799: p_report_distribution_id IN AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID,
1800: p_payment_due IN VARCHAR2,
1801: p_exp_type_parameter_id IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1802: p_personalParameterId IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1803: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1804: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1805: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1806: p_ReportLineId IN AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id,
1799: p_report_distribution_id IN AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID,
1800: p_payment_due IN VARCHAR2,
1801: p_exp_type_parameter_id IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1802: p_personalParameterId IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1803: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1804: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1805: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1806: p_ReportLineId IN AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id,
1807: p_exp_dist_ccid IN AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID,
1802: p_personalParameterId IN AP_WEB_DB_EXPLINE_PKG.expLines_webParamID,
1803: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1804: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1805: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1806: p_ReportLineId IN AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id,
1807: p_exp_dist_ccid IN AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID,
1808: p_chart_of_accounts_id IN AP_WEB_DB_AP_INT_PKG.glsob_chartOfAccountsID) IS
1809: ----------------------------------------------------------------------
1810: l_debug_info VARCHAR2(1000);
1803: p_CategoryCode IN AP_WEB_DB_EXPLINE_PKG.expLines_categorycode,
1804: p_default_emp_segments IN AP_OIE_KFF_SEGMENTS_T,
1805: p_dist_new_segments IN AP_OIE_KFF_SEGMENTS_T,
1806: p_ReportLineId IN AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id,
1807: p_exp_dist_ccid IN AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID,
1808: p_chart_of_accounts_id IN AP_WEB_DB_AP_INT_PKG.glsob_chartOfAccountsID) IS
1809: ----------------------------------------------------------------------
1810: l_debug_info VARCHAR2(1000);
1811:
1878: l_ven_allow_awt_flag AP_WEB_DB_AP_INT_PKG.vendors_allowAWTFlag;
1879: l_ven_awt_group_id AP_WEB_DB_AP_INT_PKG.vendors_awtGroupID;
1880: l_default_emp_ccid AP_WEB_DB_HR_INT_PKG.empCurrent_defaultCodeCombID;
1881: l_default_emp_segments AP_OIE_KFF_SEGMENTS_T;
1882: l_exp_dist_ccid AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID;
1883: l_id_flex_structure_name fnd_id_flex_structures_vl.id_flex_structure_name%TYPE;
1884:
1885: l_employee_ccid AP_WEB_DB_EXPRPT_PKG.expHdr_employeeCCID;
1886: l_employee_id AP_WEB_DB_EXPRPT_PKG.expHdr_employeeID;
1894: l_payment_due VARCHAR2(10) := C_IndividualPay;
1895:
1896: l_debug_info VARCHAR2(1000);
1897:
1898: V_PADefaultDistCCID AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID;
1899: V_ConcatSegs VARCHAR2(2000);
1900: V_ConcatIDs VARCHAR2(2000);
1901: V_ConcatDescrs VARCHAR2(300);
1902: V_ErrMsg VARCHAR2(2000);--2048712
1938: V_HeaderAttribute13 AP_WEB_DB_EXPRPT_PKG.expHdr_attr13;
1939: V_HeaderAttribute14 AP_WEB_DB_EXPRPT_PKG.expHdr_attr14;
1940: V_HeaderAttribute15 AP_WEB_DB_EXPRPT_PKG.expHdr_attr15;
1941:
1942: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1943: l_dist_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1944: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1945: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1946: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1939: V_HeaderAttribute14 AP_WEB_DB_EXPRPT_PKG.expHdr_attr14;
1940: V_HeaderAttribute15 AP_WEB_DB_EXPRPT_PKG.expHdr_attr15;
1941:
1942: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1943: l_dist_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1944: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1945: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1946: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1947: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1941:
1942: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1943: l_dist_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1944: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1945: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1946: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1947: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1948: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1949: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1942: ExpenseReportLinesCursor AP_WEB_DB_EXPLINE_PKG.XpenseLineAcctCursor;
1943: l_dist_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
1944: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1945: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1946: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1947: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1948: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1949: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1950: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1944: l_report_distribution_id AP_WEB_DB_EXPDIST_PKG.expDist_REPORT_DISTRIBUTION_ID;
1945: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1946: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1947: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1948: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1949: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1950: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1951: -- Grants Integration
1952: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1945: V_StartExpenseDate AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
1946: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1947: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1948: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1949: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1950: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1951: -- Grants Integration
1952: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1953: V_AwardSetID NUMBER := NULL;
1946: V_Amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
1947: V_ExpenseType AP_EXPENSE_REPORT_PARAMS.web_friendly_prompt%TYPE;
1948: V_CreditCardTrxID AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
1949: V_ProjectID AP_WEB_DB_EXPLINE_PKG.expLines_projID;
1950: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1951: -- Grants Integration
1952: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1953: V_AwardSetID NUMBER := NULL;
1954: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1950: V_TaskID AP_WEB_DB_EXPLINE_PKG.expLines_taskID;
1951: -- Grants Integration
1952: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1953: V_AwardSetID NUMBER := NULL;
1954: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1955: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1956: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1957: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1958: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1951: -- Grants Integration
1952: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1953: V_AwardSetID NUMBER := NULL;
1954: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1955: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1956: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1957: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1958: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1959: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1952: V_AwardID GMS_OIE_INT_PKG.gms_awardId;
1953: V_AwardSetID NUMBER := NULL;
1954: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1955: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1956: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1957: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1958: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1959: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1960: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1953: V_AwardSetID NUMBER := NULL;
1954: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1955: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1956: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1957: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1958: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1959: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1960: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1961: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1954: V_ExpenditureItemDate AP_WEB_DB_EXPLINE_PKG.expLines_expendItemDate;
1955: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1956: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1957: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1958: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1959: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1960: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1961: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1962: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1955: V_ExpenditureType AP_WEB_DB_EXPLINE_PKG.expLines_expendType;
1956: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1957: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1958: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1959: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1960: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1961: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1962: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1963: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1956: V_PAQuantity AP_WEB_DB_EXPLINE_PKG.expLines_paQuantity;
1957: V_ExpenditureOrganizationID AP_WEB_DB_EXPLINE_PKG.expLines_expOrgID;
1958: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1959: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1960: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1961: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1962: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1963: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1964: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1958: l_exp_type_parameter_id AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
1959: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1960: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1961: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1962: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1963: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1964: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1965: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1959: V_AdjustmentReason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
1960: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1961: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1962: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1963: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1964: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1965: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1960: V_CategoryCode AP_WEB_DB_EXPLINE_PKG.expLines_categorycode;
1961: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1962: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1963: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1964: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1965: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1961: V_FlexConcactenated AP_EXPENSE_REPORT_PARAMS.flex_concactenated%TYPE;
1962: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1963: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1964: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1965: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1962: V_LineAttributeCategory AP_WEB_DB_EXPLINE_PKG.expLines_attrCategory;
1963: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1964: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1965: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1963: V_LineAttribute1 AP_WEB_DB_EXPLINE_PKG.expLines_attr1;
1964: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1965: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1964: V_LineAttribute2 AP_WEB_DB_EXPLINE_PKG.expLines_attr2;
1965: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1965: V_LineAttribute3 AP_WEB_DB_EXPLINE_PKG.expLines_attr3;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1966: V_LineAttribute4 AP_WEB_DB_EXPLINE_PKG.expLines_attr4;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1967: V_LineAttribute5 AP_WEB_DB_EXPLINE_PKG.expLines_attr5;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1968: V_LineAttribute6 AP_WEB_DB_EXPLINE_PKG.expLines_attr6;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1969: V_LineAttribute7 AP_WEB_DB_EXPLINE_PKG.expLines_attr7;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1970: V_LineAttribute8 AP_WEB_DB_EXPLINE_PKG.expLines_attr8;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1978: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1971: V_LineAttribute9 AP_WEB_DB_EXPLINE_PKG.expLines_attr9;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1978: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1979: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1972: V_LineAttribute10 AP_WEB_DB_EXPLINE_PKG.expLines_attr10;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1978: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1979: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1980: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1973: V_LineAttribute11 AP_WEB_DB_EXPLINE_PKG.expLines_attr11;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1978: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1979: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1980: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1981: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1974: V_LineAttribute12 AP_WEB_DB_EXPLINE_PKG.expLines_attr12;
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1978: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1979: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1980: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1981: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1982:
1975: V_LineAttribute13 AP_WEB_DB_EXPLINE_PKG.expLines_attr13;
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1978: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1979: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1980: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1981: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1982:
1983: l_concatenated_segments varchar2(2000);
1976: V_LineAttribute14 AP_WEB_DB_EXPLINE_PKG.expLines_attr14;
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1978: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1979: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1980: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1981: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1982:
1983: l_concatenated_segments varchar2(2000);
1984:
1977: V_LineAttribute15 AP_WEB_DB_EXPLINE_PKG.expLines_attr15;
1978: V_LineFlexConcat AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1979: l_line_cost_center AP_WEB_DB_EXPLINE_PKG.expLines_LineFlexConcat;
1980: V_APValidationError AP_WEB_DB_EXPLINE_PKG.expLines_APValidationError;
1981: V_ReportLineId AP_WEB_DB_EXPLINE_PKG.expLines_report_line_id;
1982:
1983: l_concatenated_segments varchar2(2000);
1984:
1985: l_header_error_message VARCHAR2(2000);
1997: l_cash_line_num NUMBER := 0;
1998: l_ccard_line_num NUMBER := 0;
1999: l_yes VARCHAR2(80);
2000: l_no VARCHAR2(80);
2001: l_rounding_error_ccid AP_WEB_DB_EXPLINE_PKG.expLines_codeCombID;
2002: l_card_program_id NUMBER := 0;
2003:
2004: l_existing_segments AP_OIE_KFF_SEGMENTS_T;
2005: l_new_segments AP_OIE_KFF_SEGMENTS_T;
2115: l_debug_info := 'end preparation for Project Account Generation';
2116: ------------------------------------------------------------
2117:
2118: ------------------------------------------------------------------------
2119: l_debug_info := 'calling AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor';
2120: ------------------------------------------------------------------------
2121: IF (AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor(p_report_header_id,
2122: ExpenseReportLinesCursor)) THEN
2123:
2117:
2118: ------------------------------------------------------------------------
2119: l_debug_info := 'calling AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor';
2120: ------------------------------------------------------------------------
2121: IF (AP_WEB_DB_EXPLINE_PKG.GetExpDistAcctCursor(p_report_header_id,
2122: ExpenseReportLinesCursor)) THEN
2123:
2124: ---------------------------------------------------------
2125: l_debug_info := 'Retrieve Payment Due From System Option';
2494: l_debug_info := 'check to see if line error occurred';
2495: ------------------------------------------------------------------------
2496: if (l_add_to_line_error) then
2497:
2498: AP_WEB_DB_EXPLINE_PKG.UpdateAPValidationError(
2499: p_report_header_id => p_report_header_id,
2500: p_dist_line_number => l_dist_line_number,
2501: p_ap_validation_error => l_line_error_message);
2502:
2637: ---------------------------------------------------
2638: l_debug_info := 'Update ap_expense_report_lines';
2639: ---------------------------------------------------
2640: -- 7/24: insertion of receipt_required_flag is moved to the submit package.
2641: IF (NOT AP_WEB_DB_EXPLINE_PKG.SetAWTGroupIDAndJustif(p_report_header_id,
2642: l_sys_allow_awt_flag,
2643: l_ven_allow_awt_flag,
2644: l_ven_awt_group_id)) THEN
2645: NULL;
2757: ----------------------------------------------------------------
2758: l_debug_info := 'Get the receipts missing flag';
2759: ----------------------------------------------------------------
2760: --chiho:1369557:
2761: IF ( AP_WEB_DB_EXPLINE_PKG.GetReceiptsMissingFlag(
2762: l_report_header_id,
2763: l_receipts_missing_flag) ) THEN
2764:
2765: IF ( l_receipts_missing_flag = 'Y' ) THEN
2771: * notification while the report was created from another report is due to
2772: * missing receipts.
2773: */
2774:
2775: IF AP_WEB_DB_EXPLINE_PKG.GetShortpaidFlag(l_report_header_id, l_shortpaid_flag) THEN
2776: IF (l_shortpaid_flag = 'Y' ) THEN
2777: fnd_message.set_name('SQLAP', 'OIE_WF_APPROVAL_POLICY_NOTE');
2778: l_warning_msg := FND_MESSAGE.Get;
2779:
2801:
2802: END IF;
2803: END IF;
2804:
2805: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
2806: fnd_message.set_name('SQLAP', 'AP_WEB_EXP_APRVL_RULES_VIOLATE');
2807: l_warning_msg := FND_MESSAGE.Get;
2808:
2809: WF_ENGINE.SetItemAttrText(
2889: p_actid IN NUMBER,
2890: p_funmode IN VARCHAR2,
2891: p_result OUT NOCOPY VARCHAR2) IS
2892: ----------------------------------------------------------------------
2893: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
2894: l_sum_limit NUMBER;
2895: l_sum_violations NUMBER;
2896: l_sum_missing_receipts NUMBER;
2897: l_currency VARCHAR2(50);
2933:
2934: -------------------------------------------------------------------------
2935: l_debug_info := 'Calculate Total Receipt Missing Amt for Expense Report';
2936: -------------------------------------------------------------------------
2937: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetReceiptMissingTotal(l_report_header_id,
2938: l_sum_missing_receipts)) THEN
2939: l_sum_missing_receipts := 0;
2940: END IF;
2941:
2941:
2942: -------------------------------------------------------------------------
2943: l_debug_info := 'Calculate Total Receipt Violations excluding missing receipt total for Expense Report';
2944: -------------------------------------------------------------------------
2945: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetReceiptViolationsTotal(l_report_header_id,
2946: l_sum_violations)) THEN
2947: l_sum_violations := 0;
2948: END IF;
2949:
3029: p_funmode IN VARCHAR2,
3030: p_result OUT NOCOPY VARCHAR2) IS
3031: ----------------------------------------------------------------------
3032: l_include_missing_receipts VARCHAR2(1);
3033: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3034: l_num_req_receipts NUMBER;
3035: l_debug_info VARCHAR2(200);
3036: BEGIN
3037:
3050:
3051: ------------------------------------------------------------------
3052: l_debug_info := 'Calculate Number of Lines with Receipt Required';
3053: ------------------------------------------------------------------
3054: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumReceiptRequiredLines(
3055: l_report_header_id, l_num_req_receipts)) THEN
3056: l_num_req_receipts := 0;
3057: END IF;
3058:
3084: p_actid IN NUMBER,
3085: p_funmode IN VARCHAR2,
3086: p_result OUT NOCOPY VARCHAR2) IS
3087: ----------------------------------------------------------------------
3088: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3089: l_num_req_receipt NUMBER;
3090: l_violation VARCHAR2(1);
3091: l_debug_info VARCHAR2(200);
3092: l_mess Wf_Item_Attribute_Values.TEXT_VALUE%TYPE;
3106:
3107: ------------------------------------------------------------------------
3108: l_debug_info := 'Calculate Number of Lines With Justification Required';
3109: ------------------------------------------------------------------------
3110: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumJustReqdLines(l_report_header_id,
3111: l_num_req_receipt)) THEN
3112: l_num_req_receipt := 0;
3113: END IF;
3114:
3118: IF (l_num_req_receipt > 0 ) THEN
3119: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_JUST_REQUIRED_MSG');
3120: END IF;
3121:
3122: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
3123: -- Bug# 13082536
3124: l_violation := 'Y';
3125: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_VIOLATION_MSG');
3126: END IF;
3456: p_actid IN NUMBER,
3457: p_funmode IN VARCHAR2,
3458: p_result OUT NOCOPY VARCHAR2) IS
3459: ----------------------------------------------------------------------
3460: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3461: l_orig_expe_report_amt NUMBER;
3462: l_exp_report_amount AP_WEB_DB_EXPRPT_PKG.expHdr_total;
3463: l_orig_exp_report_amt NUMBER;
3464: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
3461: l_orig_expe_report_amt NUMBER;
3462: l_exp_report_amount AP_WEB_DB_EXPRPT_PKG.expHdr_total;
3463: l_orig_exp_report_amt NUMBER;
3464: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
3465: l_amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
3466: l_adjustment_reason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
3467:
3468: l_currency VARCHAR2(50);
3469: l_adjustment_line VARCHAR2(2000);
3462: l_exp_report_amount AP_WEB_DB_EXPRPT_PKG.expHdr_total;
3463: l_orig_exp_report_amt NUMBER;
3464: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
3465: l_amount AP_WEB_DB_EXPLINE_PKG.expLines_amount;
3466: l_adjustment_reason AP_WEB_DB_EXPLINE_PKG.expLines_adjReason;
3467:
3468: l_currency VARCHAR2(50);
3469: l_adjustment_line VARCHAR2(2000);
3470: l_adj_info_body VARCHAR2(2000);
3479: C_CreditLineVersion CONSTANT NUMBER := 1;
3480: C_WF_Version NUMBER := 0;
3481:
3482: /* jrautiai ADJ Fix Start */
3483: AdjustmentsCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
3484: adjustment_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
3485:
3486: l_mess Wf_Item_Attribute_Values.TEXT_VALUE%TYPE;
3487: l_crd_card_count NUMBER := 0;
3480: C_WF_Version NUMBER := 0;
3481:
3482: /* jrautiai ADJ Fix Start */
3483: AdjustmentsCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
3484: adjustment_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
3485:
3486: l_mess Wf_Item_Attribute_Values.TEXT_VALUE%TYPE;
3487: l_crd_card_count NUMBER := 0;
3488:
3545: l_debug_info := 'Retrieve Payment Due From';
3546: ---------------------------------------------------------
3547: l_payment_due := WF_ENGINE.GetItemAttrText(p_item_type,p_item_key,'PAYMENT_DUE_FROM');
3548:
3549: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumCCLinesIncluded(l_report_header_id,
3550: l_crd_card_count)) THEN
3551: l_crd_card_count := 0;
3552: END IF;
3553:
3587: Adjustment was made, return Y and retrieve adjusted lines';
3588: --------------------------------------------------------------------------
3589: -- bug 3404699:round to reimbursment currency precision
3590: IF (AP_WEB_UTILITIES_PKG.Oie_Round_Currency(l_orig_exp_report_amt,l_reimb_currency) <>
3591: l_exp_report_amount OR AP_WEB_DB_EXPLINE_PKG.GetAdjustedLineExists(l_report_header_id)) THEN
3592: p_result := 'COMPLETE:Y';
3593:
3594: --------------------------------------------
3595: l_debug_info := 'Calculate Amt Due and Total';
3594: --------------------------------------------
3595: l_debug_info := 'Calculate Amt Due and Total';
3596: --------------------------------------------
3597: /* jrautiai ADJ Fix Start */
3598: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_report_header_id,
3599: l_payment_due,
3600: l_emp_amt,
3601: l_ccard_amt,
3602: l_total)) THEN
3622: ------------------------------------------
3623: l_debug_info := 'Open Adjustments Cursor';
3624: ------------------------------------------
3625: -- jrautiai ADJ Fix
3626: IF (AP_WEB_DB_EXPLINE_PKG.GetAdjustmentsCursor(l_report_header_id, 'ADJUSTMENT', AdjustmentsCursor)) THEN
3627: FOR i IN 1..10 LOOP
3628:
3629: ------------------------------------------
3630: l_debug_info := 'Fetch Adjustments Cursor';
3785: p_actid IN NUMBER,
3786: p_funmode IN VARCHAR2,
3787: p_result OUT NOCOPY VARCHAR2) IS
3788: ----------------------------------------------------------------------
3789: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3790: l_num_req_receipt_not_verified NUMBER;
3791: l_debug_info VARCHAR2(200);
3792: BEGIN
3793:
3805: ----------------------------------------------------------------------
3806: l_debug_info := 'Calculate Number of Lines With Receipt Required that
3807: have not been verified';
3808: ----------------------------------------------------------------------
3809: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumReceiptShortpaidLines(
3810: l_report_header_id,
3811: l_num_req_receipt_not_verified)) THEN
3812: l_num_req_receipt_not_verified := 0;
3813: END IF;
3842: p_actid IN NUMBER,
3843: p_funmode IN VARCHAR2,
3844: p_result OUT NOCOPY VARCHAR2) IS
3845: ----------------------------------------------------------------------
3846: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
3847: l_num_req_receipt_not_verified NUMBER;
3848: l_debug_info VARCHAR2(200);
3849: BEGIN
3850:
3863: ----------------------------------------------------------------------
3864: l_debug_info := 'Calculate Number of Lines With Receipt Required that
3865: have not been verified';
3866: ----------------------------------------------------------------------
3867: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumShortpaidLines(l_report_header_id,
3868: l_num_req_receipt_not_verified)) THEN
3869: l_num_req_receipt_not_verified := 0;
3870: END IF;
3871:
3998: p_funmode IN VARCHAR2,
3999: p_notification_type IN VARCHAR2,
4000: p_result OUT NOCOPY VARCHAR2) IS
4001: -------------------------------------------------------------------------
4002: l_exp_report_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
4003: l_currency VARCHAR2(15);
4004: l_shortpay_line VARCHAR2(2000);
4005: l_shortpay_info_body VARCHAR2(2000) := '';
4006: l_num_lines NUMBER := 0;
4011: C_CreditLineVersion CONSTANT NUMBER := 1;
4012: C_WF_Version NUMBER := 0;
4013:
4014: -- jrautiai ADJ Fix, changed shortpay to refer the new cursor type.
4015: ShortpaidLinesCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
4016:
4017: -- jrautiai ADJ Fix, fetching the shortpay results into a record of a common type.
4018: shortpay_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
4019:
4014: -- jrautiai ADJ Fix, changed shortpay to refer the new cursor type.
4015: ShortpaidLinesCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
4016:
4017: -- jrautiai ADJ Fix, fetching the shortpay results into a record of a common type.
4018: shortpay_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
4019:
4020:
4021: BEGIN
4022:
4064: ------------------------------------------
4065: l_debug_info := 'Open ShortPaidLines Cursor';
4066: ------------------------------------------
4067: -- jrautiai ADJ Fix, using common cursor with adjustments.
4068: IF (AP_WEB_DB_EXPLINE_PKG.GetAdjustmentsCursor(l_exp_report_id, 'SHORTPAY', ShortpaidLinesCursor)) THEN
4069:
4070: FOR i IN 1..10 LOOP
4071:
4072: ------------------------------------------
4423: l_debug_info := 'Insert the lines that cannot be paid into
4424: ap_expense_report_lines with new report_header_id';
4425: --------------------------------------------------------------------
4426:
4427: IF (AP_WEB_DB_EXPLINE_PKG.AddPolicyShortPaidExpLines(p_new_expense_report_id, p_orig_expense_report_id)) THEN
4428: NULL;
4429: END IF;
4430:
4431: --------------------------------------------------------------------
4452: missing receipts shortpay';
4453: --------------------------------------------------------------------
4454:
4455: IF (p_shortpay_type = 'NO_RECEIPTS') THEN
4456: IF (AP_WEB_DB_EXPLINE_PKG.AddUnverifiedShortpaidLines(
4457: p_new_expense_report_id, p_orig_expense_report_id)) THEN
4458: NULL;
4459: END IF;
4460: ELSIF (p_shortpay_type = 'NO_IMAGE_RECEIPTS') THEN
4457: p_new_expense_report_id, p_orig_expense_report_id)) THEN
4458: NULL;
4459: END IF;
4460: ELSIF (p_shortpay_type = 'NO_IMAGE_RECEIPTS') THEN
4461: IF (AP_WEB_DB_EXPLINE_PKG.AddUnverifiedImgShortpaidLines(
4462: p_new_expense_report_id, p_orig_expense_report_id)) THEN
4463: NULL;
4464: END IF;
4465: ELSE
4462: p_new_expense_report_id, p_orig_expense_report_id)) THEN
4463: NULL;
4464: END IF;
4465: ELSE
4466: IF (AP_WEB_DB_EXPLINE_PKG.AddUnverifiedBtShortpaidLines(
4467: p_new_expense_report_id, p_orig_expense_report_id)) THEN
4468: NULL;
4469: END IF;
4470: END IF;
4589: /* jrautiai ADJ Fix Start */
4590: -----------------------------------------------------------------
4591: l_debug_info := 'Get number of lines not adhereing to policies.';
4592: ------------------------------------------------------------------
4593: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumShortpaidLines(l_report_header_id, l_shortpaid_count)) THEN
4594: l_shortpaid_count := 0;
4595: END IF;
4596:
4597: -----------------------------------------------------------------
4596:
4597: -----------------------------------------------------------------
4598: l_debug_info := 'Get number of lines with policy shortpay.';
4599: ------------------------------------------------------------------
4600: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumPolicyShortpaidLines(l_report_header_id, l_policy_count)) THEN
4601: l_policy_count := 0;
4602: END IF;
4603: /* A line can contain both scenarios, missing receipt and policy violation flag. In that case
4604: * the line is moved to the '-1' report created for the policy violation flag. The variable
4605: * l_shortpaid_count contains the number of lines with either missing receipts and / or with
4606: * policy violation flag. The variable l_policy_count contains lines with only the policy
4607: * violation flag. So the number of lines to be moved to the new missing receipt report
4608: * can be calculated with 'l_shortpaid_count - l_policy_count'. We are not using the function
4609: * AP_WEB_DB_EXPLINE_PKG.GetNumReceiptShortpaidLines
4610: * since that will return all the lines with missing receipts, including ones with also policy
4611: * shortpay flag set to Y, which will not be moved to the missing receipts report.
4612: */
4613: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumImageShortpaidLines(l_report_header_id, l_image_count)) THEN
4609: * AP_WEB_DB_EXPLINE_PKG.GetNumReceiptShortpaidLines
4610: * since that will return all the lines with missing receipts, including ones with also policy
4611: * shortpay flag set to Y, which will not be moved to the missing receipts report.
4612: */
4613: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumImageShortpaidLines(l_report_header_id, l_image_count)) THEN
4614: l_image_count := 0;
4615: END IF;
4616:
4617: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumBothShortpaidLines(l_report_header_id, l_both_count)) THEN
4613: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumImageShortpaidLines(l_report_header_id, l_image_count)) THEN
4614: l_image_count := 0;
4615: END IF;
4616:
4617: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumBothShortpaidLines(l_report_header_id, l_both_count)) THEN
4618: l_both_count := 0;
4619: END IF;
4620:
4621: --l_missing_receipt_count := l_shortpaid_count - l_policy_count - l_image_count - l_both_count;
4618: l_both_count := 0;
4619: END IF;
4620:
4621: --l_missing_receipt_count := l_shortpaid_count - l_policy_count - l_image_count - l_both_count;
4622: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumOriginalShortpaidLines(l_report_header_id, l_missing_receipt_count)) THEN
4623: l_missing_receipt_count := 0;
4624: END IF;
4625:
4626: IF (l_policy_count > 0) THEN
4651: 'POLICY');
4652:
4653: /* jrautiai ADJ Fix Start
4654: * recalculate the shortpaid totals after it has been created*/
4655: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_policy_shortpay_id,
4656: l_payment_due,
4657: l_policy_emp_amt,
4658: l_policy_ccard_amt,
4659: l_policy_shortpay_total)) THEN
4721: 'NO_RECEIPTS');
4722:
4723: /* jrautiai ADJ Fix Start
4724: * recalculate the shortpaid totals after it has been created*/
4725: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_no_receipts_shortpay_id,
4726: l_payment_due,
4727: l_no_receipts_emp_amt,
4728: l_no_receipts_ccard_amt,
4729: l_no_receipts_shortpay_total)) THEN
4792: 'NO_IMAGE_RECEIPTS');
4793:
4794: /* jrautiai ADJ Fix Start
4795: * recalculate the shortpaid totals after it has been created*/
4796: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_no_img_receipts_shortpay_id,
4797: l_payment_due,
4798: l_no_receipts_emp_amt,
4799: l_no_receipts_ccard_amt,
4800: l_no_receipts_shortpay_total)) THEN
4854: 'NO_BOTH_RECEIPTS');
4855:
4856: /* jrautiai ADJ Fix Start
4857: * recalculate the shortpaid totals after it has been created*/
4858: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_no_both_receipts_shortpay_id,
4859: l_payment_due,
4860: l_no_receipts_emp_amt,
4861: l_no_receipts_ccard_amt,
4862: l_no_receipts_shortpay_total)) THEN
4925: -----------------------------------------------------------------------
4926: l_debug_info := 'Count the lines remaining in the original expense
4927: report';
4928: -----------------------------------------------------------------------
4929: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumberOfExpLines(l_report_header_id,l_count) OR l_count = 0) THEN
4930: -----------------------------------------
4931: l_debug_info := 'Delete the original expense report if everything
4932: is getting shortpaid';
4933: ----------------------------------------------------------------------
4941: l_debug_info := 'Update the total of the original expense report
4942: to not include the amount of the new expense report';
4943: ----------------------------------------------------------------------
4944: /* jrautiai ADJ Fix Start */
4945: IF (NOT AP_WEB_DB_EXPLINE_PKG.CalculateAmtsDue(l_report_header_id,
4946: l_payment_due,
4947: l_amtDueEmp,
4948: l_amtDueCCardCompany,
4949: l_total)) THEN
5016:
5017: ---------------------------------------------------------------------------
5018: l_debug_info := 'Delete the expense lines for the given expense report id';
5019: ---------------------------------------------------------------------------
5020: IF (NOT AP_WEB_DB_EXPLINE_PKG.DeleteReportLines(p_report_header_id)) THEN
5021: NULL;
5022: END IF;
5023:
5024: ----------------------------------------------------
5308: | none |
5309: *----------------------------------------------------------------------------*/
5310:
5311: PROCEDURE ResetCCardTxns (
5312: p_report_header_id IN AP_WEB_DB_EXPLINE_PKG.expLines_headerID,
5313: p_item_type IN VARCHAR2,
5314: p_item_key IN VARCHAR2)
5315: IS
5316: l_payment_due VARCHAR2(50) := C_IndividualPay;
5324: 'PAYMENT_DUE_FROM');
5325:
5326: l_debug_info := 'Update for Credit Card Integration';
5327: IF (l_payment_due = C_CompanyPay) THEN
5328: IF (NOT AP_WEB_DB_EXPLINE_PKG.DeletePersonalLines(p_report_header_id))
5329: THEN
5330: NULL;
5331: END IF;
5332: END IF;
5357: APP_EXCEPTION.RAISE_EXCEPTION;
5358: END ResetCCardTxns;
5359:
5360: PROCEDURE AMEAbortRequestApprovals(
5361: p_rep_header_id IN AP_WEB_DB_EXPLINE_PKG.expLines_headerID,
5362: p_withdraw IN VARCHAR2 DEFAULT 'N')
5363: IS
5364: l_debug_info VARCHAR2(200);
5365: l_wf_active BOOLEAN := FALSE;
5597: end;
5598:
5599: IF FND_PROFILE.VALUE_SPECIFIC('OIE_ENABLE_ADVANCES',NULL,l_n_resp_id,200) = 'PAYABLES' THEN
5600:
5601: AP_WEB_DB_EXPLINE_PKG.resetApplyAdvances(l_report_header_id);
5602: END IF;
5603:
5604:
5605: /* Bug 4019412 */
5602: END IF;
5603:
5604:
5605: /* Bug 4019412 */
5606: AP_WEB_DB_EXPLINE_PKG.resetAPflags(l_report_header_id);
5607:
5608: ------------------------------------------------------------
5609: l_debug_info := 'Set which process to start from';
5610: ------------------------------------------------------------
6022: p_actid IN NUMBER,
6023: p_funmode IN VARCHAR2,
6024: p_result OUT NOCOPY VARCHAR2) IS
6025: ----------------------------------------------------------------------
6026: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
6027: l_debug_info VARCHAR2(200);
6028: BEGIN
6029:
6030: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'start StartFromManagerApproval');
6041:
6042: --------------------------------------------------------------
6043: l_debug_info := 'Update all expense lines as receipt missing';
6044: --------------------------------------------------------------
6045: IF (NOT AP_WEB_DB_EXPLINE_PKG.SetReceiptMissing(l_report_header_id,
6046: 'Y')) THEN
6047: NULL;
6048: END IF;
6049:
6297: ------------------------------------------------------------------
6298: l_debug_info := 'Insert the lines for the credit card company into
6299: ap_expense_report_lines with new report_header_id';
6300: ------------------------------------------------------------------
6301: IF (NOT AP_WEB_DB_EXPLINE_PKG.AddCCReportLines(l_report_header_id,
6302: l_new_report_id)) THEN
6303: NULL;
6304: END IF;
6305:
6422: WF_ENGINE.SetItemAttrNumber(p_item_type,
6423: p_item_key,
6424: 'VENDOR_SITE_ID',
6425: l_vendor_site_id);
6426: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumCCLinesIncluded(l_report_header_id,
6427: l_crd_card_count)) THEN
6428: l_crd_card_count := 0;
6429: END IF;
6430:
7767: l_preparer_display_name wf_users.display_name%type;
7768: l_employee_id NUMBER;
7769: l_employee_name wf_users.name%type;
7770: l_employee_display_name wf_users.display_name%type;
7771: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
7772: l_document_number VARCHAR2(50);
7773: l_total NUMBER;
7774: l_emp_cost_center VARCHAR2(240);
7775: l_doc_cost_center VARCHAR2(240);
7799:
7800: --------------------------------------------------------------
7801: l_debug_info := 'Update all expense lines as receipt missing';
7802: --------------------------------------------------------------
7803: IF (NOT AP_WEB_DB_EXPLINE_PKG.SetReceiptMissing(l_report_header_id,
7804: 'Y')) THEN
7805: NULL;
7806: END IF;
7807:
9369: p_funmode IN VARCHAR2,
9370: p_result OUT NOCOPY VARCHAR2) IS
9371: ---------------------------------------------------------
9372: l_require_proof_of_payment VARCHAR2(1);
9373: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
9374: l_debug_info VARCHAR2(200);
9375: BEGIN
9376:
9377: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'start RequireProofOfPayment');
9395: p_item_key,
9396: 'EXPENSE_REPORT_ID');
9397:
9398:
9399: IF (NOT AP_WEB_DB_EXPLINE_PKG.SetReceiptRequired(l_report_header_id, 'N')) THEN
9400: NULL;
9401: END IF;
9402:
9403: END IF;
9553: * jrautiai ADJ Fix Removed shortpay and adjustment specific logic form elsewhere, so instead here
9554: * we are dealing with both cases using common logic.
9555: */
9556: PROCEDURE BuildAdjustmentInfoLine(p_display_type IN VARCHAR2,
9557: adjustment_rec IN AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType,
9558: p_adjustment_type IN VARCHAR2,
9559: p_currency IN VARCHAR2,
9560: p_adjustment_line IN OUT NOCOPY VARCHAR2) IS
9561:
9754: l_document long;--namrata
9755: l_document_max NUMBER:=25000;--namrata
9756: l_debug_info VARCHAR2(1000);
9757: l_item_type VARCHAR2(30);
9758: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
9759: l_adjustment_line VARCHAR2(2000);
9760: l_adj_info_body VARCHAR2(2000);
9761: l_itemtype VARCHAR2(7);
9762: l_itemkey VARCHAR2(30);
9768: l_prompts AP_WEB_UTILITIES_PKG.prompts_table;
9769: l_title AK_REGIONS_VL.name%TYPE;
9770:
9771: -- Bug 3336259: CC SP and ADJ Fix, changed to refer the new cursor type.
9772: AdjustmentsCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
9773:
9774: -- Bug 3336259: CC SP and ADJ Fix, fetching the results into a record of a common type.
9775: adjustment_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
9776:
9771: -- Bug 3336259: CC SP and ADJ Fix, changed to refer the new cursor type.
9772: AdjustmentsCursor AP_WEB_DB_EXPLINE_PKG.AdjustmentCursorType;
9773:
9774: -- Bug 3336259: CC SP and ADJ Fix, fetching the results into a record of a common type.
9775: adjustment_rec AP_WEB_DB_EXPLINE_PKG.AdjustmentRecordType;
9776:
9777: l_colspan NUMBER :=0;
9778: l_total_adjustment NUMBER :=0;
9779: l_total_amount NUMBER :=0;
9949: /**
9950: Bug 3336259: CC SP and ADJ Fix Start - Removed shortpay and adjustment specific logic, instead we are using the same
9951: * logic for both in GetAdjustmentsCursor and BuildAdjustmentInfoLine.
9952: */
9953: IF (AP_WEB_DB_EXPLINE_PKG.GetAdjustmentsCursor(l_report_header_id, l_adj_code, AdjustmentsCursor)) THEN
9954: LOOP
9955: FETCH AdjustmentsCursor INTO adjustment_rec;
9956: EXIT WHEN AdjustmentsCursor%NOTFOUND;
9957: BuildAdjustmentInfoLine(display_type,
11113:
11114: l_payment_due := WF_ENGINE.GetItemAttrText(p_item_type,p_item_key,'PAYMENT_DUE_FROM');
11115:
11116: IF (l_payment_due = C_CompanyPay) THEN
11117: IF (NOT AP_WEB_DB_EXPLINE_PKG.DeletePersonalLines(l_report_header_id)) THEN
11118: NULL;
11119: END IF;
11120: END IF;
11121:
11147: end;
11148:
11149: IF FND_PROFILE.VALUE_SPECIFIC('OIE_ENABLE_ADVANCES',NULL,l_n_resp_id,200) = 'PAYABLES' THEN
11150:
11151: AP_WEB_DB_EXPLINE_PKG.resetApplyAdvances(l_report_header_id);
11152: END IF;
11153:
11154: /* Bug 4019412 */
11155: AP_WEB_DB_EXPLINE_PKG.resetAPflags(l_report_header_id);
11151: AP_WEB_DB_EXPLINE_PKG.resetApplyAdvances(l_report_header_id);
11152: END IF;
11153:
11154: /* Bug 4019412 */
11155: AP_WEB_DB_EXPLINE_PKG.resetAPflags(l_report_header_id);
11156: ------------------------------------------------------------
11157: l_debug_info := 'Set which process to start from';
11158: ------------------------------------------------------------
11159: -- Indicate which process to start from
11766: 'NonValidatedWebExpense')) THEN
11767: NULL;
11768: END IF;
11769:
11770: AP_WEB_DB_EXPLINE_PKG.resetAPflags(p_rep_header_id);
11771: -- 4001778/3654956
11772: --5060928: reset the Apply Advnaces only if OIE:Enable Advances = "Payables"
11773:
11774: IF (l_wf_exist) THEN
11791: l_n_resp_id := FND_PROFILE.VALUE('RESP_ID');
11792: END IF;
11793: IF FND_PROFILE.VALUE_SPECIFIC('OIE_ENABLE_ADVANCES',NULL,l_n_resp_id,200) = 'PAYABLES' THEN
11794:
11795: AP_WEB_DB_EXPLINE_PKG.resetApplyAdvances(p_rep_header_id);
11796: END IF;
11797:
11798: --AP_WEB_DB_VIOLATIONS_PKG.deleteViolationEntry(p_rep_header_id);
11799: --Delete the duplicate detection violations
11958: l_colon NUMBER;
11959: l_itemtype VARCHAR2(7);
11960: l_itemkey VARCHAR2(25);
11961:
11962: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
11963: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11964: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11965: l_days VARCHAR2(4);
11966: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11959: l_itemtype VARCHAR2(7);
11960: l_itemkey VARCHAR2(25);
11961:
11962: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
11963: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11964: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11965: l_days VARCHAR2(4);
11966: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11967: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11960: l_itemkey VARCHAR2(25);
11961:
11962: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
11963: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11964: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11965: l_days VARCHAR2(4);
11966: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11967: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11968: l_receipt_rate VARCHAR2(5);
11962: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
11963: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11964: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11965: l_days VARCHAR2(4);
11966: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11967: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11968: l_receipt_rate VARCHAR2(5);
11969: l_receipt_amt VARCHAR2(10);
11970: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11963: l_receipt_missing_flag AP_WEB_DB_EXPLINE_PKG.expLines_receiptMissingFlag;
11964: l_start_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
11965: l_days VARCHAR2(4);
11966: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11967: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11968: l_receipt_rate VARCHAR2(5);
11969: l_receipt_amt VARCHAR2(10);
11970: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11971: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11966: l_daily_amt AP_WEB_DB_EXPLINE_PKG.expLines_dailyAmount;
11967: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11968: l_receipt_rate VARCHAR2(5);
11969: l_receipt_amt VARCHAR2(10);
11970: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11971: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11972: l_cc_personal_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11973: l_justification AP_WEB_DB_EXPLINE_PKG.expLines_justification;
11974: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11967: l_receipt_curr AP_WEB_DB_EXPLINE_PKG.expLines_receiptCurrCode;
11968: l_receipt_rate VARCHAR2(5);
11969: l_receipt_amt VARCHAR2(10);
11970: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11971: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11972: l_cc_personal_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11973: l_justification AP_WEB_DB_EXPLINE_PKG.expLines_justification;
11974: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11975: l_project_number PA_PROJECTS.segment1%TYPE;
11968: l_receipt_rate VARCHAR2(5);
11969: l_receipt_amt VARCHAR2(10);
11970: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11971: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11972: l_cc_personal_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11973: l_justification AP_WEB_DB_EXPLINE_PKG.expLines_justification;
11974: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11975: l_project_number PA_PROJECTS.segment1%TYPE;
11976: l_task_number AP_WEB_DB_PA_INT_PKG.tasks_taskNum;
11969: l_receipt_amt VARCHAR2(10);
11970: l_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11971: l_expense_report_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11972: l_cc_personal_total_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;
11973: l_justification AP_WEB_DB_EXPLINE_PKG.expLines_justification;
11974: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11975: l_project_number PA_PROJECTS.segment1%TYPE;
11976: l_task_number AP_WEB_DB_PA_INT_PKG.tasks_taskNum;
11977: l_award_number GMS_OIE_INT_PKG.gms_awardNum;
11974: l_expense_type AP_WEB_DB_EXPTEMPLATE_PKG.expTempl_webFriendlyPrompt;
11975: l_project_number PA_PROJECTS.segment1%TYPE;
11976: l_task_number AP_WEB_DB_PA_INT_PKG.tasks_taskNum;
11977: l_award_number GMS_OIE_INT_PKG.gms_awardNum;
11978: l_credit_card_trx_id AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
11979: l_distribution_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
11980: l_line_number NUMBER := 0;
11981: l_primary_number NUMBER := 1;
11982: l_line_display VARCHAR2(5);
11975: l_project_number PA_PROJECTS.segment1%TYPE;
11976: l_task_number AP_WEB_DB_PA_INT_PKG.tasks_taskNum;
11977: l_award_number GMS_OIE_INT_PKG.gms_awardNum;
11978: l_credit_card_trx_id AP_WEB_DB_EXPLINE_PKG.expLines_crdCardTrxID;
11979: l_distribution_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
11980: l_line_number NUMBER := 0;
11981: l_primary_number NUMBER := 1;
11982: l_line_display VARCHAR2(5);
11983: l_counter NUMBER := 1;
12000: l_prompts AP_WEB_UTILITIES_PKG.prompts_table;
12001: l_title AK_REGIONS_VL.name%TYPE;
12002: l_debug_info VARCHAR2(1000);
12003:
12004: XpenseLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12005: PersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12006:
12007: --Bug 2944363
12008: BothPayPersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12001: l_title AK_REGIONS_VL.name%TYPE;
12002: l_debug_info VARCHAR2(1000);
12003:
12004: XpenseLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12005: PersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12006:
12007: --Bug 2944363
12008: BothPayPersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12009:
12004: XpenseLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12005: PersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12006:
12007: --Bug 2944363
12008: BothPayPersonalLinesCursor AP_WEB_DB_EXPLINE_PKG.DisplayXpenseLinesCursor;
12009:
12010:
12011: l_n_org_id Number;
12012:
12012:
12013: l_show_message VARCHAR2(1) := 'N';
12014: l_message VARCHAR2(2000);
12015: l_rules_violated VARCHAR2(1) := 'N';
12016: l_last_dist_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum
12017: := -1;
12018:
12019: l_document long;
12020:
12033:
12034: l_num_both_personal_lines NUMBER := 0; --Bug 2944363
12035: l_payment VARCHAR2(10);--Bug 2944363
12036: l_cc_trxn_date VARCHAR2(50);--Bug 2944363
12037: l_cc_expensed_amt AP_WEB_DB_EXPLINE_PKG.expLines_amount;--Bug 2944363
12038: l_cc_curr_code VARCHAR2(20); --Bug 2944363
12039: l_cc_merchant_name AP_CREDIT_CARD_TRXNS_ALL.merchant_name1%TYPE;--Bug 2944363
12040: l_payment_due_from VARCHAR2(10) := 'INDIVIDUAL';
12041:
12205:
12206: --------------------------------------------
12207: l_debug_info := 'get Number of ExpLines';
12208: --------------------------------------------
12209: if (AP_WEB_DB_EXPLINE_PKG.GetNumberOfExpLines(l_report_header_id, l_num_lines)) then null; end if;
12210:
12211: if (l_num_lines = 0) then
12212:
12213: /*Bug 2944363: Dont raise SHORTPAID error if the expense report
12215: an ER in BOTHPAY having only personal CC trx will
12216: also not have any lines.
12217: */
12218: --AMMISHRA - Both Pay Personal Only Lines project.
12219: if (AP_WEB_DB_EXPLINE_PKG.GetNoOfBothPayPersonalLines(l_report_header_id,l_num_both_personal_lines)) then null; end if;
12220:
12221: ----------------------------------------------------------------
12222: l_debug_info := 'Retrieve Profile Option Payment Due From';
12223: ----------------------------------------------------------------
12247:
12248: --------------------------------------------
12249: l_debug_info := 'Open Expense Lines Cursor';
12250: --------------------------------------------
12251: IF (AP_WEB_DB_EXPLINE_PKG.GetDisplayXpenseLinesCursor(l_report_header_id, XpenseLinesCursor)) THEN
12252:
12253: LOOP
12254:
12255: --------------------------------------------
12321:
12322: --------------------------------------------
12323: l_debug_info := 'get Number of Cash/Credit Card lines';
12324: --------------------------------------------
12325: if (AP_WEB_DB_EXPLINE_PKG.GetNumCCLinesIncluded(l_report_header_id, l_num_cc_lines)) then null; end if;
12326: l_num_cash_lines := l_num_lines - l_num_cc_lines;
12327:
12328:
12329: --------------------------------------------
12328:
12329: --------------------------------------------
12330: l_debug_info := 'get Number of Cash/Credit Card lines';
12331: --------------------------------------------
12332: if (AP_WEB_DB_EXPLINE_PKG.GetNumCashLinesWOMerch(l_report_header_id, l_co_merchant_count)) then null; end if;
12333:
12334: --------------------------------------------
12335: l_debug_info := 'loop thru Cash/Credit Card lines';
12336: --------------------------------------------
12376:
12377: l_document := l_document || tr_start;
12378:
12379:
12380: IF (AP_WEB_DB_EXPLINE_PKG.AnyPolicyViolation(l_report_header_id)) THEN
12381: l_rules_violated := 'Y';
12382: END IF;
12383:
12384: /* If the profile option is set to APPROVER_ONLY
12435:
12436: --------------------------------------------
12437: l_debug_info := 'Open Expense Lines Cursor';
12438: --------------------------------------------
12439: IF (AP_WEB_DB_EXPLINE_PKG.GetDisplayXpenseLinesCursor(l_report_header_id, l_is_cc_table, XpenseLinesCursor)) THEN
12440:
12441: LOOP
12442:
12443: --------------------------------------------
12726:
12727: --------------------------------------------
12728: l_debug_info := 'get Number of Personal Credit Card lines';
12729: --------------------------------------------
12730: if (AP_WEB_DB_EXPLINE_PKG.GetNumberOfPersonalLines(l_report_header_id, l_num_personal_lines)) then null; end if;
12731:
12732: if (l_num_personal_lines > 0) then
12733:
12734: --------------------------------------------
12751:
12752: --------------------------------------------
12753: l_debug_info := 'Open Personal Lines Cursor';
12754: --------------------------------------------
12755: IF (AP_WEB_DB_EXPLINE_PKG.GetDisplayPersonalLinesCursor(l_report_header_id, PersonalLinesCursor)) THEN
12756:
12757: l_num_lines := 0;
12758: l_cc_personal_total_amt := 0;
12759: LOOP
12842: if (l_show_message = 'N' AND C_BothPay = l_payment) then
12843: --------------------------------------------
12844: l_debug_info := 'get Number of Personal Credit Card lines Both Pay';
12845: --------------------------------------------
12846: if (AP_WEB_DB_EXPLINE_PKG.GetNoOfBothPayPersonalLines(l_report_header_id, l_num_personal_lines)) then null; end if;
12847: if (l_num_personal_lines > 0) then
12848:
12849: --------------------------------------------
12850: l_debug_info := 'Generate Table Header';
12869: ------------------End Of Table Header------------------
12870: --------------------------------------------
12871: l_debug_info := 'Open BothPay Personal Lines Cursor';
12872: --------------------------------------------
12873: IF (AP_WEB_DB_EXPLINE_PKG.GetBothPayPersonalLinesCursor(l_report_header_id, BothPayPersonalLinesCursor)) THEN
12874:
12875: l_num_lines := 0;
12876: l_cc_personal_total_amt := 0;
12877: LOOP
12970: p_funmode IN VARCHAR2,
12971: p_result OUT NOCOPY VARCHAR2) IS
12972: -------------------------------------------------------------------------------
12973: l_debug_info VARCHAR2(200);
12974: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_HeaderID;
12975: l_modified_count NUMBER :=0;
12976: l_new_count NUMBER :=0;
12977: l_mess Wf_Item_Attribute_Values.TEXT_VALUE%TYPE;
12978:
12997: SELECT count(*)
12998: INTO l_modified_count
12999: FROM ap_expense_report_lines xl
13000: WHERE xl.report_header_id = l_report_header_id
13001: AND xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_Modified;
13002:
13003: /* If the system adjusted the mileage rate by adding new lines
13004: and changing the rate in the same report, the notes on the
13005: notification will only display the modified message. Only
13010: SELECT count(*)
13011: INTO l_new_count
13012: FROM ap_expense_report_lines xl
13013: WHERE xl.report_header_id = l_report_header_id
13014: AND (xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_New
13015: OR xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_Split);
13016:
13017: IF (l_new_count > 0 ) THEN
13018: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_MRATE_SPLIT_NOTE');
13011: INTO l_new_count
13012: FROM ap_expense_report_lines xl
13013: WHERE xl.report_header_id = l_report_header_id
13014: AND (xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_New
13015: OR xl.mileage_rate_adjusted_flag = AP_WEB_DB_EXPLINE_PKG.C_Split);
13016:
13017: IF (l_new_count > 0 ) THEN
13018: FND_MESSAGE.SET_NAME('SQLAP','OIE_WF_MRATE_SPLIT_NOTE');
13019: END IF;
13054: p_employee_id IN NUMBER,
13055: p_cumulative_mileage IN NUMBER,
13056: p_schedule_line_array OUT NOCOPY AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array) IS
13057: ---------------------------------------------------------
13058: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
13059: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
13060: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
13061: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13055: p_cumulative_mileage IN NUMBER,
13056: p_schedule_line_array OUT NOCOPY AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array) IS
13057: ---------------------------------------------------------
13058: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
13059: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
13060: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
13061: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13063: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
13056: p_schedule_line_array OUT NOCOPY AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array) IS
13057: ---------------------------------------------------------
13058: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
13059: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
13060: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
13061: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13063: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
13064: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
13057: ---------------------------------------------------------
13058: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
13059: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
13060: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
13061: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13063: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
13064: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
13065: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
13058: l_vehicle_category_code AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_category_code;
13059: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
13060: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
13061: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13063: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
13064: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
13065: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
13066: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
13059: l_vehicle_type AP_WEB_DB_EXPLINE_PKG.expLines_vehicle_type;
13060: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
13061: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13063: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
13064: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
13065: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
13066: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
13067: l_policy_id AP_EXPENSE_REPORT_PARAMS.COMPANY_POLICY_ID%TYPE;
13060: l_fuel_type AP_WEB_DB_EXPLINE_PKG.expLines_fuel_type;
13061: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13063: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
13064: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
13065: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
13066: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
13067: l_policy_id AP_EXPENSE_REPORT_PARAMS.COMPANY_POLICY_ID%TYPE;
13068: l_distance_uom AP_POL_HEADERS.DISTANCE_UOM%TYPE;
13061: l_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13063: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
13064: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
13065: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
13066: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
13067: l_policy_id AP_EXPENSE_REPORT_PARAMS.COMPANY_POLICY_ID%TYPE;
13068: l_distance_uom AP_POL_HEADERS.DISTANCE_UOM%TYPE;
13069: l_employee_role_flag AP_POL_HEADERS.EMPLOYEE_ROLE_FLAG%TYPE;
13062: l_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13063: l_currency_code AP_WEB_DB_EXPLINE_PKG.expLines_currCode;
13064: l_start_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_startExpDate;
13065: l_end_expense_date AP_WEB_DB_EXPLINE_PKG.expLines_endExpDate;
13066: l_web_parameter_iD AP_WEB_DB_EXPLINE_PKG.expLines_webParamID;
13067: l_policy_id AP_EXPENSE_REPORT_PARAMS.COMPANY_POLICY_ID%TYPE;
13068: l_distance_uom AP_POL_HEADERS.DISTANCE_UOM%TYPE;
13069: l_employee_role_flag AP_POL_HEADERS.EMPLOYEE_ROLE_FLAG%TYPE;
13070: l_distance_thresholds_flag AP_POL_HEADERS.DISTANCE_THRESHOLDS_FLAG%TYPE;
13313: -------------------------------------------------------------------------------
13314: FUNCTION getRate(
13315: p_sh_distance_uom IN AP_POL_HEADERS.distance_uom%TYPE,
13316: p_sh_currency_code IN AP_POL_HEADERS.currency_code%TYPE,
13317: p_mileage_line IN AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Rec,
13318: p_schedule_line IN AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Rec)
13319: RETURN NUMBER IS
13320: -------------------------------------------------------------------------------
13321: l_debug_info VARCHAR2(200);
13403:
13404:
13405: -------------------------------------------------------------------------------
13406: PROCEDURE copyMileageArray(
13407: p_from_array IN AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array,
13408: p_to_array OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array) IS
13409: -------------------------------------------------------------------------------
13410: l_debug_info VARCHAR2(200);
13411:
13404:
13405: -------------------------------------------------------------------------------
13406: PROCEDURE copyMileageArray(
13407: p_from_array IN AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array,
13408: p_to_array OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array) IS
13409: -------------------------------------------------------------------------------
13410: l_debug_info VARCHAR2(200);
13411:
13412: BEGIN
13443: p_daily_distance IN AP_EXPENSE_REPORT_LINES.DAILY_DISTANCE%TYPE,
13444: p_rate IN AP_EXPENSE_REPORT_LINES.avg_mileage_rate%TYPE,
13445: p_report_header_id IN AP_EXPENSE_REPORT_LINES.report_header_id%TYPE,
13446: p_from_index IN AP_EXPENSE_REPORT_LINES.distribution_line_number%TYPE,
13447: p_mileage_line_array IN OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array) IS
13448: -------------------------------------------------------------------------------
13449: l_debug_info VARCHAR2(200);
13450:
13451: BEGIN
13463: p_mileage_line_array(p_index).distance_unit_code := p_mileage_line_array(p_from_index).distance_unit_code;
13464: p_mileage_line_array(p_index).amount := p_rate * p_trip_dist;
13465: p_mileage_line_array(p_index).daily_amount := p_rate * p_trip_dist / p_mileage_line_array(p_from_index).number_of_days;
13466: p_mileage_line_array(p_index).copy_From := p_mileage_line_array(p_from_index).orig_dist_line_number;
13467: p_mileage_line_array(p_index).status := AP_WEB_DB_EXPLINE_PKG.C_New;
13468:
13469: EXCEPTION
13470: WHEN OTHERS THEN
13471: AP_WEB_DB_UTIL_PKG.RaiseException('addToMileageArray');
13476: PROCEDURE updateNewDistNumber(
13477: p_index IN NUMBER,
13478: p_last_index IN NUMBER,
13479: p_added_total IN NUMBER,
13480: p_mileage_line_array IN OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array)IS
13481: -------------------------------------------------------------------------------
13482: l_debug_info VARCHAR2(200);
13483: i NUMBER;
13484: BEGIN
13512: p_sh_currency_code IN AP_POL_HEADERS.CURRENCY_CODE%TYPE,
13513: p_schedule_line_array IN AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array,
13514: p_mileage_line_array_count IN OUT NOCOPY NUMBER,
13515: p_cumulative_mileage IN OUT NOCOPY AP_WEB_EMPLOYEE_INFO.NUMERIC_VALUE%TYPE,
13516: p_mileage_line_array IN OUT NOCOPY AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array)IS
13517: --------------------------------------------------------------------------------
13518: l_cumulative_mileage NUMBER := p_cumulative_mileage;
13519: l_ml_trip_distance NUMBER := p_mileage_line_array(p_ml_index).trip_distance;
13520: l_over_amount NUMBER;
13657: p_mileage_line_array(p_ml_index).daily_amount :=
13658: l_new_rate * p_mileage_line_array(p_ml_index).trip_distance / p_mileage_line_array(p_ml_index).number_of_days;
13659: p_mileage_line_array(p_ml_index).new_dist_line_number :=
13660: p_mileage_line_array(p_ml_index).orig_dist_line_number;
13661: p_mileage_line_array(p_ml_index).status := AP_WEB_DB_EXPLINE_PKG.C_Split;
13662:
13663: l_over_threshold_distance := l_cum_distance - nvl(l_range_high, l_cum_distance);
13664:
13665: ELSE
13750: p_actid IN NUMBER,
13751: p_funmode IN VARCHAR2,
13752: p_result OUT NOCOPY VARCHAR2) IS
13753: -------------------------------------------------------------------------------
13754: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
13755: l_ml_start_date DATE;
13756: l_ml_end_date DATE;
13757: l_ml_numberOfDays NUMBER;
13758: l_ml_distribution_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
13754: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
13755: l_ml_start_date DATE;
13756: l_ml_end_date DATE;
13757: l_ml_numberOfDays NUMBER;
13758: l_ml_distribution_line_number AP_WEB_DB_EXPLINE_PKG.expLines_distLineNum;
13759: l_ml_policy_id AP_POL_HEADERS.policy_id%TYPE;
13760: l_cumulative_mileage AP_WEB_EMPLOYEE_INFO.NUMERIC_VALUE%TYPE;
13761: l_period_id AP_WEB_EMPLOYEE_INFO.PERIOD_ID%TYPE;
13762: l_debug_info VARCHAR2(200);
13761: l_period_id AP_WEB_EMPLOYEE_INFO.PERIOD_ID%TYPE;
13762: l_debug_info VARCHAR2(200);
13763: C_WF_VERSION NUMBER := 0;
13764: l_new_rate NUMBER := 0;
13765: l_ml_avg_mileage_rate AP_WEB_DB_EXPLINE_PKG.expLines_avg_mileage_rate;
13766: l_ml_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13767: l_ml_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13768: c_expense_lines_cursor AP_WEB_DB_EXPLINE_PKG.ExpLinesCursor;
13769: l_employee_id NUMBER;
13762: l_debug_info VARCHAR2(200);
13763: C_WF_VERSION NUMBER := 0;
13764: l_new_rate NUMBER := 0;
13765: l_ml_avg_mileage_rate AP_WEB_DB_EXPLINE_PKG.expLines_avg_mileage_rate;
13766: l_ml_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13767: l_ml_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13768: c_expense_lines_cursor AP_WEB_DB_EXPLINE_PKG.ExpLinesCursor;
13769: l_employee_id NUMBER;
13770: l_schedule_line_array AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array;
13763: C_WF_VERSION NUMBER := 0;
13764: l_new_rate NUMBER := 0;
13765: l_ml_avg_mileage_rate AP_WEB_DB_EXPLINE_PKG.expLines_avg_mileage_rate;
13766: l_ml_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13767: l_ml_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13768: c_expense_lines_cursor AP_WEB_DB_EXPLINE_PKG.ExpLinesCursor;
13769: l_employee_id NUMBER;
13770: l_schedule_line_array AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array;
13771: l_temp NUMBER;
13764: l_new_rate NUMBER := 0;
13765: l_ml_avg_mileage_rate AP_WEB_DB_EXPLINE_PKG.expLines_avg_mileage_rate;
13766: l_ml_distance_unit_code AP_WEB_DB_EXPLINE_PKG.expLines_distance_unit_code;
13767: l_ml_trip_distance AP_WEB_DB_EXPLINE_PKG.expLines_trip_distance;
13768: c_expense_lines_cursor AP_WEB_DB_EXPLINE_PKG.ExpLinesCursor;
13769: l_employee_id NUMBER;
13770: l_schedule_line_array AP_WEB_DB_SCHLINE_PKG.Schedule_Line_Array;
13771: l_temp NUMBER;
13772: l_sh_distance_uom AP_POL_HEADERS.distance_uom%TYPE;
13772: l_sh_distance_uom AP_POL_HEADERS.distance_uom%TYPE;
13773: l_sh_currency_code AP_POL_HEADERS.currency_code%TYPE;
13774: l_index NUMBER := 0;
13775: l_lines_created NUMBER := 0;
13776: l_temp_mileage_line_array AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array;
13777: l_mileage_line_array AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array;
13778: l_mileage_array_count NUMBER;
13779: i NUMBER;
13780: j NUMBER := 1;
13773: l_sh_currency_code AP_POL_HEADERS.currency_code%TYPE;
13774: l_index NUMBER := 0;
13775: l_lines_created NUMBER := 0;
13776: l_temp_mileage_line_array AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array;
13777: l_mileage_line_array AP_WEB_DB_EXPLINE_PKG.Mileage_Line_Array;
13778: l_mileage_array_count NUMBER;
13779: i NUMBER;
13780: j NUMBER := 1;
13781: l_orig_distance_travel NUMBER;
13841:
13842: --------------------------------------------
13843: l_debug_info := 'Open Expense Lines Cursor';
13844: --------------------------------------------
13845: IF (AP_WEB_DB_EXPLINE_PKG.GetExpMileageLinesCursor(l_report_header_id, c_expense_lines_cursor)) THEN
13846:
13847: LOOP
13848: --------------------------------------------
13849: l_debug_info := 'Fetch Mileage Lines Cursor';
14060:
14061: l_mileage_line_array(i).new_dist_line_number :=
14062: l_mileage_line_array(i).orig_dist_line_number;
14063:
14064: l_mileage_line_array(i).status := AP_WEB_DB_EXPLINE_PKG.C_Modified;
14065:
14066:
14067: END IF;
14068:
14173: END IF; -- (l_sh_distance_thresholds_flag = 'P')
14174: END IF; -- IF (category_code = 'MILEAGE')
14175: END LOOP;
14176:
14177: AP_WEB_DB_EXPLINE_PKG.updateExpenseMileageLines(l_mileage_line_array, l_bHeaderUpdated);
14178:
14179: -----------------------------------------------------------------------
14180: l_debug_info := 'update display_total item attribute if ap_expense_report_headers has been updated';
14181: -----------------------------------------------------------------------
14281: l_colon NUMBER;
14282: l_itemtype VARCHAR2(7);
14283: l_itemkey VARCHAR2(15);
14284:
14285: l_report_header_id AP_WEB_DB_EXPLINE_PKG.expLines_headerID;
14286: l_debug_info VARCHAR2(2000);
14287: l_msg VARCHAR2(2000);
14288: l_approver_id NUMBER;
14289: l_total NUMBER;
14901:
14902: ----------------------------------------------------------------
14903: l_debug_info := 'Reset adjustment information';
14904: ----------------------------------------------------------------
14905: AP_WEB_DB_EXPLINE_PKG.ResetShortpayAdjustmentInfo(l_report_header_id);
14906:
14907: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'end ResetShortpayAdjustmentInfo');
14908: EXCEPTION
14909: WHEN OTHERS THEN
15466: ------------------------------------------------------------
15467: l_debug_info := 'clear the header/line level return/audit reason/instructions in AERH/AERL';
15468: ------------------------------------------------------------
15469: AP_WEB_DB_EXPRPT_PKG.clearAuditReturnReasonInstr(l_report_header_id);
15470: AP_WEB_DB_EXPLINE_PKG.clearAuditReturnReasonInstr(l_report_header_id);
15471:
15472: ----------------------------------------------------------
15473: l_debug_info := 'clear Item Attribute AUDIT_RETURN_REASON';
15474: ---------------------------------------------------------
15775: l_num_both_personal_lines NUMBER := 0;
15776:
15777: BEGIN
15778:
15779: IF (AP_WEB_DB_EXPLINE_PKG.GetNoOfBothPayPersonalLines(p_report_header_id,l_num_both_personal_lines)) THEN
15780: NULL;
15781: END IF;
15782:
15783: IF l_num_both_personal_lines > 0 THEN
16199: AP_WEB_UTILITIES_PKG.logProcedure('AP_WEB_EXPENSE_WF', 'start AMERequestApproval');
16200:
16201: IF (p_funmode = 'RUN') THEN
16202:
16203: if (AP_WEB_DB_EXPLINE_PKG.GetNoOfBothPayPersonalLines(p_item_key,l_num_personal_lines)) then
16204: null;
16205: end if;
16206:
16207: ----------------------------------------------------------------
17539: 'EXPENSE_REPORT_ID');
17540: SELECT count(*) into l_line_count FROM ap_expense_report_lines
17541: WHERE report_header_id = l_report_header_id;
17542:
17543: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumShortpaidLines(l_report_header_id, l_shortpay_count)) THEN
17544: l_shortpay_count := 0;
17545: END IF;
17546:
17547: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumPolicyShortpaidLines(l_report_header_id, l_policy_count)) THEN
17543: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumShortpaidLines(l_report_header_id, l_shortpay_count)) THEN
17544: l_shortpay_count := 0;
17545: END IF;
17546:
17547: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumPolicyShortpaidLines(l_report_header_id, l_policy_count)) THEN
17548: l_policy_count := 0;
17549: END IF;
17550:
17551: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumOriginalShortpaidLines(l_report_header_id, l_receipts_issue)) THEN
17547: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumPolicyShortpaidLines(l_report_header_id, l_policy_count)) THEN
17548: l_policy_count := 0;
17549: END IF;
17550:
17551: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumOriginalShortpaidLines(l_report_header_id, l_receipts_issue)) THEN
17552: l_receipts_issue := 0;
17553: END IF;
17554:
17555: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumImageShortpaidLines(l_report_header_id, l_img_count)) THEN
17551: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumOriginalShortpaidLines(l_report_header_id, l_receipts_issue)) THEN
17552: l_receipts_issue := 0;
17553: END IF;
17554:
17555: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumImageShortpaidLines(l_report_header_id, l_img_count)) THEN
17556: l_img_count := 0;
17557: END IF;
17558:
17559: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumBothShortpaidLines(l_report_header_id, l_both_count)) THEN
17555: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumImageShortpaidLines(l_report_header_id, l_img_count)) THEN
17556: l_img_count := 0;
17557: END IF;
17558:
17559: IF (NOT AP_WEB_DB_EXPLINE_PKG.GetNumBothShortpaidLines(l_report_header_id, l_both_count)) THEN
17560: l_both_count := 0;
17561: END IF;
17562:
17563: --l_receipts_issue := l_shortpay_count - l_policy_count - l_img_count - l_both_count;