eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PATC dependencies on PATC

Line 1: PACKAGE BODY PATC AS

1: PACKAGE BODY PATC AS
2: /* $Header: PAXTTXCB.pls 120.43.12020000.6 2013/03/31 08:19:34 arbandyo ship $ */
3:
4: temp_status VARCHAR2(30) := NULL;
5: temp_bill_flag VARCHAR2(1) := NULL;

Line 341: patcx_bill_flag VARCHAR2(1);

337: tc task_level_tc%ROWTYPE;
338:
339: proj project_info%ROWTYPE;
340:
341: patcx_bill_flag VARCHAR2(1);
342:
343: X_org_id NUMBER(15) DEFAULT NULL;
344: l_calling_module Varchar2(20); --Added for bug#13803367
345:

Line 363: print_message('PATC ERROR:'||msg_name);

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
367: X_billable_flag := NULL;

Line 787: PATC.G_OVERIDE_ASSIGNMENT_ID := p_assignment_id;

783:
784: /* End changes for bug#12597910 */
785:
786: /** assign the in param assignment id to global variable **/
787: PATC.G_OVERIDE_ASSIGNMENT_ID := p_assignment_id;
788: print_message('Stage:PATC:10.10.001 GET_STATUS API');
789: print_message('IN PARAMS : Project_id:['||X_project_id||'] Task_id :['||X_task_id||'] EI_date:['||X_ei_date||
790: ']Exp Type:['||X_expenditure_type||'] non_labor_resource:['||X_non_labor_resource||']'||
791: 'person_id:['||X_person_id||']quantity:['||X_quantity||']denom_currency_code:['||

Line 788: print_message('Stage:PATC:10.10.001 GET_STATUS API');

784: /* End changes for bug#12597910 */
785:
786: /** assign the in param assignment id to global variable **/
787: PATC.G_OVERIDE_ASSIGNMENT_ID := p_assignment_id;
788: print_message('Stage:PATC:10.10.001 GET_STATUS API');
789: print_message('IN PARAMS : Project_id:['||X_project_id||'] Task_id :['||X_task_id||'] EI_date:['||X_ei_date||
790: ']Exp Type:['||X_expenditure_type||'] non_labor_resource:['||X_non_labor_resource||']'||
791: 'person_id:['||X_person_id||']quantity:['||X_quantity||']denom_currency_code:['||
792: X_denom_currency_code||']acct_currency_code:['||X_acct_currency_code||']transfer_ei:['||

Line 835: patcx.tc_extension(

831:
832: l_calling_module := 'PAXVOTCB';
833:
834:
835: patcx.tc_extension(
836: X_project_id => X_project_id
837: , X_task_id => l_task_id -- Replaced X_task_id with l_task_id for bug 16220146
838: , X_expenditure_item_date => X_ei_date
839: , X_expenditure_type => X_expenditure_type

Line 874: , X_billable_flag => patcx_bill_flag

870: , X_attribute13 => X_attribute13
871: , X_attribute14 => X_attribute14
872: , X_attribute15 => X_attribute15
873: , X_msg_application => X_msg_application
874: , X_billable_flag => patcx_bill_flag
875: , X_msg_type => temp_msg_type
876: , X_msg_token1 => temp_msg_token1
877: , X_msg_token2 => temp_msg_token2
878: , X_msg_token3 => temp_msg_token3

Line 885: , x_assignment_id => PATC.G_OVERIDE_ASSIGNMENT_ID

881: , p_projfunc_currency_code => p_projfunc_currency_code
882: , p_projfunc_cost_rate_type => p_projfunc_cost_rate_type
883: , p_projfunc_cost_rate_date => p_projfunc_cost_rate_date
884: , p_projfunc_cost_exchg_rate => p_projfunc_cost_exchg_rate
885: , x_assignment_id => PATC.G_OVERIDE_ASSIGNMENT_ID
886: , p_work_type_id => p_work_type_id
887: , p_sys_link_function => p_sys_link_function
888: , P_Po_Header_Id => P_Po_Header_Id
889: , P_Po_Line_Id => P_Po_Line_Id

Line 916: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN

912: , P_pa_ref_var8 => P_pa_ref_var8
913: , P_pa_ref_var9 => P_pa_ref_var9
914: , P_pa_ref_var10 => P_pa_ref_var10 );
915:
916: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN
917: X_billable_flag := patcx_bill_flag;
918: ELSE
919: X_billable_flag := NVL(temp_bill_flag,'N');
920: END IF;

Line 917: X_billable_flag := patcx_bill_flag;

913: , P_pa_ref_var9 => P_pa_ref_var9
914: , P_pa_ref_var10 => P_pa_ref_var10 );
915:
916: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN
917: X_billable_flag := patcx_bill_flag;
918: ELSE
919: X_billable_flag := NVL(temp_bill_flag,'N');
920: END IF;
921:

Line 953: print_message('Stage:PATC:10.10.002');

949: IF ( (X_Calling_Module not in ('PAXPRRPE', 'PAXINADI')) AND
950: (substr(X_Calling_Module, 1, 2) <> 'PO' )) THEN
951:
952: -- No Need to do quanitity checks for calls from GUI Forms
953: print_message('Stage:PATC:10.10.002');
954: IF P_sys_link_function = 'VI' THEN
955: check_quantity;
956: END IF;
957: END IF;

Line 962: print_message('Stage:PATC:10.10.02.5');

958:
959: /* Bug# 3494771 : If calling module is from IProcurement then we need to
960: validate expenditure type maually entered by user */
961: IF X_Calling_Module ='POWEBREQ' THEN
962: print_message('Stage:PATC:10.10.02.5');
963: check_exp_type;
964: END IF;
965: /*End of changes for Bug# 3494771*/
966:

Line 974: print_message('Stage:PATC:10.10.003');

970: -- tc_extension so that client controls and TC are not ignored
971:
972: IF X_Calling_Module <> 'CreateRelatedItem' THEN
973:
974: print_message('Stage:PATC:10.10.003');
975:
976: IF (nvl(G_PREV_EI_DATE,trunc(sysdate-100000)) <> X_ei_date OR nvl(G_PREV_EXP_TYPE,'NO EXP TYPE') <> X_expenditure_type) THEN
977:
978: G_PREV_EI_DATE := X_ei_date;

Line 1018: print_message('Stage:PATC:10.10.003.1');

1014: /** added 'APXIIMPT','apiimptb.pls' for payable import process bug fix : 2467454**/
1015: /** Added SelfService for validation during Self Service Expense Report Entry. 2971043 **/
1016: IF x_calling_module in ('APXINENT','apiindib.pls','apiimptb.pls','APXIIMPT','SelfService') THEN
1017:
1018: print_message('Stage:PATC:10.10.003.1');
1019: check_person_id ; /*2955795*/
1020:
1021: /*If ( l_return_string = 'VI,ER,' or l_return_string = 'ER,VI,'
1022: or l_return_string = 'VI,') then

Line 1023: print_message('Stage:PATC:Setting the l_sys_link_func to VI');

1019: check_person_id ; /*2955795*/
1020:
1021: /*If ( l_return_string = 'VI,ER,' or l_return_string = 'ER,VI,'
1022: or l_return_string = 'VI,') then
1023: print_message('Stage:PATC:Setting the l_sys_link_func to VI');
1024: l_sys_link_func := 'VI';
1025: End if;
1026: :Bug# 2955795 :Setting of l_sys_link_func is not required now */
1027:

Line 1066: print_message('Stage:PATC:10.10.004');

1062: IF X_Calling_Module not in ('PAXPRRPE', 'PAXINADI','CreateRelatedItem') THEN
1063: -- Project level and task level checks are not required
1064: -- because as they are validated in the GUI forms for these
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');

Line 1070: print_message('Stage:PATC:10.10.005');

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:
1074: ELSIF ( proj.p_template_flag = 'Y' ) THEN -- Checks if it is a

Line 1078: print_message('Stage:PATC:10.10.006');

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:
1082: -- BUG: 4600792 PQE:R12 CHANGE AWARD END WHEN ENCUMBRANCE EXISTS, IMPORT ENC REVERSALS FOR CLOSE

Line 1089: print_message('Stage:PATC:10.10.007');

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:
1093: ELSIF (PA_PROJECT_UTILS.Check_prj_stus_action_allowed(proj.project_status_code,'NEW_TXNS') = 'N' ) THEN

Line 1096: print_message('Stage:PATC:10.10.008');

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:
1100: -- BUG: 4600792 PQE:R12 CHANGE AWARD END WHEN ENCUMBRANCE EXISTS, IMPORT ENC REVERSALS FOR CLOSE

Line 1105: print_message('Stage:PATC:10.10.009');

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:
1109: ELSIF ( proj.t_chargeable_flag = 'N' ) THEN

Line 1112: print_message('Stage:PATC:10.10.010');

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:
1116: ELSIF (Pa_Trx_Import.G_Skip_Tc_Flag <> 'Y') Then

Line 1246: patc.check_termination (X_person_id, x_ei_date, l_ac_termination_date);

1242: IF p_sys_link_function = 'VI' THEN
1243: null;
1244: ELSE
1245: /*changes for bug 10271889 start*/
1246: patc.check_termination (X_person_id, x_ei_date, l_ac_termination_date);
1247:
1248: /* Start changes for bug#13709322 */
1249:
1250: IF (l_ac_termination_date IS NULL) THEN

Line 1252: patc.check_termination_for_cwk(X_person_id, x_ei_date,

1248: /* Start changes for bug#13709322 */
1249:
1250: IF (l_ac_termination_date IS NULL) THEN
1251: --{
1252: patc.check_termination_for_cwk(X_person_id, x_ei_date,
1253: l_ac_termination_date);
1254:
1255: IF (l_ac_termination_date IS NOT NULL) THEN
1256: --{

Line 1393: print_message('Stage:PATC:10.11.001');

1389: ---******** Selva Code starts
1390:
1391: IF task_level_tc%NOTFOUND THEN
1392:
1393: print_message('Stage:PATC:10.11.001');
1394:
1395: IF proj.t_limit_flag = 'Y' THEN
1396:
1397: /* Commented for bug 2939224

Line 1405: print_message('Stage:PATC:10.11.002');

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
1409: return_error('PA_CWK_TXN_NOT_ALLOWED');

Line 1438: print_message('Stage:PATC:10.11.003');

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:
1442: END IF;

Line 1448: print_message('Stage:PATC:10.12.001');

1444: END IF ;
1445:
1446: ELSE -- task_level_tc found
1447:
1448: print_message('Stage:PATC:10.12.001');
1449: print_message('Transaction contol record:task_id['||tc.task_id||
1450: ']person_id['||tc.person_id||']exp_cat['||tc.expenditure_category||
1451: ']exp_type['||tc.expenditure_type||']non_lab_res['||tc.non_labor_resource||
1452: ']charge_flag['||tc.chargeable_flag||']bill_flag['||tc.billable_indicator||

Line 1462: print_message('Stage:PATC:10.12.002');

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*/
1465:
1466:

Line 1527: print_message('Stage:PATC:10.12.003.1');

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:
1530: END IF;
1531: /** added 'APXIIMPT','apiimptb.pls' for bug fix : 2467454 **/

Line 1537: print_message('Stage:PATC:10.12.003.2');

1533: /** Based on the expenditure_type derive the system linkage function
1534: * IF expenditure_type is part of ER,VI the display warning
1535: * else raise error **/
1536:
1537: print_message('Stage:PATC:10.12.003.2');
1538: /*This is not required now since we have p_sys_link_function now that contains
1539: store 'ER'/'VI' for Expense Report/Supplier Invoice
1540: check_person_id(p_mode => 'SYS_LINK_CHECK'
1541: ,x_return_string => l_return_string ); Bug# 2955795*/

Line 1551: print_message('Stage:PATC:10.12.003.3');

1547: End if;
1548:
1549: ELSIF ( x_calling_module IN ('SelfService','PAXVSSTS','PAXVOTCB')) 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:

Line 1556: print_message('Stage:PATC:10.12.003.4');

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:
1559: END IF;
1560:

Line 1564: print_message('Stage:PATC:10.12.003.5');

1560:
1561: /* Bug 4092732
1562: ELSE -- prm is not installed
1563:
1564: print_message('Stage:PATC:10.12.003.5');
1565: l_check_pjrm_tc_flag := 'N';
1566: PATC.G_OVERIDE_ASSIGNMENT_ID := p_assignment_id;
1567:
1568: END If;

Line 1566: PATC.G_OVERIDE_ASSIGNMENT_ID := p_assignment_id;

1562: ELSE -- prm is not installed
1563:
1564: print_message('Stage:PATC:10.12.003.5');
1565: l_check_pjrm_tc_flag := 'N';
1566: PATC.G_OVERIDE_ASSIGNMENT_ID := p_assignment_id;
1567:
1568: END If;
1569: */
1570: Temp_allow_unscheduled_exp := nvl(tc.SCHEDULED_EXP_ONLY,'N') ;

Line 1573: print_message('Stage:PATC:10.12.003.6');

1569: */
1570: Temp_allow_unscheduled_exp := nvl(tc.SCHEDULED_EXP_ONLY,'N') ;
1571: IF ( p_assignment_id is NULL and x_person_id is NOT NULL and l_check_pjrm_tc_flag = 'Y') Then
1572:
1573: print_message('Stage:PATC:10.12.003.6');
1574: temp_assignment_id := PA_UTILS4.get_assignment_id
1575: (p_person_id => x_person_id
1576: ,p_project_id => x_project_id
1577: ,p_task_id => l_task_id -- Replaced X_task_id with l_task_id for bug 16220146

Line 1581: print_message('Stage:PATC:10.12.003.7');

1577: ,p_task_id => l_task_id -- Replaced X_task_id with l_task_id for bug 16220146
1578: ,p_ei_date => x_ei_date );
1579: Else
1580:
1581: print_message('Stage:PATC:10.12.003.7');
1582: temp_assignment_id := p_assignment_id;
1583:
1584: End If;
1585:

Line 1595: Print_Message('Stage:PATC:10.12.003.8');

1591: ']project_limit_flag['||proj.p_limit_flag||']' );
1592:
1593: If (nvl(temp_assignment_id,0) = 0 and l_check_pjrm_tc_flag = 'Y' and nvl(tc.SCHEDULED_EXP_ONLY,'N') = 'Y' ) then
1594:
1595: Print_Message('Stage:PATC:10.12.003.8');
1596: -- Bug 7715496 Changed message to PA_PJR_NO_ASSIGNMENT
1597: X_status := 'PA_PJR_NO_ASSIGNMENT'; -- Bug#3442186 Changed status from PA_INVALID_ASSIGNMENT
1598: X_Billable_Flag := NULL;
1599: Print_Message('PATC ERROR: ' || X_status);

Line 1599: Print_Message('PATC ERROR: ' || X_status);

1595: Print_Message('Stage:PATC:10.12.003.8');
1596: -- Bug 7715496 Changed message to PA_PJR_NO_ASSIGNMENT
1597: X_status := 'PA_PJR_NO_ASSIGNMENT'; -- Bug#3442186 Changed status from PA_INVALID_ASSIGNMENT
1598: X_Billable_Flag := NULL;
1599: Print_Message('PATC ERROR: ' || X_status);
1600: RAISE INVALID_DATA;
1601:
1602: Else
1603:

Line 1604: Print_Message('Stage:PATC:10.12.003.9');

1600: RAISE INVALID_DATA;
1601:
1602: Else
1603:
1604: Print_Message('Stage:PATC:10.12.003.9');
1605: PATC.G_OVERIDE_ASSIGNMENT_ID := temp_assignment_id;
1606:
1607: End if; -- PA_NO_ASSIGNMENT
1608:

Line 1605: PATC.G_OVERIDE_ASSIGNMENT_ID := temp_assignment_id;

1601:
1602: Else
1603:
1604: Print_Message('Stage:PATC:10.12.003.9');
1605: PATC.G_OVERIDE_ASSIGNMENT_ID := temp_assignment_id;
1606:
1607: End if; -- PA_NO_ASSIGNMENT
1608:
1609: /** End of PJRM changes **/

Line 1622: Print_Message('Stage:PATC:10.12.004.1a');

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:
1622: Print_Message('Stage:PATC:10.12.004.1a');
1623: X_Status := 'PA_CWK_TXN_NOT_ALLOWED';
1624: X_Billable_Flag := NULL;
1625: Print_Message('PATC ERROR: ' || X_status);
1626: RAISE INVALID_DATA;

Line 1625: Print_Message('PATC ERROR: ' || X_status);

1621:
1622: Print_Message('Stage:PATC:10.12.004.1a');
1623: X_Status := 'PA_CWK_TXN_NOT_ALLOWED';
1624: X_Billable_Flag := NULL;
1625: Print_Message('PATC ERROR: ' || X_status);
1626: RAISE INVALID_DATA;
1627:
1628: ElsIf l_Person_Type = 'EMP' and Tc.Employees_Only_flag = 'C' Then
1629:

Line 1630: Print_Message('Stage:PATC:10.12.004.1b');

1626: RAISE INVALID_DATA;
1627:
1628: ElsIf l_Person_Type = 'EMP' and Tc.Employees_Only_flag = 'C' Then
1629:
1630: Print_Message('Stage:PATC:10.12.004.1b');
1631: If level_flag_local = 'P' Then
1632: X_Status := 'PA_TR_EPE_PROJ_TXN_CTRLS';
1633: Else
1634: X_Status := 'PA_TR_EPE_TASK_TXN_CTRLS';

Line 1637: Print_Message('PATC ERROR: ' || X_status);

1633: Else
1634: X_Status := 'PA_TR_EPE_TASK_TXN_CTRLS';
1635: End If;
1636: X_Billable_Flag := NULL;
1637: Print_Message('PATC ERROR: ' || X_status);
1638: RAISE INVALID_DATA;
1639:
1640: Else
1641:

Line 1642: print_message('Stage:PATC:10.12.004.1c');

1638: RAISE INVALID_DATA;
1639:
1640: Else
1641:
1642: print_message('Stage:PATC:10.12.004.1c');
1643:
1644: End If;
1645:
1646: End If; /* Added for bug 4549869 */

Line 1656: Print_Message('Stage:PATC:10.12.004.1d');

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
1655:
1656: Print_Message('Stage:PATC:10.12.004.1d');
1657: X_Status := 'PA_CWK_TXN_NOT_ALLOWED';
1658: X_Billable_Flag := NULL;
1659: Print_Message('PATC ERROR: ' || X_status);
1660: RAISE INVALID_DATA;

Line 1659: Print_Message('PATC ERROR: ' || X_status);

1655:
1656: Print_Message('Stage:PATC:10.12.004.1d');
1657: X_Status := 'PA_CWK_TXN_NOT_ALLOWED';
1658: X_Billable_Flag := NULL;
1659: Print_Message('PATC ERROR: ' || X_status);
1660: RAISE INVALID_DATA;
1661:
1662: End If; -- Added for Bug#4549448
1663:

Line 1668: Print_Message('Stage:PATC:10.12.004.1e');

1664: ElsIf l_Person_Type = 'EMP' and (tc.Employees_Only_Flag = 'E' or tc.Employees_Only_flag is Null) Then
1665:
1666: If tc.chargeable_flag = 'N' Then -- Added for Bug#4549448
1667:
1668: Print_Message('Stage:PATC:10.12.004.1e');
1669:
1670: If level_flag_local = 'P' Then
1671: X_Status := 'PA_TR_EPE_PROJ_TXN_CTRLS';
1672: Else

Line 1677: Print_Message('PATC ERROR: ' || X_status);

1673: X_Status := 'PA_TR_EPE_TASK_TXN_CTRLS';
1674: End If;
1675:
1676: X_Billable_Flag := NULL;
1677: Print_Message('PATC ERROR: ' || X_status);
1678: RAISE INVALID_DATA;
1679:
1680: End If; -- Added for Bug#4549448
1681:

Line 1692: Print_Message('Stage:PATC:10.12.004.1e');

1688: ElsIf (p_sys_link_function in ('USG', 'PJ', 'VI', 'WIP', 'INV') and x_person_id is NULL) Then
1689:
1690: If tc.chargeable_flag = 'N' Then
1691:
1692: Print_Message('Stage:PATC:10.12.004.1e');
1693:
1694: If level_flag_local = 'P' Then
1695: X_Status := 'PA_TR_EPE_PROJ_TXN_CTRLS';
1696: Else

Line 1701: Print_Message('PATC ERROR: ' || X_status);

1697: X_Status := 'PA_TR_EPE_TASK_TXN_CTRLS';
1698: End If;
1699:
1700: X_Billable_Flag := NULL;
1701: Print_Message('PATC ERROR: ' || X_status);
1702: RAISE INVALID_DATA;
1703:
1704: End If;
1705: -- End, added the following block for bug 4556126

Line 1712: print_message('Stage:PATC:10.12.004.2');

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');
1713:
1714: End If;
1715: -- End bug 4068808
1716:

Line 1725: Print_Message('Stage:PATC:10.12.004.3');

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;
1728: Print_Message('PATC ERROR: '|| X_status);
1729: RAISE INVALID_DATA;

Line 1728: Print_Message('PATC ERROR: '|| X_status);

1724:
1725: Print_Message('Stage:PATC:10.12.004.3');
1726: X_Status := 'PA_CWK_TC_NOT_ALLOWED';
1727: X_Billable_Flag := NULL;
1728: Print_Message('PATC ERROR: '|| X_status);
1729: RAISE INVALID_DATA;
1730:
1731: End If; /* Added for bug 4549869 */
1732:

Line 1735: Print_Message('Stage:PATC:10.12.004.4');

1731: End If; /* Added for bug 4549869 */
1732:
1733: Else
1734:
1735: Print_Message('Stage:PATC:10.12.004.4');
1736:
1737: End If;
1738:
1739: /** End PA.M/CWK changes **/

Line 1752: Print_Message('Stage:PATC:10.12.004.5');

1748: P_Person_Id => X_Person_id,
1749: P_Financial_Task_Id => l_task_id, -- Replaced X_task_id with l_task_id for bug 16220146
1750: P_Ei_Date => X_Ei_Date ) = 'N' Then
1751:
1752: Print_Message('Stage:PATC:10.12.004.5');
1753: X_Status := 'PA_WP_RES_NOT_DEFINED';
1754: X_Billable_Flag := NULL;
1755: Print_Message('PATC ERROR: ' || X_Status);
1756: RAISE INVALID_DATA;

Line 1755: Print_Message('PATC ERROR: ' || X_Status);

1751:
1752: Print_Message('Stage:PATC:10.12.004.5');
1753: X_Status := 'PA_WP_RES_NOT_DEFINED';
1754: X_Billable_Flag := NULL;
1755: Print_Message('PATC ERROR: ' || X_Status);
1756: RAISE INVALID_DATA;
1757:
1758: Else
1759:

Line 1760: Print_Message('Stage:PATC:10.12.004.6');

1756: RAISE INVALID_DATA;
1757:
1758: Else
1759:
1760: Print_Message('Stage:PATC:10.12.004.6');
1761:
1762: End If;
1763:
1764: Else

Line 1766: Print_Message('Stage:PATC:10.12.004.7');

1762: End If;
1763:
1764: Else
1765:
1766: Print_Message('Stage:PATC:10.12.004.7');
1767:
1768: End If;
1769:
1770: /** End PA.M/Task Assignment changes **/

Line 1782: print_message('Stage:PATC:10.12.005');

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:
1785: End If;
1786:

Line 1791: print_message('Stage:PATC:10.12.006');

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 ;
1795:

Line 1798: print_message('Stage:PATC:10.12.007');

1794: END IF ;
1795:
1796: ELSE
1797:
1798: print_message('Stage:PATC:10.12.007');
1799: IF tc.person_id is NOT NULL AND tc.expenditure_category is NULL THEN
1800:
1801: FETCH task_level_tc INTO tc;
1802: IF task_level_tc%FOUND THEN

Line 1808: print_message('Stage:PATC:10.12.008');

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 */
1812: l_temp_task_bill_flag := tc.billable_indicator;

Line 1820: print_message('Stage:PATC:10.12.009');

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 */
1824: l_temp_task_bill_flag := tc.billable_indicator;

Line 1841: print_message('Stage:PATC:10.12.010');

1837: End If; -- proj.p_limit_flag = 'Y' or proj.t_limit_flag = 'Y'
1838:
1839: END IF ; -- IF task_level_tc%NOTFOUND
1840:
1841: print_message('Stage:PATC:10.12.010');
1842: /* Start changes for Bug#12714789 */
1843: set_billable_flag(l_temp_task_bill_flag, proj.t_billable_flag );
1844: /* end changes for bug#12714789 */
1845:

Line 1864: print_message('Stage:PATC:10.12.010.1');

1860: /* If (x_calling_module in ('APXINENT','apiindib.pls','APXIIMPT','apiimptb.pls')) OR
1861: (x_calling_module = 'PAAPIMP' AND x_transaction_source = 'AP EXPENSE' ) Then
1862: check_person_id(p_mode => 'SYS_LINK_CHECK'
1863: ,x_return_string => l_return_string );
1864: print_message('Stage:PATC:10.12.010.1');
1865: End If; Commented for bug# 2955795 */
1866:
1867: /** Added SelfService for validation during Self Service Expense Report Entry. 2971043 **/
1868: /** At present Iexpenses does not pass the p_sys_link_function parameter. But since

Line 1877: print_message('Stage:PATC:10.12.010.2');

1873: OR
1874: ( x_calling_module = 'PAAPIMP' AND
1875: x_transaction_source = 'AP EXPENSE' AND p_sys_link_function = 'ER' ) THEN /*Bug# 2955795*/
1876:
1877: print_message('Stage:PATC:10.12.010.2');
1878:
1879: IF nvl(check_active_employee
1880: (p_vendor_id => x_vendor_id
1881: ,p_person_id => x_person_id

Line 1883: print_message('Stage:PATC:10.12.010.3');

1879: IF nvl(check_active_employee
1880: (p_vendor_id => x_vendor_id
1881: ,p_person_id => x_person_id
1882: ,p_ei_date => x_ei_date),'N') = 'N' then
1883: print_message('Stage:PATC:10.12.010.3');
1884: return_error( 'NO_ASSIGNMENT');
1885:
1886: End if;
1887:

Line 1904: print_message('Stage:PATC:10.12.010.4');

1900: -- Added PO params for bug 4044057
1901: -- Need to validate the assigment for the entered PO
1902: IF l_job_id is NULL THEN
1903:
1904: print_message('Stage:PATC:10.12.010.4');
1905: return_error('NO_PO_ASSIGNMENT');
1906:
1907: END IF;
1908:

Line 1919: print_message('Stage:PATC:10.12.011');

1915:
1916: /* Enhancement request BUG12801896 changes STARTS here */
1917: /*IF pa_utils2.CheckExporg(X_incurred_by_org_id,X_ei_date) = 'N' then
1918:
1919: print_message('Stage:PATC:10.12.011');
1920: return_error( 'PA_EXP_ORG_NOT_ACTIVE');
1921: END IF; */ --commented the condition for BUG12801896
1922:
1923: IF (pa_utils2.CheckExporg(X_incurred_by_org_id,X_ei_date) = 'N' AND x_calling_module <> 'PAXPRRPE') THEN

Line 1924: print_message('Stage:PATC:10.12.011');

1920: return_error( 'PA_EXP_ORG_NOT_ACTIVE');
1921: END IF; */ --commented the condition for BUG12801896
1922:
1923: IF (pa_utils2.CheckExporg(X_incurred_by_org_id,X_ei_date) = 'N' AND x_calling_module <> 'PAXPRRPE') THEN
1924: print_message('Stage:PATC:10.12.011');
1925: return_error( 'PA_EXP_ORG_NOT_ACTIVE');
1926: else
1927: print_message('Stage:PATC:10.12.011.01');
1928: END IF;

Line 1927: print_message('Stage:PATC:10.12.011.01');

1923: IF (pa_utils2.CheckExporg(X_incurred_by_org_id,X_ei_date) = 'N' AND x_calling_module <> 'PAXPRRPE') THEN
1924: print_message('Stage:PATC:10.12.011');
1925: return_error( 'PA_EXP_ORG_NOT_ACTIVE');
1926: else
1927: print_message('Stage:PATC:10.12.011.01');
1928: END IF;
1929: /* Enhancement request BUG12801896 changes ENDS here */
1930:
1931: END IF; /* Added for Bug # 2170237 */

Line 1940: patc.check_termination (X_person_id, x_ei_date, l_ac_termination_date);

1936: -- Bug 6156072: Base Bug 6045051: start
1937: -- Bug 6156072: Base Bug 6045051: If condition introduced to check for person_type and then
1938: -- call corresponding procedure to check for termination
1939: IF (l_Person_Type = 'EMP') THEN
1940: patc.check_termination (X_person_id, x_ei_date, l_ac_termination_date);
1941: ELSIF (l_Person_Type = 'CWK') THEN
1942: patc.check_termination_for_cwk (X_person_id, x_ei_date, l_ac_termination_date);
1943: END IF;
1944: -- Bug 6156072: Base Bug 6045051: end

Line 1942: patc.check_termination_for_cwk (X_person_id, x_ei_date, l_ac_termination_date);

1938: -- call corresponding procedure to check for termination
1939: IF (l_Person_Type = 'EMP') THEN
1940: patc.check_termination (X_person_id, x_ei_date, l_ac_termination_date);
1941: ELSIF (l_Person_Type = 'CWK') THEN
1942: patc.check_termination_for_cwk (X_person_id, x_ei_date, l_ac_termination_date);
1943: END IF;
1944: -- Bug 6156072: Base Bug 6045051: end
1945: end if;
1946:

Line 1955: print_message('Stage:PATC:10.12.012');

1951: END IF;
1952: /* Added for Bug#4604614 (BaseBug#4118885) -- End */
1953:
1954: IF ( X_org_id IS NULL ) THEN
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 */

Line 1962: print_message('Stage:PATC:10.12.013');

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');
1964: END IF;
1965: END IF; /* Added for Bug # 2170237 */
1966:

Line 1972: print_message('Stage:PATC:10.12.014');

1968:
1969: -- Check for Non_labor_resource_org
1970:
1971: if ( X_nl_resource_org_id is NOT NULL ) then
1972: print_message('Stage:PATC:10.12.014');
1973: check_nlro_date ;
1974: end if ;
1975:
1976: END IF ; -- IF ( X_Calling_Module <> 'CreateRelatedItem')

Line 1978: patcx_bill_flag := temp_bill_flag;

1974: end if ;
1975:
1976: END IF ; -- IF ( X_Calling_Module <> 'CreateRelatedItem')
1977:
1978: patcx_bill_flag := temp_bill_flag;
1979:
1980: print_message('Stage:PATC:10.13.00:Calling patcx.tc_extension api');
1981:
1982: --Bug 3017533

Line 1980: print_message('Stage:PATC:10.13.00:Calling patcx.tc_extension api');

1976: END IF ; -- IF ( X_Calling_Module <> 'CreateRelatedItem')
1977:
1978: patcx_bill_flag := temp_bill_flag;
1979:
1980: print_message('Stage:PATC:10.13.00:Calling patcx.tc_extension api');
1981:
1982: --Bug 3017533
1983: L_BeforeCE_AsgnId := PATC.G_OVERIDE_ASSIGNMENT_ID;
1984:

Line 1983: L_BeforeCE_AsgnId := PATC.G_OVERIDE_ASSIGNMENT_ID;

1979:
1980: print_message('Stage:PATC:10.13.00:Calling patcx.tc_extension api');
1981:
1982: --Bug 3017533
1983: L_BeforeCE_AsgnId := PATC.G_OVERIDE_ASSIGNMENT_ID;
1984:
1985: patcx.tc_extension(
1986: X_project_id => X_project_id
1987: , X_task_id => l_task_id -- Replaced X_task_id with l_task_id for bug 16220146

Line 1985: patcx.tc_extension(

1981:
1982: --Bug 3017533
1983: L_BeforeCE_AsgnId := PATC.G_OVERIDE_ASSIGNMENT_ID;
1984:
1985: patcx.tc_extension(
1986: X_project_id => X_project_id
1987: , X_task_id => l_task_id -- Replaced X_task_id with l_task_id for bug 16220146
1988: , X_expenditure_item_date => X_ei_date
1989: , X_expenditure_type => X_expenditure_type

Line 2024: , X_billable_flag => patcx_bill_flag

2020: , X_attribute13 => X_attribute13
2021: , X_attribute14 => X_attribute14
2022: , X_attribute15 => X_attribute15
2023: , X_msg_application => X_msg_application
2024: , X_billable_flag => patcx_bill_flag
2025: , X_msg_type => temp_msg_type
2026: , X_msg_token1 => temp_msg_token1
2027: , X_msg_token2 => temp_msg_token2
2028: , X_msg_token3 => temp_msg_token3

Line 2035: , x_assignment_id => PATC.G_OVERIDE_ASSIGNMENT_ID

2031: , p_projfunc_currency_code => p_projfunc_currency_code
2032: , p_projfunc_cost_rate_type => p_projfunc_cost_rate_type
2033: , p_projfunc_cost_rate_date => p_projfunc_cost_rate_date
2034: , p_projfunc_cost_exchg_rate => p_projfunc_cost_exchg_rate
2035: , x_assignment_id => PATC.G_OVERIDE_ASSIGNMENT_ID
2036: , p_work_type_id => p_work_type_id
2037: , p_sys_link_function => p_sys_link_function
2038: , P_Po_Header_Id => P_Po_Header_Id
2039: , P_Po_Line_Id => P_Po_Line_Id

Line 2066: print_message('Stage:PATC:10.13.001');

2062: , P_pa_ref_var8 => P_pa_ref_var8
2063: , P_pa_ref_var9 => P_pa_ref_var9
2064: , P_pa_ref_var10 => P_pa_ref_var10 );
2065:
2066: print_message('Stage:PATC:10.13.001');
2067: print_message('End of patcx.tc_extension api patcx_bill_flag :'||patcx_bill_flag||
2068: 'Assignment :'||PATC.G_OVERIDE_ASSIGNMENT_ID||'patcx_status['||temp_status||']');
2069:
2070: /*Start Bug4518893 */

Line 2067: print_message('End of patcx.tc_extension api patcx_bill_flag :'||patcx_bill_flag||

2063: , P_pa_ref_var9 => P_pa_ref_var9
2064: , P_pa_ref_var10 => P_pa_ref_var10 );
2065:
2066: print_message('Stage:PATC:10.13.001');
2067: print_message('End of patcx.tc_extension api patcx_bill_flag :'||patcx_bill_flag||
2068: 'Assignment :'||PATC.G_OVERIDE_ASSIGNMENT_ID||'patcx_status['||temp_status||']');
2069:
2070: /*Start Bug4518893 */
2071:

Line 2068: 'Assignment :'||PATC.G_OVERIDE_ASSIGNMENT_ID||'patcx_status['||temp_status||']');

2064: , P_pa_ref_var10 => P_pa_ref_var10 );
2065:
2066: print_message('Stage:PATC:10.13.001');
2067: print_message('End of patcx.tc_extension api patcx_bill_flag :'||patcx_bill_flag||
2068: 'Assignment :'||PATC.G_OVERIDE_ASSIGNMENT_ID||'patcx_status['||temp_status||']');
2069:
2070: /*Start Bug4518893 */
2071:
2072: /* IF Condition commented Start changes for bug#12597910 */

Line 2076: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN

2072: /* IF Condition commented Start changes for bug#12597910 */
2073:
2074: -- IF ( nvl(P_payroll_accrual_flag,'N') <> 'Y') THEN --- Condition Added for payroll billable_flag changes for 12.2 start bug#12344689
2075: --{
2076: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN
2077: X_billable_flag := patcx_bill_flag;
2078: ELSE
2079: X_billable_flag := temp_bill_flag;
2080: END IF;

Line 2077: X_billable_flag := patcx_bill_flag;

2073:
2074: -- IF ( nvl(P_payroll_accrual_flag,'N') <> 'Y') THEN --- Condition Added for payroll billable_flag changes for 12.2 start bug#12344689
2075: --{
2076: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN
2077: X_billable_flag := patcx_bill_flag;
2078: ELSE
2079: X_billable_flag := temp_bill_flag;
2080: END IF;
2081: --}

Line 2086: /* Bug 7685120 Move the following code to the point where we have set the Global variables for work type in PATC

2082: -- END IF; /* End of bug#12344689 changes */
2083: /*End Bug4518893 */
2084:
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:

Line 2091: print_message('Stage:PATC:10.13.002');

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;
2094: X_msg_token1 := temp_msg_token1;
2095: X_msg_token2 := temp_msg_token2;

Line 2107: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN

2103: CLOSE project_info;
2104: End of change for Bug 7685120 */
2105:
2106: /* Start bug4518893
2107: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN
2108: X_billable_flag := patcx_bill_flag;
2109: ELSE
2110: X_billable_flag := temp_bill_flag;
2111: END IF;

Line 2108: X_billable_flag := patcx_bill_flag;

2104: End of change for Bug 7685120 */
2105:
2106: /* Start bug4518893
2107: IF ( patcx_bill_flag = 'N' OR patcx_bill_flag = 'Y' ) THEN
2108: X_billable_flag := patcx_bill_flag;
2109: ELSE
2110: X_billable_flag := temp_bill_flag;
2111: END IF;
2112: End bug4518893 */

Line 2116: -- is derived using the new assignment_id all references to PATC to be changed

2112: End bug4518893 */
2113:
2114: /* Bug 2648550 starts */
2115: -- new work_type_id and tp_amt_type_code,assignment_name,work_type_name
2116: -- is derived using the new assignment_id all references to PATC to be changed
2117: -- to use the newly derived work_type_id,tp_amt_type_code,assignment_name,work_type_name
2118: --Bug 3017533, only if the asgn has changed from previous and assign_precedes_task is set
2119: --for all modules other than PAXTREPE then override the WT, TP amt type
2120:

Line 2128: If ( (nvl(PATC.G_OVERIDE_ASSIGNMENT_ID,0) <> nvl(L_BeforeCE_AsgnId,0)) and

2124: l_bill_labor_accrual_flag := proj.BILl_LABOR_ACCRUAL;
2125:
2126: /* End changes for bug#12597910 */
2127:
2128: If ( (nvl(PATC.G_OVERIDE_ASSIGNMENT_ID,0) <> nvl(L_BeforeCE_AsgnId,0)) and
2129: (proj.p_assign_precedes_task = 'Y') and
2130: (X_Calling_Module <> 'PAXTREPE') ) Then
2131:
2132: PATC.G_OVERIDE_WORK_TYPE_ID := PA_UTILS4.get_work_type_id (

Line 2132: PATC.G_OVERIDE_WORK_TYPE_ID := PA_UTILS4.get_work_type_id (

2128: If ( (nvl(PATC.G_OVERIDE_ASSIGNMENT_ID,0) <> nvl(L_BeforeCE_AsgnId,0)) and
2129: (proj.p_assign_precedes_task = 'Y') and
2130: (X_Calling_Module <> 'PAXTREPE') ) Then
2131:
2132: PATC.G_OVERIDE_WORK_TYPE_ID := PA_UTILS4.get_work_type_id (
2133: p_project_id =>X_project_id
2134: , p_task_id =>l_task_id -- Replaced X_task_id with l_task_id for bug 16220146
2135: , p_assignment_id=>nvl(PATC.G_OVERIDE_ASSIGNMENT_ID,0) );
2136:

Line 2135: , p_assignment_id=>nvl(PATC.G_OVERIDE_ASSIGNMENT_ID,0) );

2131:
2132: PATC.G_OVERIDE_WORK_TYPE_ID := PA_UTILS4.get_work_type_id (
2133: p_project_id =>X_project_id
2134: , p_task_id =>l_task_id -- Replaced X_task_id with l_task_id for bug 16220146
2135: , p_assignment_id=>nvl(PATC.G_OVERIDE_ASSIGNMENT_ID,0) );
2136:
2137: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2138: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID );
2139:

Line 2137: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(

2133: p_project_id =>X_project_id
2134: , p_task_id =>l_task_id -- Replaced X_task_id with l_task_id for bug 16220146
2135: , p_assignment_id=>nvl(PATC.G_OVERIDE_ASSIGNMENT_ID,0) );
2136:
2137: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2138: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID );
2139:
2140: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2141: p_assignment_id =>PATC.G_OVERIDE_ASSIGNMENT_ID);

Line 2138: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID );

2134: , p_task_id =>l_task_id -- Replaced X_task_id with l_task_id for bug 16220146
2135: , p_assignment_id=>nvl(PATC.G_OVERIDE_ASSIGNMENT_ID,0) );
2136:
2137: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2138: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID );
2139:
2140: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2141: p_assignment_id =>PATC.G_OVERIDE_ASSIGNMENT_ID);
2142:

Line 2140: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(

2136:
2137: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2138: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID );
2139:
2140: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2141: p_assignment_id =>PATC.G_OVERIDE_ASSIGNMENT_ID);
2142:
2143: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(
2144: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID);

Line 2141: p_assignment_id =>PATC.G_OVERIDE_ASSIGNMENT_ID);

2137: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2138: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID );
2139:
2140: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2141: p_assignment_id =>PATC.G_OVERIDE_ASSIGNMENT_ID);
2142:
2143: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(
2144: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID);
2145:

Line 2143: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(

2139:
2140: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2141: p_assignment_id =>PATC.G_OVERIDE_ASSIGNMENT_ID);
2142:
2143: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(
2144: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID);
2145:
2146: -- start of projcurrency and EI attrib changes
2147: -- Override the Billable flag if the work type biilability is enabled

Line 2144: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID);

2140: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2141: p_assignment_id =>PATC.G_OVERIDE_ASSIGNMENT_ID);
2142:
2143: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(
2144: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID);
2145:
2146: -- start of projcurrency and EI attrib changes
2147: -- Override the Billable flag if the work type biilability is enabled
2148: print_message('Stage:PATC:10.13.003');

Line 2148: print_message('Stage:PATC:10.13.003');

2144: p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID);
2145:
2146: -- start of projcurrency and EI attrib changes
2147: -- Override the Billable flag if the work type biilability is enabled
2148: print_message('Stage:PATC:10.13.003');
2149:
2150: /* IF Condition commented for bug#12597910 */
2151: -- IF ( nvl(P_payroll_accrual_flag,'N') <> 'Y') THEN --- Condition Added for payroll billable_flag changes for 12.2 start bug#12344689
2152: --{

Line 2157: (p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID

2153:
2154: X_billable_flag := PA_UTILS4.get_trxn_work_billabilty
2155: /* (p_work_type_id => p_work_type_id commented for bug 2648550 */
2156: /* Bug 2648550 used global variable in work_type_id parameter */
2157: (p_work_type_id => PATC.G_OVERIDE_WORK_TYPE_ID
2158: ,p_tc_extn_bill_flag => X_billable_flag);
2159: /* end of bug 2648550 */
2160: --}
2161: --END IF; /* End of bug#12344689 changes */

Line 2202: PATC.G_OVERIDE_WORK_TYPE_ID := p_work_type_id;

2198: /* End changes for bug#12597910 */
2199:
2200: Else
2201:
2202: PATC.G_OVERIDE_WORK_TYPE_ID := p_work_type_id;
2203: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2204: p_work_type_id => p_work_type_id);
2205: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2206: p_assignment_id =>p_assignment_id);

Line 2203: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(

2199:
2200: Else
2201:
2202: PATC.G_OVERIDE_WORK_TYPE_ID := p_work_type_id;
2203: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2204: p_work_type_id => p_work_type_id);
2205: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2206: p_assignment_id =>p_assignment_id);
2207: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(

Line 2205: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(

2201:
2202: PATC.G_OVERIDE_WORK_TYPE_ID := p_work_type_id;
2203: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2204: p_work_type_id => p_work_type_id);
2205: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2206: p_assignment_id =>p_assignment_id);
2207: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(
2208: p_work_type_id => p_work_type_id);
2209:

Line 2207: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(

2203: PATC.G_OVERIDE_TP_AMT_TYPE_CODE := pa_utils4.get_tp_amt_type_code(
2204: p_work_type_id => p_work_type_id);
2205: PATC.G_OVERIDE_ASSIGNMENT_NAME := pa_utils4.get_assignment_name(
2206: p_assignment_id =>p_assignment_id);
2207: PATC.G_OVERIDE_WORK_TYPE_NAME := pa_utils4.get_work_type_name(
2208: p_work_type_id => p_work_type_id);
2209:
2210: -- start of projcurrency and EI attrib changes
2211: -- Override the Billable flag if the work type biilability is enabled

Line 2212: print_message('Stage:PATC:10.13.004');

2208: p_work_type_id => p_work_type_id);
2209:
2210: -- start of projcurrency and EI attrib changes
2211: -- Override the Billable flag if the work type biilability is enabled
2212: print_message('Stage:PATC:10.13.004');
2213:
2214: /* IF Condition commented for bug#12597910 */
2215: --IF ( nvl(P_payroll_accrual_flag,'N') <> 'Y') THEN --- Condition Added for payroll billable_flag changes for 12.2 start bug#12344689
2216: --{

Line 2266: print_message('Stage:PATC:10.13.002');

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;
2269: X_msg_token1 := temp_msg_token1;
2270: X_msg_token2 := temp_msg_token2;

Line 2283: print_message('Stage:PATC:10.13.005');

2279: /*End of change for Bug 7685120 */
2280:
2281: -- end of projcurrency and EI attrib changes
2282:
2283: print_message('Stage:PATC:10.13.005');
2284: print_message('Billable Flag after override:['||X_billable_flag||
2285: ']override assn:['||PATC.G_OVERIDE_ASSIGNMENT_ID||']x_status ['||x_status||']');
2286:
2287: -- Begin PA.L Retirement Cost Processing changes

Line 2285: ']override assn:['||PATC.G_OVERIDE_ASSIGNMENT_ID||']x_status ['||x_status||']');

2281: -- end of projcurrency and EI attrib changes
2282:
2283: print_message('Stage:PATC:10.13.005');
2284: print_message('Billable Flag after override:['||X_billable_flag||
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

Line 2288: print_message('Stage:PATC:10.14.00: Check capitalizable_flag against retirement_cost_flag');

2284: print_message('Billable Flag after override:['||X_billable_flag||
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

Line 2316: print_message('Failed in GET_PATC api sqlerror:'||X_status);

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:
2318: END get_status;
2319:
2320:

Line 2407: END PATC;

2403:
2404: end check_termination_for_cwk;
2405: -- Bug 6156072: Base Bug 6045051: end
2406:
2407: END PATC;