DBA Data[Home] [Help]

APPS.PA_PLAN_RES_LIST_PUB dependencies on FND_MSG_PUB

Line 1270: FND_MSG_PUB.initialize;

1266:
1267: --Initialize the message stack before starting any further processing.
1268: IF FND_API.to_boolean( p_init_msg_list )
1269: THEN
1270: FND_MSG_PUB.initialize;
1271: END IF;
1272:
1273: --Initialize the Out Variables.
1274: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1473: FND_MSG_PUB.Add_Exc_Msg

1469: x_msg_count := x_msg_count + 1;
1470: X_Msg_Data := SUBSTRB(SQLERRM,1,240); -- 4537865
1471: ROLLBACK ;
1472: -- 4537865
1473: FND_MSG_PUB.Add_Exc_Msg
1474: ( p_pkg_name => G_PKG_NAME ,
1475: p_procedure_name => l_api_name,
1476: p_error_text => X_Msg_Data
1477: );

Line 1485: FND_MSG_PUB.Add_Exc_Msg

1481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1482: x_msg_count := x_msg_count + 1; -- 4537865
1483: X_Msg_Data := SUBSTRB(SQLERRM,1,240); -- 4537865
1484: ROLLBACK;
1485: FND_MSG_PUB.Add_Exc_Msg
1486: ( p_pkg_name => G_PKG_NAME ,
1487: p_procedure_name => l_api_name,
1488: p_error_text => x_msg_data -- 4537865
1489: );

Line 1560: Fnd_Msg_Pub.Initialize;

1556: Pa_Planning_Resource_Pvt.g_amg_flow := 'Y';
1557: --Initialize the message stack before starting any further processing.
1558: If Fnd_Api.To_Boolean( P_Init_Msg_List ) Then
1559:
1560: Fnd_Msg_Pub.Initialize;
1561:
1562: End If;
1563:
1564: --Initialize the Out Variables.

Line 2179: l_Msg_Count := Fnd_Msg_Pub.Count_Msg;

2175:
2176:
2177: Exception
2178: When l_ERROR Then
2179: l_Msg_Count := Fnd_Msg_Pub.Count_Msg;
2180:
2181:
2182: If l_Msg_Count = 1 Then
2183:

Line 2209: Fnd_Msg_Pub.Add_Exc_Msg(

2205: X_Msg_Data := SUBSTRB(SQLERRM,1,240);
2206: X_Msg_Count := X_Msg_Count + 1;
2207: -- 4537865 : End
2208: Rollback ;
2209: Fnd_Msg_Pub.Add_Exc_Msg(
2210: p_pkg_name => G_PKG_NAME ,
2211: p_procedure_name => l_api_name);
2212: Return;
2213:

Line 2251: FND_MSG_PUB.initialize;

2247: Pa_Planning_Resource_Pvt.g_amg_flow := 'Y';
2248: --Initialize the message stack before starting any further processing.
2249: IF FND_API.to_boolean( p_init_msg_list )
2250: THEN
2251: FND_MSG_PUB.initialize;
2252: END IF;
2253:
2254: --Initialize the Out Variables.
2255: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2467: FND_MSG_PUB.Add_Exc_Msg

2463: X_Msg_Data := SUBSTRB(SQLERRM,1,240);
2464: x_msg_count := x_msg_count + 1 ;
2465: -- 4537865 : End
2466: ROLLBACK ;
2467: FND_MSG_PUB.Add_Exc_Msg
2468: ( p_pkg_name => G_PKG_NAME ,
2469: p_procedure_name => l_api_name
2470: );
2471: Return;

Line 2504: FND_MSG_PUB.initialize;

2500:
2501: -- First clear the message stack.
2502: IF FND_API.to_boolean( p_init_msg_list )
2503: THEN
2504: FND_MSG_PUB.initialize;
2505: END IF;
2506:
2507: x_msg_count := 0;
2508: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2587: Fnd_Msg_Pub.Add_Exc_Msg(

2583: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2584: x_msg_count := x_msg_count + 1;
2585: -- 4537865
2586: x_msg_data := SUBSTRB(SQLERRM,1,240);
2587: Fnd_Msg_Pub.Add_Exc_Msg(
2588: P_Pkg_Name => 'Pa_Plan_Res_List_Pub',
2589: P_Procedure_Name => 'Create_Plan_RL_Format',
2590: P_error_text => x_msg_data);
2591: END Create_Plan_RL_Format;

Line 2618: FND_MSG_PUB.initialize;

2614: BEGIN
2615: -- First clear the message stack.
2616: IF FND_API.to_boolean( p_init_msg_list )
2617: THEN
2618: FND_MSG_PUB.initialize;
2619: END IF;
2620:
2621: Convert_Missing_Format_IN_Rec(
2622: P_Plan_RL_Format_Tbl => P_Plan_RL_Format_Tbl,

Line 2717: Fnd_Msg_Pub.Initialize;

2713: Pa_Planning_Resource_Pvt.g_amg_flow := 'Y';
2714: -- First clear the message stack.
2715: If Fnd_Api.To_Boolean( P_Init_Msg_List ) Then
2716:
2717: Fnd_Msg_Pub.Initialize;
2718:
2719: End If;
2720:
2721:

Line 3116: x_msg_count := Fnd_Msg_Pub.Count_Msg;

3112: Commit;
3113:
3114: End If;
3115: x_return_status := Fnd_Api.G_Ret_Sts_Success;
3116: x_msg_count := Fnd_Msg_Pub.Count_Msg;
3117:
3118:
3119: Exception
3120: When FMT_NULL_ERR Then

Line 3413: Fnd_Msg_Pub.Initialize;

3409: Pa_Planning_Resource_Pvt.g_amg_flow := 'Y';
3410: -- First clear the message stack.
3411: If Fnd_Api.To_Boolean( p_init_msg_list ) Then
3412:
3413: Fnd_Msg_Pub.Initialize;
3414:
3415: End If;
3416:
3417: /* Eugene

Line 3605: x_msg_count := Fnd_Msg_Pub.Count_Msg;

3601:
3602: End If;
3603:
3604: x_return_status := Fnd_Api.G_Ret_Sts_Success;
3605: x_msg_count := Fnd_Msg_Pub.Count_Msg;
3606:
3607: Exception
3608: When Others Then
3609: Rollback;

Line 3637: FND_MSG_PUB.initialize;

3633: Pa_Planning_Resource_Pvt.g_amg_flow := 'Y';
3634: -- First clear the message stack.
3635: IF FND_API.to_boolean( p_init_msg_list )
3636: THEN
3637: FND_MSG_PUB.initialize;
3638: END IF;
3639: /********************************************
3640: * To Check if resource_list member is currently being
3641: * used in a planning transaction.

Line 3682: FND_MSG_PUB.initialize;

3678: PROCEDURE Init_Create_Resource_List
3679: IS
3680: l_api_name CONSTANT VARCHAR2(30) := 'Init_Create_Resource_List';
3681: BEGIN
3682: FND_MSG_PUB.initialize;
3683:
3684: G_Plan_Res_List_IN_Rec := G_Res_List_empty_rec;
3685: G_Plan_Res_List_Out_Rec := G_Res_List_empty_out_rec;
3686:

Line 3699: FND_MSG_PUB.Add_Exc_Msg

3695: G_Plan_Resource_tbl_count := 0;
3696:
3697: EXCEPTION
3698: WHEN OTHERS THEN
3699: FND_MSG_PUB.Add_Exc_Msg
3700: ( p_pkg_name => G_PKG_NAME ,
3701: p_procedure_name => l_api_name
3702: );
3703:

Line 3719: FND_MSG_PUB.initialize;

3715: PROCEDURE Init_Update_Resource_List
3716: IS
3717: l_api_name CONSTANT VARCHAR2(30) := 'Init_Update_Resource_List';
3718: BEGIN
3719: FND_MSG_PUB.initialize;
3720:
3721: G_Plan_Res_List_IN_Rec := G_Res_List_empty_rec;
3722: G_Plan_Res_List_Out_Rec := G_Res_List_empty_out_rec;
3723:

Line 3736: FND_MSG_PUB.Add_Exc_Msg

3732: G_Plan_Resource_tbl_count := 0;
3733:
3734: EXCEPTION
3735: WHEN OTHERS THEN
3736: FND_MSG_PUB.Add_Exc_Msg
3737: ( p_pkg_name => G_PKG_NAME ,
3738: p_procedure_name => l_api_name
3739: );
3740: END Init_Update_Resource_List;

Line 3793: FND_MSG_PUB.Add_Exc_Msg

3789: THEN
3790: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3791: WHEN OTHERS THEN
3792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3793: FND_MSG_PUB.Add_Exc_Msg
3794: ( p_pkg_name => G_PKG_NAME ,
3795: p_procedure_name => l_api_name
3796: );
3797: END Load_Resource_List;

Line 3836: FND_MSG_PUB.Add_Exc_Msg

3832: THEN
3833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3834: WHEN OTHERS THEN
3835: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3836: FND_MSG_PUB.Add_Exc_Msg
3837: ( p_pkg_name => G_PKG_NAME ,
3838: p_procedure_name => l_api_name
3839: );
3840: END Load_Resource_Format;

Line 4068: FND_MSG_PUB.Add_Exc_Msg

4064: THEN
4065: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4066: WHEN OTHERS THEN
4067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4068: FND_MSG_PUB.Add_Exc_Msg
4069: ( p_pkg_name => G_PKG_NAME ,
4070: p_procedure_name => l_api_name
4071: );
4072: END Load_Planning_Resource;

Line 4128: FND_MSG_PUB.Add_Exc_Msg

4124: -- 4537865
4125: x_msg_data := SUBSTRB(SQLERRM,1,240);
4126: x_msg_count := 1 ;
4127: -- 4537865
4128: FND_MSG_PUB.Add_Exc_Msg
4129: ( p_pkg_name => G_PKG_NAME ,
4130: p_procedure_name => l_api_name
4131: );
4132: END Exec_Create_Resource_List;

Line 4185: FND_MSG_PUB.Add_Exc_Msg

4181: WHEN OTHERS THEN
4182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4183: x_msg_data := SUBSTRB(SQLERRM,1,240);
4184: x_msg_count := 1 ;
4185: FND_MSG_PUB.Add_Exc_Msg
4186: ( p_pkg_name => G_PKG_NAME ,
4187: p_procedure_name => l_api_name ,
4188: p_error_text => x_msg_data
4189: );

Line 4231: FND_MSG_PUB.Add_Exc_Msg

4227: -- 4537865 : RESETTING x_resource_list_id also
4228: x_resource_list_id := NULL ;
4229:
4230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4231: FND_MSG_PUB.Add_Exc_Msg
4232: ( p_pkg_name => G_PKG_NAME ,
4233: p_procedure_name => l_api_name
4234: );
4235: END Fetch_Resource_List;

Line 4287: FND_MSG_PUB.Add_Exc_Msg

4283: WHEN OTHERS THEN
4284: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4285: -- 4537865 : RESETTING X_Plan_RL_Format_Id also
4286: X_Plan_RL_Format_Id := NULL ;
4287: FND_MSG_PUB.Add_Exc_Msg
4288: ( p_pkg_name => G_PKG_NAME ,
4289: p_procedure_name => l_api_name
4290: );
4291: END Fetch_Plan_Format;

Line 4337: FND_MSG_PUB.Add_Exc_Msg

4333: EXCEPTION
4334: WHEN OTHERS THEN
4335: x_resource_list_member_id := NULL ;
4336: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4337: FND_MSG_PUB.Add_Exc_Msg
4338: ( p_pkg_name => G_PKG_NAME ,
4339: p_procedure_name => l_api_name
4340: );
4341: -- Not RAISING because other similar APIs dont have RAISE