42: p_asset_id
43: ,p_log_level_rec => p_log_level_rec);
44: end if;
45:
46: FA_SRVR_MSG.Add_Message(
47: CALLING_FN => 'FA_REC_PVT_PKG1.Validate_Reclass_Basic'
48: ,p_log_level_rec => p_log_level_rec);
49: RETURN (FALSE);
50: END IF;
64: p_asset_id
65: ,p_log_level_rec => p_log_level_rec);
66: end if;
67:
68: FA_SRVR_MSG.Add_Message(
69: CALLING_FN => 'FA_REC_PVT_PKG1.Validate_Reclass_Basic'
70: ,p_log_level_rec => p_log_level_rec);
71: RETURN (FALSE);
72: END IF;
86: ADDITIONS validation engine in the future. */
87:
88: EXCEPTION
89: WHEN OTHERS THEN
90: FA_SRVR_MSG.Add_SQL_Error(
91: CALLING_FN => 'FA_REC_PVT_PKG1.Validate_Reclass_Basic'
92: ,p_log_level_rec => p_log_level_rec);
93: RETURN (FALSE);
94: END Validate_Reclass_Basic;
119: BK.BOOK_TYPE_CODE = BC.BOOK_TYPE_CODE AND
120: BC.DATE_INEFFECTIVE IS NULL;
121:
122: IF l_is_retired > 0 THEN
123: FA_SRVR_MSG.Add_Message(
124: CALLING_FN => 'FA_REC_PVT_PKG1.Check_Retirements',
125: NAME => 'FA_REC_RETIRED'
126: ,p_log_level_rec => p_log_level_rec);
127: RETURN (FALSE);
134: AND status IN ('PENDING', 'REINSTATE')
135: AND rownum < 2;
136:
137: IF (l_pending_retirements > 0) THEN
138: FA_SRVR_MSG.Add_Message(
139: CALLING_FN => 'FA_REC_PVT_PKG1.Check_Retirements',
140: NAME => 'FA_RET_PENDING_RETIREMENTS'
141: ,p_log_level_rec => p_log_level_rec);
142: RETURN (FALSE);
144:
145: RETURN (TRUE);
146: EXCEPTION
147: WHEN faurcl_error THEN
148: FA_SRVR_MSG.Add_Message(
149: CALLING_FN => 'FA_REC_PVT_PKG1.Check_Retirements'
150: ,p_log_level_rec => p_log_level_rec);
151: RETURN (FALSE);
152: WHEN OTHERS THEN
149: CALLING_FN => 'FA_REC_PVT_PKG1.Check_Retirements'
150: ,p_log_level_rec => p_log_level_rec);
151: RETURN (FALSE);
152: WHEN OTHERS THEN
153: FA_SRVR_MSG.Add_SQL_Error(
154: CALLING_FN => 'FA_REC_PVT_PKG1.Check_Retirements'
155: ,p_log_level_rec => p_log_level_rec);
156: RETURN (FALSE);
157: END Check_Retirements;
204: FETCH get_dh_units INTO l_dh_units;
205: CLOSE get_dh_units;
206:
207: IF (l_ah_units <> l_dh_units) THEN
208: FA_SRVR_MSG.Add_Message(
209: CALLING_FN => 'FA_REC_PVT_PKG1.Validate_Category_Change',
210: NAME => 'FA_SHARED_UNITS_UNBAL'
211: ,p_log_level_rec => p_log_level_rec);
212: RETURN (FALSE);
244: 'for the new category. See Setup Categories form.'
245: ,p_log_level_rec => p_log_level_rec);
246: end if;
247:
248: FA_SRVR_MSG.Add_Message(
249: CALLING_FN => 'FA_REC_PVT_PKG1.Validate_Category_Change',
250: NAME => 'FA_REC_CAT_BOOK_NOT_SETUP'
251: ,p_log_level_rec => p_log_level_rec);
252: /* Message text:
281: X_Lease_Id => l_lease_id,
282: X_Calling_Fn => 'FA_REC_PVT_PKG1.Validate_Category_Change',
283: p_log_level_rec => p_log_level_rec)
284: THEN
285: FA_SRVR_MSG.Add_Message(
286: CALLING_FN => 'FA_REC_PVT_PKG1.Validate_Category_Change'
287: ,p_log_level_rec => p_log_level_rec);
288: RETURN (FALSE);
289: END IF;
291: RETURN (TRUE);
292:
293: EXCEPTION
294: WHEN OTHERS THEN
295: FA_SRVR_MSG.Add_SQL_Error(
296: CALLING_FN => 'FA_REC_PVT_PKG1.Validate_Category_Change'
297: ,p_log_level_rec => p_log_level_rec);
298: RETURN (FALSE);
299: END Validate_Category_Change;
332: FETCH get_prior_trans_date INTO prior_trans_date;
333: CLOSE get_prior_trans_date;
334:
335: IF (p_trans_date < prior_trans_date) THEN
336: FA_SRVR_MSG.Add_Message(
337: CALLING_FN => 'FA_REC_PVT_PKG5.Check_Trans_Date',
338: NAME => 'FA_SHARED_OTHER_TRX_FOLLOW'
339: ,p_log_level_rec => p_log_level_rec);
340: RETURN (FALSE);
354: AND p_trans_date between
355: adp.calendar_period_open_date and adp.calendar_period_close_date;
356:
357: IF (check_another_trans > 0) THEN
358: FA_SRVR_MSG.Add_Message(
359: CALLING_FN => 'FA_REC_PVT_PKG5.Check_Trans_Date',
360: NAME => 'FA_SHARED_OTHER_TRX_FOLLOW'
361: ,p_log_level_rec => p_log_level_rec);
362: RETURN (FALSE);
365: RETURN (TRUE);
366:
367: EXCEPTION
368: WHEN OTHERS THEN
369: FA_SRVR_MSG.Add_SQL_Error(
370: CALLING_FN => 'FA_REC_PVT_PKG5.Check_Trans_Date'
371: ,p_log_level_rec => p_log_level_rec);
372: RETURN (FALSE);
373: END Check_Trans_Date;