DBA Data[Home] [Help]

APPS.PATC dependencies on PA_TRX_IMPORT

Line 362: ( X_calling_Module = 'PAAPIMP' and Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' ) THEN

358: -- AP, we do not report any error. PAAPIMP is the only module
359: -- which transfers records from AP
360: IF ( X_calling_Module <> 'PAAPIMP')
361: OR -- added this for bug fix :2345895
362: ( X_calling_Module = 'PAAPIMP' and Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' ) THEN
363: print_message('PATC ERROR:'||msg_name);
364: X_status := msg_name;
365: -- Begin bug 4518893
366: If ( nvl(X_msg_type,'W') = 'E' ) THEN

Line 447: IF pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2170237 */

443: FROM pa_organizations_v
444: WHERE organization_id = X_nl_resource_org_id
445: AND X_ei_date between date_from and nvl(date_to,X_ei_date);
446: IF ( dummy = 0 ) THEN
447: IF pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2170237 */
448: return_error('PA_TR_EPE_NLR_ORG_NOT_ACTIVE') ;
449: END IF ; /* Added for Bug # 2170237 */
450: END IF ;
451:

Line 797: ']TC skip Flag:['||Pa_Trx_Import.G_Skip_Tc_Flag||']');

793: X_transfer_ei||']incurred_by_org_id:['||X_incurred_by_org_id||']vendor_id:['||X_vendor_id||
794: ']System linkage:['||P_sys_link_function||'] assignment_id:['||p_assignment_id||
795: ']work_type_id:['||p_work_type_id||']Billable_flag:['||x_billable_flag||']'||
796: 'calling module :['||X_Calling_Module||']Transaction_source:['||X_transaction_source||
797: ']TC skip Flag:['||Pa_Trx_Import.G_Skip_Tc_Flag||']');
798:
799: /** Initialize the transaction controls skip flag for each call
800: * if the calling module is PAAPIMP and transaction source is AP EXPENSE
801: * we should revalidate the transaction at the time of import.and override the

Line 802: * Pa_Trx_Import.G_Skip_Tc_flag **/

798:
799: /** Initialize the transaction controls skip flag for each call
800: * if the calling module is PAAPIMP and transaction source is AP EXPENSE
801: * we should revalidate the transaction at the time of import.and override the
802: * Pa_Trx_Import.G_Skip_Tc_flag **/
803: G_TRX_SKIP_FLAG := nvl(Pa_Trx_Import.G_Skip_Tc_Flag,'N');
804:
805: /* Start: changes for CBS Enhancement: Bug 16220146 */
806: select count(*) into l_task_count

Line 803: G_TRX_SKIP_FLAG := nvl(Pa_Trx_Import.G_Skip_Tc_Flag,'N');

799: /** Initialize the transaction controls skip flag for each call
800: * if the calling module is PAAPIMP and transaction source is AP EXPENSE
801: * we should revalidate the transaction at the time of import.and override the
802: * Pa_Trx_Import.G_Skip_Tc_flag **/
803: G_TRX_SKIP_FLAG := nvl(Pa_Trx_Import.G_Skip_Tc_Flag,'N');
804:
805: /* Start: changes for CBS Enhancement: Bug 16220146 */
806: select count(*) into l_task_count
807: from pa_tasks

Line 922: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;

918: ELSE
919: X_billable_flag := NVL(temp_bill_flag,'N');
920: END IF;
921:
922: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;
923: --}
924: ELSE --End of changes for bug#13803367
925: --{
926:

Line 939: /* print_message('Overriding the Pa_Trx_Import.G_Skip_Tc_Flag ');

935: ,x_return_string => l_return_string );
936: If l_return_string = 'VI,ER,' or l_return_string = 'ER,VI,' then Bug# 2955795*/
937: /*
938: If p_sys_link_function ='ER' Then Bug# 2955795*/
939: /* print_message('Overriding the Pa_Trx_Import.G_Skip_Tc_Flag ');
940: Pa_Trx_Import.G_Skip_Tc_Flag := 'N';
941: End if;
942: End If;
943: Ends- Commented the following code to override the skip tc flag for bug 4549869 */

Line 940: Pa_Trx_Import.G_Skip_Tc_Flag := 'N';

936: If l_return_string = 'VI,ER,' or l_return_string = 'ER,VI,' then Bug# 2955795*/
937: /*
938: If p_sys_link_function ='ER' Then Bug# 2955795*/
939: /* print_message('Overriding the Pa_Trx_Import.G_Skip_Tc_Flag ');
940: Pa_Trx_Import.G_Skip_Tc_Flag := 'N';
941: End if;
942: End If;
943: Ends- Commented the following code to override the skip tc flag for bug 4549869 */
944: X_msg_type := 'E'; -- Initiliaze Error/Warning indicator parameter.

Line 1031: /*Bug 2726763: Since the check to see if project is chargeable is done in pa_trx_import

1027:
1028: END IF;
1029: /*Bug# 2188422*/
1030:
1031: /*Bug 2726763: Since the check to see if project is chargeable is done in pa_trx_import
1032: -- only if the transaction source's skip_tc_validation_flag is 'N', we have
1033: -- to add the check here for calling module 'APXIIMPT'. For all other calling
1034: -- modules the check will be performed when selecting the project from the
1035: -- form's LOV */

Line 1053: -- * pa_trx_import.g_skip_tc_flag <> 'Y' then -- code added for Bug 1299910

1049: -- * project status is not 'CLOSED'
1050: -- * task is chargeable
1051: -- * item date is between start and end dates of project/task
1052: -- * Made changes in the call of Return Error Based on the global Parameter
1053: -- * pa_trx_import.g_skip_tc_flag <> 'Y' then -- code added for Bug 1299910
1054:
1055: OPEN project_info;
1056:
1057: FETCH project_info INTO proj;

Line 1069: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1065: -- Calling Modules.
1066: print_message('Stage:PATC:10.10.004');
1067: IF ( project_info%ROWCOUNT = 0 ) THEN -- Project/Task combination is
1068: -- not valid
1069: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1070: print_message('Stage:PATC:10.10.005');
1071: return_error( 'PA_EXP_INV_PJTK' );
1072: End If;
1073:

Line 1077: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1073:
1074: ELSIF ( proj.p_template_flag = 'Y' ) THEN -- Checks if it is a
1075: -- template project
1076:
1077: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1078: print_message('Stage:PATC:10.10.006');
1079: return_error( 'PA_EX_TEMPLATE_PROJECT');
1080: End If;
1081:

Line 1086: AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN

1082: -- BUG: 4600792 PQE:R12 CHANGE AWARD END WHEN ENCUMBRANCE EXISTS, IMPORT ENC REVERSALS FOR CLOSE
1083: --
1084: /* Added trunc() for bug#5999555 */
1085: ELSIF ( trunc(X_ei_date) NOT BETWEEN trunc(proj.p_start_date) AND trunc(proj.p_end_date) )
1086: AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN
1087:
1088: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1089: print_message('Stage:PATC:10.10.007');
1090: return_error( 'PA_EX_PROJECT_DATE' );

Line 1088: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1084: /* Added trunc() for bug#5999555 */
1085: ELSIF ( trunc(X_ei_date) NOT BETWEEN trunc(proj.p_start_date) AND trunc(proj.p_end_date) )
1086: AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN
1087:
1088: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1089: print_message('Stage:PATC:10.10.007');
1090: return_error( 'PA_EX_PROJECT_DATE' );
1091: End If;
1092:

Line 1095: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1091: End If;
1092:
1093: ELSIF (PA_PROJECT_UTILS.Check_prj_stus_action_allowed(proj.project_status_code,'NEW_TXNS') = 'N' ) THEN
1094:
1095: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1096: print_message('Stage:PATC:10.10.008');
1097: return_error( 'PA_NEW_TXNS_NOT_ALLOWED' );
1098: End If;
1099:

Line 1102: -- ELSIF ( X_ei_date NOT BETWEEN proj.t_start_date AND proj.t_end_date ) AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN

1098: End If;
1099:
1100: -- BUG: 4600792 PQE:R12 CHANGE AWARD END WHEN ENCUMBRANCE EXISTS, IMPORT ENC REVERSALS FOR CLOSE
1101: --
1102: -- ELSIF ( X_ei_date NOT BETWEEN proj.t_start_date AND proj.t_end_date ) AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN
1103: ELSIF ( trunc(X_ei_date) NOT BETWEEN trunc(proj.t_start_date) AND trunc(proj.t_end_date) ) AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN /* For bug 10628175 */
1104: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1105: print_message('Stage:PATC:10.10.009');
1106: return_error( 'PA_EXP_TASK_EFF' );

Line 1103: ELSIF ( trunc(X_ei_date) NOT BETWEEN trunc(proj.t_start_date) AND trunc(proj.t_end_date) ) AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN /* For bug 10628175 */

1099:
1100: -- BUG: 4600792 PQE:R12 CHANGE AWARD END WHEN ENCUMBRANCE EXISTS, IMPORT ENC REVERSALS FOR CLOSE
1101: --
1102: -- ELSIF ( X_ei_date NOT BETWEEN proj.t_start_date AND proj.t_end_date ) AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN
1103: ELSIF ( trunc(X_ei_date) NOT BETWEEN trunc(proj.t_start_date) AND trunc(proj.t_end_date) ) AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN /* For bug 10628175 */
1104: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1105: print_message('Stage:PATC:10.10.009');
1106: return_error( 'PA_EXP_TASK_EFF' );
1107: End If;

Line 1104: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1100: -- BUG: 4600792 PQE:R12 CHANGE AWARD END WHEN ENCUMBRANCE EXISTS, IMPORT ENC REVERSALS FOR CLOSE
1101: --
1102: -- ELSIF ( X_ei_date NOT BETWEEN proj.t_start_date AND proj.t_end_date ) AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN
1103: ELSIF ( trunc(X_ei_date) NOT BETWEEN trunc(proj.t_start_date) AND trunc(proj.t_end_date) ) AND PA_TRX_IMPORT.Get_GVal_ProjTskEi_Date ='Y' THEN /* For bug 10628175 */
1104: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1105: print_message('Stage:PATC:10.10.009');
1106: return_error( 'PA_EXP_TASK_EFF' );
1107: End If;
1108:

Line 1111: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1107: End If;
1108:
1109: ELSIF ( proj.t_chargeable_flag = 'N' ) THEN
1110:
1111: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1112: print_message('Stage:PATC:10.10.010');
1113: return_error( 'PA_EXP_TASK_STATUS' );
1114: End If;
1115:

Line 1116: ELSIF (Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y') Then

1112: print_message('Stage:PATC:10.10.010');
1113: return_error( 'PA_EXP_TASK_STATUS' );
1114: End If;
1115:
1116: ELSIF (Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y') Then
1117:
1118: print_message('Calling Check_fin_Task_published');
1119: PA_PROJ_ELEMENTS_UTILS.Check_Fin_Task_Published(
1120: p_project_id => x_project_id

Line 1179: PA_TRX_IMPORT.Set_GVal_ProjTskEi_Date('Y');

1175: -- BUG: 4600792 PQE:R12 CHANGE AWARD END WHEN ENCUMBRANCE EXISTS, IMPORT ENC REVERSALS FOR CLOSE
1176: --
1177: -- Commneted resetting this global variable for bug 10078729/6050441
1178: /* Initializing the value -- Bug4138033
1179: PA_TRX_IMPORT.Set_GVal_ProjTskEi_Date('Y');
1180: End Bug# 4138033 */
1181:
1182: -- If item passes basic validation, then validate the item against all
1183: -- applicable task-level transaction controls

Line 1404: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1400: -- Added x_person_id parameter to function call for bug 4585740
1401: /* Added x_person_id is NULL condition below for bug 8290672 */
1402: If ((x_person_id is NULL) OR (check_person_level_TCs(p_sys_link_function, x_project_id, l_task_id,x_person_id))) THEN -- added for bug 2939224/bug 4912880 added x_person_id to call -- Replaced X_task_id with l_task_id for bug 16220146
1403:
1404: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1405: print_message('Stage:PATC:10.11.002');
1406:
1407: -- Added following block for CWk changes bug# 5948324
1408: if l_person_Type = 'CWK' Then

Line 1437: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1433: -- Added x_person_id parameter to function call for bug 4585740
1434: /* Added x_person_id is NULL condition below for bug 8290672 */
1435: IF ((x_person_id is NULL) OR (check_person_level_TCs(p_sys_link_function, x_project_id,x_person_id))) THEN -- added for bug 2939224/bug 4912880 added x_person_id to call
1436:
1437: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1438: print_message('Stage:PATC:10.11.003');
1439: return_error( 'PA_EXP_PJ_TC' );
1440: End If;
1441:

Line 1460: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1456: -- a transaction control at task level.
1457:
1458: IF ( proj.t_limit_flag = 'Y' AND tc.task_id is NULL ) THEN
1459:
1460: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1461:
1462: print_message('Stage:PATC:10.12.002');
1463: -- Begin CWK/FP_M changes
1464: /* IF p_sys_link_function not in ('USG', 'PJ') THEN --Bug 4266933*//*Commented for Bug 5735180*/

Line 1525: ( x_calling_module <> 'PAAPIMP' and Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' ) Then

1521:
1522: IF p_sys_link_function in ('ST','OT','ER') THEN
1523:
1524: IF ( x_calling_module = 'PAAPIMP' and x_transaction_source = 'AP EXPENSE') OR
1525: ( x_calling_module <> 'PAAPIMP' and Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' ) Then
1526:
1527: print_message('Stage:PATC:10.12.003.1');
1528: l_check_pjrm_tc_flag := 'Y';
1529:

Line 1554: ELSIF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' then

1550:
1551: print_message('Stage:PATC:10.12.003.3');
1552: l_check_pjrm_tc_flag := 'Y';
1553:
1554: ELSIF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' then
1555:
1556: print_message('Stage:PATC:10.12.003.4');
1557: l_check_pjrm_tc_flag := 'N';
1558:

Line 1617: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added for bug 4549869 */

1613:
1614: -- Begin bug 4068808
1615: If ((proj.p_limit_flag = 'Y' and level_flag_local = 'P') or (proj.t_limit_flag = 'Y' and level_flag_local = 'T')) Then
1616:
1617: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added for bug 4549869 */
1618:
1619: -- If P_Person_Type = 'CWK' and Tc.Employees_Only_flag = 'Y' Then
1620: If l_Person_Type = 'CWK' and Tc.Employees_Only_flag = 'E' Then
1621:

Line 1650: If Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added for bug 4549869 */

1646: End If; /* Added for bug 4549869 */
1647:
1648: ElsIf ((proj.p_limit_flag = 'N' and level_flag_local = 'P') or (proj.t_limit_flag = 'N' and level_flag_local = 'T')) Then
1649:
1650: If Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added for bug 4549869 */
1651:
1652: If l_Person_Type = 'CWK' and (tc.Employees_Only_Flag = 'C' or tc.Employees_Only_flag is Null) Then
1653:
1654: If tc.chargeable_flag = 'N' Then -- Added for Bug#4549448

Line 1708: End If; -- Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' /* Added for bug 4549869 */

1704: End If;
1705: -- End, added the following block for bug 4556126
1706: End If;
1707:
1708: End If; -- Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' /* Added for bug 4549869 */
1709:
1710: Else
1711:
1712: print_message('Stage:PATC:10.12.004.2');

Line 1723: If Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added for bug 4549869 */

1719: l_Person_Type = 'CWK' And
1720: P_Sys_Link_Function in ('ST','OT') And
1721: P_PO_Line_Id Is Not Null Then
1722:
1723: If Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added for bug 4549869 */
1724:
1725: Print_Message('Stage:PATC:10.12.004.3');
1726: X_Status := 'PA_CWK_TC_NOT_ALLOWED';
1727: X_Billable_Flag := NULL;

Line 1774: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added for bug 4549869 */

1770: /** End PA.M/Task Assignment changes **/
1771:
1772: If ((proj.p_limit_flag = 'Y' and level_flag_local = 'P') or (proj.t_limit_flag = 'Y' and level_flag_local = 'T')) Then
1773:
1774: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added for bug 4549869 */
1775:
1776: IF tc.chargeable_flag = 'N' THEN
1777:
1778: IF level_flag_local = 'T' THEN

Line 1780: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1776: IF tc.chargeable_flag = 'N' THEN
1777:
1778: IF level_flag_local = 'T' THEN
1779:
1780: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1781:
1782: print_message('Stage:PATC:10.12.005');
1783: return_error( 'PA_EXP_TASK_TC' );
1784:

Line 1790: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1786:
1787: END IF ;
1788: IF level_flag_local = 'P' THEN
1789:
1790: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1791: print_message('Stage:PATC:10.12.006');
1792: return_error( 'PA_EXP_PJ_TC' );
1793: End If;
1794: END IF ;

Line 1807: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1803: IF level_flag = 'T' AND
1804: tc.task_id is NOT NULL AND
1805: tc.chargeable_flag = 'N' THEN
1806:
1807: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1808: print_message('Stage:PATC:10.12.008');
1809: return_error( 'PA_EXP_TASK_TC' );
1810: End If;
1811: /* Start changes for Bug#12714789 */

Line 1819: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */

1815: END IF ;
1816: IF level_flag = 'P' AND
1817: tc.chargeable_flag = 'N' THEN
1818:
1819: IF Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y' Then /* Added If Condition for bug 1299909 */
1820: print_message('Stage:PATC:10.12.009');
1821: return_error( 'PA_EXP_PJ_TC' );
1822: End If;
1823: /* Start changes for Bug#12714789 */

Line 1914: IF pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2170237 */

1910:
1911: -- Bug 570709. To add the expenditure org validation for transactions
1912: IF X_incurred_by_org_id is NOT NULL THEN
1913:
1914: IF pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2170237 */
1915:
1916: /* Enhancement request BUG12801896 changes STARTS here */
1917: /*IF pa_utils2.CheckExporg(X_incurred_by_org_id,X_ei_date) = 'N' then
1918:

Line 1959: IF pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2170237 */

1955: print_message('Stage:PATC:10.12.012');
1956: return_error( 'NO_ASSIGNMENT');
1957: END IF;
1958:
1959: IF pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2170237 */
1960:
1961: IF pa_utils2.CheckExporg(X_org_id,X_ei_date) = 'N' then
1962: print_message('Stage:PATC:10.12.013');
1963: return_error( 'PA_EXP_ORG_NOT_ACTIVE');

Line 2089: If pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2108456

2085:
2086: /* Bug 7685120 Move the following code to the point where we have set the Global variables for work type in PATC
2087: IF ( temp_status IS NOT NULL ) THEN
2088:
2089: If pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2108456
2090:
2091: print_message('Stage:PATC:10.13.002');
2092: X_msg_type := temp_msg_type;
2093: X_msg_count := temp_msg_count;

Line 2264: If pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2108456 */

2260: End If; --Bug 3017533
2261: /*Start of changes for Bug 7685120 */
2262: IF ( temp_status IS NOT NULL ) THEN
2263:
2264: If pa_trx_import.g_skip_tc_flag <> 'Y' then /* Added for Bug # 2108456 */
2265:
2266: print_message('Stage:PATC:10.13.002');
2267: X_msg_type := temp_msg_type;
2268: X_msg_count := temp_msg_count;

Line 2289: If pa_trx_import.g_skip_tc_flag <> 'Y' then

2285: ']override assn:['||PATC.G_OVERIDE_ASSIGNMENT_ID||']x_status ['||x_status||']');
2286:
2287: -- Begin PA.L Retirement Cost Processing changes
2288: print_message('Stage:PATC:10.14.00: Check capitalizable_flag against retirement_cost_flag');
2289: If pa_trx_import.g_skip_tc_flag <> 'Y' then
2290:
2291: If proj.p_proj_typ_class_code = 'CAPITAL' and
2292: proj.t_ret_cost_flag = 'Y' and
2293: x_billable_flag = 'Y' then

Line 2305: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;

2301: -- End PA.L Retirement Cost Processing changes
2302:
2303: print_message('END of GET_STATUS API ');
2304:
2305: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;
2306: --}
2307: END IF;--Added for bug#13803367
2308: EXCEPTION
2309: WHEN INVALID_DATA THEN

Line 2310: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;

2306: --}
2307: END IF;--Added for bug#13803367
2308: EXCEPTION
2309: WHEN INVALID_DATA THEN
2310: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;
2311: NULL;
2312: WHEN OTHERS THEN
2313: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;
2314: X_status := SQLCODE;

Line 2313: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;

2309: WHEN INVALID_DATA THEN
2310: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;
2311: NULL;
2312: WHEN OTHERS THEN
2313: Pa_Trx_Import.G_Skip_Tc_Flag := G_TRX_SKIP_FLAG;
2314: X_status := SQLCODE;
2315: X_billable_flag := NULL;
2316: print_message('Failed in GET_PATC api sqlerror:'||X_status);
2317: