1: PACKAGE BODY AML_MONITOR_CONDITIONS_PVT as
2: /* $Header: amlvlmcb.pls 115.6 2003/01/23 03:41:23 swkhanna noship $ */
3: -- Start of Comments
4: -- Package name : AML_MONITOR_CONDITIONS_PVT
5: -- Purpose :
1: PACKAGE BODY AML_MONITOR_CONDITIONS_PVT as
2: /* $Header: amlvlmcb.pls 115.6 2003/01/23 03:41:23 swkhanna noship $ */
3: -- Start of Comments
4: -- Package name : AML_MONITOR_CONDITIONS_PVT
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments
7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'AML_MONITOR_CONDITIONS_PVT';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'amlvlmcb.pls';
13: AS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
14:
15: -- ********************************************************
21: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
22: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
23: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
24: P_Identity_Resource_Id IN NUMBER,
25: P_CONDITION_Rec IN AML_MONITOR_CONDITIONS_PUB.CONDITION_Rec_Type,
26: X_MONITOR_CONDITION_ID OUT NOCOPY NUMBER,
27: X_Return_Status OUT NOCOPY VARCHAR2,
28: X_Msg_Count OUT NOCOPY NUMBER,
29: X_Msg_Data OUT NOCOPY VARCHAR2
107: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling create table handler');
108: END IF;
109:
110:
111: -- Invoke table handler(AML_MONITOR_CONDITIONS_PKG.Insert_Row)
112: AML_MONITOR_CONDITIONS_PKG.Insert_Row(
113: px_MONITOR_CONDITION_ID => x_MONITOR_CONDITION_ID
114: ,p_LAST_UPDATE_DATE => SYSDATE
115: ,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
108: END IF;
109:
110:
111: -- Invoke table handler(AML_MONITOR_CONDITIONS_PKG.Insert_Row)
112: AML_MONITOR_CONDITIONS_PKG.Insert_Row(
113: px_MONITOR_CONDITION_ID => x_MONITOR_CONDITION_ID
114: ,p_LAST_UPDATE_DATE => SYSDATE
115: ,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
116: ,p_CREATION_DATE => SYSDATE
226: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
227: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
228: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
229: p_identity_salesforce_id IN NUMBER,
230: P_CONDITION_Rec IN AML_MONITOR_CONDITIONS_PUB.CONDITION_Rec_Type,
231: X_Return_Status OUT NOCOPY VARCHAR2,
232: X_Msg_Count OUT NOCOPY NUMBER,
233: X_Msg_Data OUT NOCOPY VARCHAR2
234: )
278: ATTRIBUTE12,
279: ATTRIBUTE13,
280: ATTRIBUTE14,
281: ATTRIBUTE15
282: From AML_MONITOR_CONDITIONS
283: where monitor_condition_id = c_monitor_condition_id
284: For Update NOWAIT;
285:
286: l_api_name CONSTANT VARCHAR2(30) := 'Update_monitor_condition';
285:
286: l_api_name CONSTANT VARCHAR2(30) := 'Update_monitor_condition';
287: l_api_version_number CONSTANT NUMBER := 2.0;
288: -- Local Variables
289: l_ref_CONDITION_rec AML_MONITOR_CONDITIONS_PUB.CONDITION_Rec_Type;
290: l_tar_CONDITION_rec AML_MONITOR_CONDITIONS_PUB.CONDITION_Rec_Type := P_CONDITION_Rec;
291: l_rowid ROWID;
292: BEGIN
293: -- Standard Start of API savepoint
286: l_api_name CONSTANT VARCHAR2(30) := 'Update_monitor_condition';
287: l_api_version_number CONSTANT NUMBER := 2.0;
288: -- Local Variables
289: l_ref_CONDITION_rec AML_MONITOR_CONDITIONS_PUB.CONDITION_Rec_Type;
290: l_tar_CONDITION_rec AML_MONITOR_CONDITIONS_PUB.CONDITION_Rec_Type := P_CONDITION_Rec;
291: l_rowid ROWID;
292: BEGIN
293: -- Standard Start of API savepoint
294: SAVEPOINT UPDATE_MONITOR_CONDITION_PVT;
444: IF (AS_DEBUG_LOW_ON) THEN
445: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');
446: END IF;
447:
448: -- Invoke table handler(aml_MONITOR_CONDITIONS_PKG.Update_Row)
449: AML_MONITOR_CONDITIONS_PKG.Update_Row(
450: p_MONITOR_CONDITION_ID => p_CONDITION_rec.MONITOR_CONDITION_ID
451: ,p_LAST_UPDATE_DATE => SYSDATE
452: ,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
445: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling update table handler');
446: END IF;
447:
448: -- Invoke table handler(aml_MONITOR_CONDITIONS_PKG.Update_Row)
449: AML_MONITOR_CONDITIONS_PKG.Update_Row(
450: p_MONITOR_CONDITION_ID => p_CONDITION_rec.MONITOR_CONDITION_ID
451: ,p_LAST_UPDATE_DATE => SYSDATE
452: ,p_LAST_UPDATED_BY => FND_GLOBAL.USER_ID
453: ,p_CREATION_DATE => FND_API.G_MISS_DATE
554: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
555: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
556: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
557: p_identity_salesforce_id IN NUMBER,
558: P_CONDITION_Rec IN AML_MONITOR_CONDITIONS_PUB.CONDITION_Rec_Type,
559: X_Return_Status OUT NOCOPY VARCHAR2,
560: X_Msg_Count OUT NOCOPY NUMBER,
561: X_Msg_Data OUT NOCOPY VARCHAR2
562: )
604: IF (AS_DEBUG_LOW_ON) THEN
605: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling delete table handler');
606: END IF;
607:
608: -- Invoke table handler(aml_MONITOR_CONDITIONS_PKG.Delete_Row)
609: AML_MONITOR_CONDITIONS_PKG.Delete_Row(
610: p_process_rule_id => p_CONDITION_rec.PROCESS_RULE_ID);
611: --
612: -- End of API body
605: AS_UTILITY_PVT.Debug_Message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'Private API: Calling delete table handler');
606: END IF;
607:
608: -- Invoke table handler(aml_MONITOR_CONDITIONS_PKG.Delete_Row)
609: AML_MONITOR_CONDITIONS_PKG.Delete_Row(
610: p_process_rule_id => p_CONDITION_rec.PROCESS_RULE_ID);
611: --
612: -- End of API body
613: --
675: )
676: IS
677: CURSOR C_condition_Id_Exists (C_MONITOR_CONDITION_ID NUMBER) IS
678: SELECT 'X'
679: FROM aml_monitor_conditions
680: WHERE MONITOR_CONDITION_ID = C_MONITOR_CONDITION_ID;
681:
682: l_val VARCHAR2(1);
683: BEGIN
761: PROCEDURE Validate_monitor_condition(
762: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
763: P_Validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
764: P_Validation_mode IN VARCHAR2,
765: P_CONDITION_Rec IN AML_MONITOR_CONDITIONS_PUB.CONDITION_Rec_Type,
766: X_Return_Status OUT NOCOPY VARCHAR2,
767: X_Msg_Count OUT NOCOPY NUMBER,
768: X_Msg_Data OUT NOCOPY VARCHAR2
769: )
842:
843: pv_common_checks_pvt.Validate_Lookup(
844: p_init_msg_list => FND_API.G_FALSE,
845: p_validation_mode => p_validation_mode,
846: p_TABLE_NAME => 'AML_MONITOR_CONDITIONS',
847: p_COLUMN_NAME => 'MONITOR_TYPE_CODE',
848: p_lookup_type => 'MONITOR_TYPE',
849: p_lookup_code => P_CONDITION_Rec.MONITOR_TYPE_CODE,
850: x_return_status => x_return_status,
864:
865: pv_common_checks_pvt.Validate_Lookup(
866: p_init_msg_list => FND_API.G_FALSE,
867: p_validation_mode => p_validation_mode,
868: p_TABLE_NAME => 'AML_MONITOR_CONDITIONS',
869: p_COLUMN_NAME => 'TIME_LAG_UOM_CODE',
870: p_lookup_type => 'PV_TIMEOUT_UOM',
871: p_lookup_code => P_CONDITION_Rec.TIME_LAG_UOM_CODE,
872: x_return_status => x_return_status,
889:
890: pv_common_checks_pvt.Validate_Lookup(
891: p_init_msg_list => FND_API.G_FALSE,
892: p_validation_mode => p_validation_mode,
893: p_TABLE_NAME => 'AML_MONITOR_CONDITIONS',
894: p_COLUMN_NAME => 'TIME_LAG_FROM_STAGE',
895: p_lookup_type => 'TIME_LAG_FROM_STAGE',
896: p_lookup_code => P_CONDITION_Rec.TIME_LAG_FROM_STAGE,
897: x_return_status => x_return_status,
932:
933: pv_common_checks_pvt.Validate_Lookup(
934: p_init_msg_list => FND_API.G_FALSE,
935: p_validation_mode => p_validation_mode,
936: p_TABLE_NAME => 'AML_MONITOR_CONDITIONS',
937: p_COLUMN_NAME => 'REMINDER_FREQ_UOM_CODE',
938: p_lookup_type => 'PV_TIMEOUT_UOM',
939: p_lookup_code => P_CONDITION_Rec.REMINDER_FREQ_UOM_CODE,
940: x_return_status => x_return_status,
954:
955: pv_common_checks_pvt.Validate_Lookup(
956: p_init_msg_list => FND_API.G_FALSE,
957: p_validation_mode => p_validation_mode,
958: p_TABLE_NAME => 'AML_MONITOR_CONDITIONS',
959: p_COLUMN_NAME => 'TIMEOUT_UOM_CODE',
960: p_lookup_type => 'PV_TIMEOUT_UOM',
961: p_lookup_code => P_CONDITION_Rec.TIMEOUT_UOM_CODE,
962: x_return_status => x_return_status,
1045:
1046: END Validate_monitor_condition;
1047:
1048:
1049: End AML_MONITOR_CONDITIONS_PVT;