DBA Data[Home] [Help]

APPS.FA_INS_ADJUST_PKG dependencies on FA_INS_ADJUST_PKG

Line 1: PACKAGE BODY FA_INS_ADJUST_PKG as

1: PACKAGE BODY FA_INS_ADJUST_PKG as
2: /* $Header: FAXIAJ2B.pls 120.16.12010000.2 2009/01/23 21:58:09 bridgway ship $ */
3:
4:
5: -----------------------------------------------------------------------

Line 35: (fname => 'FA_INS_ADJUST_PKG.fadoflx',

31: BEGIN <>
32:
33: if (p_log_level_rec.statement_level) then
34: FA_DEBUG_PKG.ADD
35: (fname => 'FA_INS_ADJUST_PKG.fadoflx',
36: element => 'Dist Ccid in fadoflx is',
37: value => X_dist_ccid
38: ,p_log_level_rec => p_log_level_rec);
39: end if;

Line 53: 'FA_INS_ADJUST_PKG.fadoflx',

49: -- gen ccid
50: X_calculated_ccid := X_spec_ccid;
51: if (p_log_level_rec.statement_level) then
52: FA_DEBUG_PKG.ADD (
53: 'FA_INS_ADJUST_PKG.fadoflx',
54: 'h_calc_ccid',
55: X_spec_ccid
56: ,p_log_level_rec => p_log_level_rec);
57: end if;

Line 65: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoflx'

61: return TRUE;
62:
63: EXCEPTION
64: WHEN OTHERS then
65: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoflx'
66: ,p_log_level_rec => p_log_level_rec);
67: return FALSE;
68: END fadoflx;
69:

Line 114: 'FA_INS_ADJUST_PKG.factotp',

110:
111: total_amount := h_total_amount;
112: if (p_log_level_rec.statement_level) then
113: FA_DEBUG_PKG.ADD (
114: 'FA_INS_ADJUST_PKG.factotp',
115: 'total_amount',
116: h_total_amount
117: ,p_log_level_rec => p_log_level_rec);
118: end if;

Line 159: (fname => 'FA_INS_ADJUST_PKG.facdamt',

155:
156: adj_dd_amount := h_adj_dd_amount;
157: if (p_log_level_rec.statement_level) then
158: FA_DEBUG_PKG.ADD
159: (fname => 'FA_INS_ADJUST_PKG.facdamt',
160: element => 'h_adj_dd_amount',
161: value => h_adj_dd_amount
162: ,p_log_level_rec => p_log_level_rec);
163: end if;

Line 168: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.facdamt'

164: return TRUE;
165:
166: EXCEPTION
167: WHEN OTHERS then
168: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.facdamt'
169: ,p_log_level_rec => p_log_level_rec);
170: return FALSE;
171: END facdamt;
172:

Line 204: CALLING_FN => 'FA_INS_ADJUST_PKG.fagetcc'

200:
201: EXCEPTION
202: WHEN NO_DATA_FOUND then
203: FA_SRVR_MSG.ADD_MESSAGE (NAME => h_mesg_name,
204: CALLING_FN => 'FA_INS_ADJUST_PKG.fagetcc'
205: ,p_log_level_rec => p_log_level_rec);
206: return FALSE;
207: WHEN OTHERS then
208: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fagetcc'

Line 208: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fagetcc'

204: CALLING_FN => 'FA_INS_ADJUST_PKG.fagetcc'
205: ,p_log_level_rec => p_log_level_rec);
206: return FALSE;
207: WHEN OTHERS then
208: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fagetcc'
209: ,p_log_level_rec => p_log_level_rec);
210: return FALSE;
211:
212: END fagetcc;

Line 368: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fainajc'

364: -- Bug 2723165 : Added faxrnd rounding func.
365: IF (NOT FA_UTILS_PKG.faxrnd(X_amount => adj_ptr.adjustment_amount,
366: X_book => adj_ptr.book_type_code
367: ,p_log_level_rec => p_log_level_rec)) THEN
368: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fainajc'
369: ,p_log_level_rec => p_log_level_rec);
370: return (FALSE);
371: END IF;
372:

Line 604: CALLING_FN => 'FA_INS_ADJUST_PKG.fainajc'

600: EXCEPTION
601: WHEN NO_DATA_FOUND then
602: FA_SRVR_MSG.ADD_MESSAGE
603: (NAME => h_mesg_name,
604: CALLING_FN => 'FA_INS_ADJUST_PKG.fainajc'
605: ,p_log_level_rec => p_log_level_rec);
606: return FALSE;
607: WHEN OTHERS then
608: FA_SRVR_MSG.ADD_SQL_ERROR

Line 609: (CALLING_FN => 'FA_INS_ADJUST_PKG.fainajc'

605: ,p_log_level_rec => p_log_level_rec);
606: return FALSE;
607: WHEN OTHERS then
608: FA_SRVR_MSG.ADD_SQL_ERROR
609: (CALLING_FN => 'FA_INS_ADJUST_PKG.fainajc'
610: ,p_log_level_rec => p_log_level_rec);
611: return FALSE;
612: END fainajc;
613:

Line 672: (fname => 'FA_INS_ADJUST_PKG.fadoact',

668: h_asset_id := adj_ptr.asset_id;
669:
670: if (p_log_level_rec.statement_level) then
671: FA_DEBUG_PKG.ADD
672: (fname => 'FA_INS_ADJUST_PKG.fadoact',
673: element => 'Before Flush',
674: value => 'TRUE'
675: ,p_log_level_rec => p_log_level_rec);
676: end if;

Line 686: (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'

682: X_last_updated_by => X_last_updated_by,
683: X_last_update_login => X_last_update_login
684: ,p_log_level_rec => p_log_level_rec)) then
685: FA_SRVR_MSG.ADD_MESSAGE
686: (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'
687: ,p_log_level_rec => p_log_level_rec);
688: return FALSE;
689: end if;
690:

Line 704: 'FA_INS_ADJUST_PKG.fadoact',

700: (H_DPR_ROW,
701: 'STANDARD',
702: FALSE,
703: H_SUCCESS,
704: 'FA_INS_ADJUST_PKG.fadoact',
705: -1
706: ,p_log_level_rec => p_log_level_rec);
707:
708: -- Assign H_DPR_ROW to dpr_ptr

Line 715: (fname => 'FA_INS_ADJUST_PKG.fadoact',

711: -- Calculate the total_amount to prorate based on the
712: -- adjustment_type.
713: if (p_log_level_rec.statement_level) then
714: FA_DEBUG_PKG.ADD
715: (fname => 'FA_INS_ADJUST_PKG.fadoact',
716: element => 'ALL BLANKS',
717: value => ' '
718: ,p_log_level_rec => p_log_level_rec);
719: FA_DEBUG_PKG.ADD

Line 720: (fname => 'FA_INS_ADJUST_PKG.fadoact',

716: element => 'ALL BLANKS',
717: value => ' '
718: ,p_log_level_rec => p_log_level_rec);
719: FA_DEBUG_PKG.ADD
720: (fname => 'FA_INS_ADJUST_PKG.fadoact',
721: element => 'adj_ptr.amount',
722: value => h_adjustment_amount
723: ,p_log_level_rec => p_log_level_rec);
724: end if;

Line 731: (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'

727: (total_amount => h_total_amount,
728: adjustment_amount => h_adjustment_amount
729: ,p_log_level_rec => p_log_level_rec)) then
730: FA_SRVR_MSG.ADD_MESSAGE
731: (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'
732: ,p_log_level_rec => p_log_level_rec);
733: return FALSE;
734: end if;
735:

Line 738: (fname => 'FA_INS_ADJUST_PKG.fadoact',

734: end if;
735:
736: if (p_log_level_rec.statement_level) then
737: FA_DEBUG_PKG.ADD
738: (fname => 'FA_INS_ADJUST_PKG.fadoact',
739: element => 'Total Amount',
740: value => h_total_amount
741: ,p_log_level_rec => p_log_level_rec);
742: end if;

Line 837: (fname => 'FA_INS_ADJUST_PKG.fadoact',

833: else
834: -- Last distribution gets extra
835: if (p_log_level_rec.statement_level) then
836: FA_DEBUG_PKG.ADD
837: (fname => 'FA_INS_ADJUST_PKG.fadoact',
838: element => 'Total Amount',
839: value => h_total_amount
840: ,p_log_level_rec => p_log_level_rec);
841: end if;

Line 860: (fname => 'FA_INS_ADJUST_PKG.fadoact',

856: end if;
857:
858: if (p_log_level_rec.statement_level) then
859: FA_DEBUG_PKG.ADD
860: (fname => 'FA_INS_ADJUST_PKG.fadoact',
861: element => 'ADJ_PTR.ADJUSTMENT.AMOUNT -LAST DIST',
862: value => h_adjustment_amount
863: ,p_log_level_rec => p_log_level_rec);
864: FA_DEBUG_PKG.ADD

Line 865: (fname => 'FA_INS_ADJUST_PKG.fadoact',

861: element => 'ADJ_PTR.ADJUSTMENT.AMOUNT -LAST DIST',
862: value => h_adjustment_amount
863: ,p_log_level_rec => p_log_level_rec);
864: FA_DEBUG_PKG.ADD
865: (fname => 'FA_INS_ADJUST_PKG.fadoact',
866: element => 'AMOUNT SO FAR-LAST DIST',
867: value => h_amount_so_far
868: ,p_log_level_rec => p_log_level_rec);
869: end if;

Line 875: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'

871: -- Round the h_amount_to_insert - faxrnd.....
872: IF (NOT FA_UTILS_PKG.faxrnd(X_amount => h_amount_to_insert,
873: X_book => adj_ptr.book_type_code
874: ,p_log_level_rec => p_log_level_rec)) THEN
875: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'
876: ,p_log_level_rec => p_log_level_rec);
877: return (FALSE);
878: END IF;
879:

Line 883: (fname => 'FA_INS_ADJUST_PKG.fadoact',

879:
880: h_amount_so_far:=h_amount_so_far+h_amount_to_insert;
881: if (p_log_level_rec.statement_level) then
882: FA_DEBUG_PKG.ADD
883: (fname => 'FA_INS_ADJUST_PKG.fadoact',
884: element => 'dist ccid in fadoact',
885: value => h_dist_ccid
886: ,p_log_level_rec => p_log_level_rec);
887: FA_DEBUG_PKG.ADD

Line 888: (fname => 'FA_INS_ADJUST_PKG.fadoact',

884: element => 'dist ccid in fadoact',
885: value => h_dist_ccid
886: ,p_log_level_rec => p_log_level_rec);
887: FA_DEBUG_PKG.ADD
888: (fname => 'FA_INS_ADJUST_PKG.fadoact',
889: element => 'Amount so far-amount inserted ',
890: value => h_amount_so_far
891: ,p_log_level_rec => p_log_level_rec);
892: end if;

Line 925: (fname => 'FA_INS_ADJUST_PKG.fadoact',

921: end if;
922:
923: if (p_log_level_rec.statement_level) then
924: FA_DEBUG_PKG.ADD
925: (fname => 'FA_INS_ADJUST_PKG.fadoact',
926: element => 'Adj Amt in fadoact',
927: value => h_amount_to_insert
928: ,p_log_level_rec => p_log_level_rec);
929: end if;

Line 942: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'

938: X_last_update_date => X_last_update_date,
939: X_last_updated_by => X_last_updated_by,
940: X_last_update_login => X_last_update_login
941: ,p_log_level_rec => p_log_level_rec)) then
942: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'
943: ,p_log_level_rec => p_log_level_rec);
944: return FALSE;
945: end if;
946: end loop;

Line 953: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'

949: return TRUE;
950:
951: exception
952: when others then
953: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoact'
954: ,p_log_level_rec => p_log_level_rec);
955: return FALSE;
956:
957: END fadoact;

Line 1023: CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr'

1019: X_last_update_login => X_last_update_login
1020: ,p_log_level_rec => p_log_level_rec)) then
1021: FA_SRVR_MSG.ADD_MESSAGE
1022: (NAME => 'FA_GET_CAT_ID',
1023: CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr'
1024: ,p_log_level_rec => p_log_level_rec);
1025: return FALSE;
1026: end if;
1027:

Line 1032: (fname => 'FA_INS_ADJUST_PKG.fadoclr',

1028: -- no need to call book controls cache here - it should already be loaded
1029: h_dist_book := FA_CACHE_PKG.fazcbc_record.distribution_source_book;
1030: if (p_log_level_rec.statement_level) then
1031: FA_DEBUG_PKG.ADD
1032: (fname => 'FA_INS_ADJUST_PKG.fadoclr',
1033: element => 'Dist Ccid in fadoclr is',
1034: value => h_dist_ccid
1035: ,p_log_level_rec => p_log_level_rec);
1036: end if;

Line 1062: 'FA_INS_ADJUST_PKG.fadoclr',

1058: (H_DPR_ROW,
1059: 'STANDARD',
1060: FALSE,
1061: H_SUCCESS,
1062: 'FA_INS_ADJUST_PKG.fadoclr',
1063: -1
1064: ,p_log_level_rec => p_log_level_rec);
1065:
1066: -- Assign H_DPR_ROW to dpr_ptr. They are of same type

Line 1072: (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr',

1068:
1069: -- call facdamt to calculate the detail amount for leveling
1070: if (not facdamt(adj_dd_amount=>h_adj_dd_amount)) then
1071: FA_SRVR_MSG.ADD_MESSAGE
1072: (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr',
1073: NAME => h_mesg_name
1074: ,p_log_level_rec => p_log_level_rec);
1075: end if;
1076:

Line 1081: (fname => 'FA_INS_ADJUST_PKG.fadoclr',

1077: h_amount_to_insert := h_adj_dd_amount;
1078:
1079: if (p_log_level_rec.statement_level) then
1080: FA_DEBUG_PKG.ADD
1081: (fname => 'FA_INS_ADJUST_PKG.fadoclr',
1082: element => 'JUST BLANK',
1083: value => '00000000000000000000000000'
1084: ,p_log_level_rec => p_log_level_rec);
1085: FA_DEBUG_PKG.ADD

Line 1086: (fname => 'FA_INS_ADJUST_PKG.fadoclr',

1082: element => 'JUST BLANK',
1083: value => '00000000000000000000000000'
1084: ,p_log_level_rec => p_log_level_rec);
1085: FA_DEBUG_PKG.ADD
1086: (fname => 'FA_INS_ADJUST_PKG.fadoclr',
1087: element => 'DD ADJ AMOUNT-after FACDAMT',
1088: value => h_adj_dd_amount
1089: ,p_log_level_rec => p_log_level_rec);
1090: FA_DEBUG_PKG.ADD

Line 1091: (fname => 'FA_INS_ADJUST_PKG.fadoclr',

1087: element => 'DD ADJ AMOUNT-after FACDAMT',
1088: value => h_adj_dd_amount
1089: ,p_log_level_rec => p_log_level_rec);
1090: FA_DEBUG_PKG.ADD
1091: (fname => 'FA_INS_ADJUST_PKG.fadoclr',
1092: element => 'amount to insert-after FACDAMT',
1093: value => h_amount_to_insert
1094: ,p_log_level_rec => p_log_level_rec);
1095: end if;

Line 1103: CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr'

1099: IF (NOT FA_UTILS_PKG.faxrnd(X_amount => h_amount_to_insert,
1100: X_book => adj_ptr.book_type_code
1101: ,p_log_level_rec => p_log_level_rec)) THEN
1102: FA_SRVR_MSG.add_message(
1103: CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr'
1104: ,p_log_level_rec => p_log_level_rec);
1105: return (FALSE);
1106: END IF;
1107:

Line 1113: (fname => 'FA_INS_ADJUST_PKG.fadoclr',

1109: h_amount_so_far := h_amount_so_far + h_amount_to_insert;
1110:
1111: if (p_log_level_rec.statement_level) then
1112: FA_DEBUG_PKG.ADD
1113: (fname => 'FA_INS_ADJUST_PKG.fadoclr',
1114: element => 'amount to insert-AFTER ROUNDING',
1115: value => h_amount_to_insert
1116: ,p_log_level_rec => p_log_level_rec);
1117: FA_DEBUG_PKG.ADD

Line 1118: (fname => 'FA_INS_ADJUST_PKG.fadoclr',

1114: element => 'amount to insert-AFTER ROUNDING',
1115: value => h_amount_to_insert
1116: ,p_log_level_rec => p_log_level_rec);
1117: FA_DEBUG_PKG.ADD
1118: (fname => 'FA_INS_ADJUST_PKG.fadoclr',
1119: element => 'amount so far-AFTER ROUNDING',
1120: value => h_amount_so_far
1121: ,p_log_level_rec => p_log_level_rec);
1122: end if;

Line 1166: CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr'

1162: X_last_update_login => X_last_update_login
1163: ,p_log_level_rec => p_log_level_rec)) then
1164: FA_SRVR_MSG.ADD_MESSAGE
1165: (NAME => 'FA_GET_CAT_ID',
1166: CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr'
1167: ,p_log_level_rec => p_log_level_rec);
1168: return FALSE;
1169: end if;
1170: end if; -- thid<>adj_ptr.selection_thid

Line 1177: (fname => 'FA_INS_ADJUST_PKG.fadoclr',

1173: adj_ptr.amount_inserted := h_amount_so_far;
1174:
1175: if (p_log_level_rec.statement_level) then
1176: FA_DEBUG_PKG.ADD
1177: (fname => 'FA_INS_ADJUST_PKG.fadoclr',
1178: element => 'AMOUNT INSERTED ',
1179: value => adj_ptr.amount_inserted
1180: ,p_log_level_rec => p_log_level_rec);
1181: FA_DEBUG_PKG.ADD

Line 1182: (fname => 'FA_INS_ADJUST_PKG.fadoclr',

1178: element => 'AMOUNT INSERTED ',
1179: value => adj_ptr.amount_inserted
1180: ,p_log_level_rec => p_log_level_rec);
1181: FA_DEBUG_PKG.ADD
1182: (fname => 'FA_INS_ADJUST_PKG.fadoclr',
1183: element => 'AMOUNT SO FAR ',
1184: value => h_amount_so_far
1185: ,p_log_level_rec => p_log_level_rec);
1186: end if;

Line 1192: (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr'

1188:
1189: exception
1190: when others then
1191: FA_SRVR_MSG.ADD_SQL_ERROR
1192: (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoclr'
1193: ,p_log_level_rec => p_log_level_rec);
1194: return FALSE;
1195:
1196: END fadoclr;

Line 1218: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.fadosglf'

1214: X_last_update_date => X_last_update_date,
1215: X_last_updated_by => X_last_updated_by,
1216: X_last_update_login => X_last_update_login
1217: ,p_log_level_rec => p_log_level_rec)) then
1218: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.fadosglf'
1219: ,p_log_level_rec => p_log_level_rec);
1220: return FALSE;
1221: end if;
1222:

Line 1249: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosglf'

1245: -- faxrnd(adj_ptr.adjustment_amount,adj_ptr.book_type_code
1246: if (not FA_UTILS_PKG.faxrnd(X_amount => adj_ptr.adjustment_amount,
1247: X_book => adj_ptr.book_type_code
1248: ,p_log_level_rec => p_log_level_rec))then
1249: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosglf'
1250: ,p_log_level_rec => p_log_level_rec);
1251: return (FALSE);
1252: end if;
1253:

Line 1271: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.fadosglf'

1267: X_last_update_date => X_last_update_date,
1268: X_last_updated_by => X_last_updated_by,
1269: X_last_update_login => X_last_update_login
1270: ,p_log_level_rec => p_log_level_rec)) then
1271: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.fadosglf'
1272: ,p_log_level_rec => p_log_level_rec);
1273: return FALSE;
1274: end if;
1275:

Line 1278: FA_DEBUG_PKG.ADD (fname => 'FA_INS_ADJUST_PKG.fadosglf',

1274: end if;
1275:
1276: adj_ptr.amount_inserted:=adj_ptr.adjustment_amount;
1277: if (p_log_level_rec.statement_level) then
1278: FA_DEBUG_PKG.ADD (fname => 'FA_INS_ADJUST_PKG.fadosglf',
1279: element => 'Amt Inserted-before return',
1280: value => adj_ptr.amount_inserted
1281: ,p_log_level_rec => p_log_level_rec);
1282: end if;

Line 1287: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosglf'

1283: return TRUE;
1284:
1285: exception
1286: when others then
1287: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosglf'
1288: ,p_log_level_rec => p_log_level_rec);
1289: return FALSE;
1290:
1291: END fadosglf;

Line 1332: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosgl'

1328: -- faxrnd(adj_ptr.adjustment_amount,adj_ptr.book_type_code
1329: if (not FA_UTILS_PKG.faxrnd(X_amount => adj_ptr.adjustment_amount,
1330: X_book => adj_ptr.book_type_code
1331: ,p_log_level_rec => p_log_level_rec)) then
1332: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosgl'
1333: ,p_log_level_rec => p_log_level_rec);
1334: return (FALSE);
1335: end if;
1336:

Line 1356: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosgl'

1352: X_last_update_date => X_last_update_date,
1353: X_last_updated_by => X_last_updated_by,
1354: X_last_update_login => X_last_update_login
1355: ,p_log_level_rec => p_log_level_rec)) then
1356: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosgl'
1357: ,p_log_level_rec => p_log_level_rec);
1358: return FALSE;
1359: end if;
1360:

Line 1366: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosgl'

1362: return TRUE;
1363:
1364: exception
1365: when others then
1366: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadosgl'
1367: ,p_log_level_rec => p_log_level_rec);
1368: return FALSE;
1369: END fadosgl;
1370:

Line 1425: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'

1421: X_last_update_date => X_last_update_date,
1422: X_last_updated_by => X_last_updated_by,
1423: X_last_update_login => X_last_update_login
1424: ,p_log_level_rec => p_log_level_rec)) then
1425: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'
1426: ,p_log_level_rec => p_log_level_rec);
1427: return FALSE;
1428: end if;
1429:

Line 1442: 'FA_INS_ADJUST_PKG.fadoret',

1438: FA_QUERY_BALANCES_PKG.QUERY_BALANCES_INT(H_DPR_ROW,
1439: 'STANDARD',
1440: FALSE,
1441: H_SUCCESS,
1442: 'FA_INS_ADJUST_PKG.fadoret',
1443: -1
1444: ,p_log_level_rec => p_log_level_rec);
1445: -- Assign H_DPR_ROW to dpr_ptr. They are of same type
1446: dpr_ptr:=H_DPR_ROW;

Line 1451: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'

1447:
1448: if (not factotp(total_amount=>h_total_amount,
1449: adjustment_amount=>h_adjustment_amount
1450: ,p_log_level_rec => p_log_level_rec)) then
1451: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'
1452: ,p_log_level_rec => p_log_level_rec);
1453: return FALSE;
1454: end if;
1455:

Line 1532: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'

1528: /* bug 3519644 */
1529: IF (NOT FA_UTILS_PKG.faxrnd(X_amount => h_amount_to_insert,
1530: X_book => adj_ptr.book_type_code
1531: ,p_log_level_rec => p_log_level_rec)) THEN
1532: FA_SRVR_MSG.add_message(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'
1533: ,p_log_level_rec => p_log_level_rec);
1534: return (FALSE);
1535: END IF;
1536: /* bug 3519644 */

Line 1541: (fname => 'FA_INS_ADJUST_PKG.fadoact',

1537:
1538: h_amount_so_far:=h_amount_so_far+h_amount_to_insert;
1539: if (p_log_level_rec.statement_level) then
1540: FA_DEBUG_PKG.ADD
1541: (fname => 'FA_INS_ADJUST_PKG.fadoact',
1542: element => 'dist ccid in fadoact',
1543: value => h_dist_ccid
1544: ,p_log_level_rec => p_log_level_rec);
1545: end if;

Line 1585: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'

1581: X_last_update_date => X_last_update_date,
1582: X_last_updated_by => X_last_updated_by,
1583: X_last_update_login => X_last_update_login
1584: ,p_log_level_rec => p_log_level_rec)) then
1585: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'
1586: ,p_log_level_rec => p_log_level_rec);
1587: return FALSE;
1588: end if;
1589:

Line 1596: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'

1592: return TRUE;
1593:
1594: exception
1595: when others then
1596: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.fadoret'
1597: ,p_log_level_rec => p_log_level_rec);
1598: return FALSE;
1599:
1600: END fadoret;

Line 1628: (fname => 'FA_INS_ADJUST_PKG.faxinaj',

1624:
1625:
1626: IF (p_log_level_rec.statement_level) then
1627: FA_DEBUG_PKG.ADD
1628: (fname => 'FA_INS_ADJUST_PKG.faxinaj',
1629: element => 'adj amt - first',
1630: value => adj_ptr.adjustment_amount
1631: ,p_log_level_rec => p_log_level_rec);
1632: FA_DEBUG_PKG.ADD

Line 1633: (fname => 'FA_INS_ADJUST_PKG.faxinaj',

1629: element => 'adj amt - first',
1630: value => adj_ptr.adjustment_amount
1631: ,p_log_level_rec => p_log_level_rec);
1632: FA_DEBUG_PKG.ADD
1633: (fname => 'FA_INS_ADJUST_PKG.faxinaj',
1634: element => 'deprn_override_flag',
1635: value => adj_ptr.deprn_override_flag
1636: ,p_log_level_rec => p_log_level_rec);
1637: end if;

Line 1651: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1647: ,p_log_level_rec => p_log_level_rec)) then
1648: adj_table.delete;
1649: h_cache_index := 0;
1650:
1651: FA_SRVR_MSG.ADD_MESSAGE (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1652: ,p_log_level_rec => p_log_level_rec);
1653: return FALSE;
1654: end if;
1655: else

Line 1663: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1659: ,p_log_level_rec => p_log_level_rec)) then
1660: adj_table.delete;
1661: h_cache_index := 0;
1662:
1663: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1664: ,p_log_level_rec => p_log_level_rec);
1665: return FALSE;
1666: end if;
1667:

Line 1677: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1673: ,p_log_level_rec => p_log_level_rec)) then
1674: adj_table.delete;
1675: h_cache_index := 0;
1676:
1677: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1678: ,p_log_level_rec => p_log_level_rec);
1679: return FALSE;
1680: end if;
1681: elsif (adj_ptr.selection_mode=FA_ADJUST_TYPE_PKG.FA_AJ_ACTIVE_REVAL) then -- YYOON

Line 1690: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1686: ,p_log_level_rec => p_log_level_rec)) then
1687: adj_table.delete;
1688: h_cache_index := 0;
1689:
1690: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1691: ,p_log_level_rec => p_log_level_rec);
1692: return FALSE;
1693: end if;
1694: elsif (adj_ptr.selection_mode=FA_ADJUST_TYPE_PKG.FA_AJ_SINGLE) then

Line 1703: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1699: ,p_log_level_rec => p_log_level_rec)) then
1700: adj_table.delete;
1701: h_cache_index := 0;
1702:
1703: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1704: ,p_log_level_rec => p_log_level_rec);
1705: return FALSE;
1706: end if;
1707: elsif (adj_ptr.selection_mode=FA_ADJUST_TYPE_PKG.FA_AJ_TRANSFER_SINGLE) then

Line 1716: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1712: ,p_log_level_rec => p_log_level_rec)) then
1713: adj_table.delete;
1714: h_cache_index := 0;
1715:
1716: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1717: ,p_log_level_rec => p_log_level_rec);
1718: return FALSE;
1719: end if;
1720: elsif (adj_ptr.selection_mode in (FA_ADJUST_TYPE_PKG.FA_AJ_CLEAR, FA_ADJUST_TYPE_PKG.FA_AJ_CLEAR_PARTIAL)) then

Line 1729: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1725: ,p_log_level_rec => p_log_level_rec)) then
1726: adj_table.delete;
1727: h_cache_index := 0;
1728:
1729: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1730: ,p_log_level_rec => p_log_level_rec);
1731: return FALSE;
1732: end if;
1733: elsif (adj_ptr.selection_mode=FA_ADJUST_TYPE_PKG.FA_AJ_RETIRE) then

Line 1742: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1738: ,p_log_level_rec => p_log_level_rec)) then
1739: adj_table.delete;
1740: h_cache_index := 0;
1741:
1742: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1743: ,p_log_level_rec => p_log_level_rec);
1744: return FALSE;
1745: end if;
1746: else

Line 1752: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj',

1748: adj_table.delete;
1749: h_cache_index := 0;
1750:
1751: FA_SRVR_MSG.ADD_MESSAGE
1752: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj',
1753: NAME => 'FA_INS_ADJ_BAD_MODE'
1754: ,p_log_level_rec => p_log_level_rec);
1755: return FALSE;
1756: end if; -- of adj_ptr.selection_mode

Line 1772: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1768: ,p_log_level_rec => p_log_level_rec)) then
1769: adj_table.delete;
1770: h_cache_index := 0;
1771:
1772: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1773: ,p_log_level_rec => p_log_level_rec);
1774: return FALSE;
1775: end if;
1776: end if;

Line 1782: (fname => 'FA_INS_ADJUST_PKG.faxinaj',

1778: adj_ptr_passed.amount_inserted := adj_ptr.amount_inserted;
1779:
1780: IF (p_log_level_rec.statement_level) then
1781: FA_DEBUG_PKG.ADD
1782: (fname => 'FA_INS_ADJUST_PKG.faxinaj',
1783: element => 'adj inserted - BEFORE RETURN',
1784: value => adj_ptr_passed.amount_inserted
1785: ,p_log_level_rec => p_log_level_rec);
1786: end if;

Line 1791: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'

1787: return TRUE;
1788:
1789: exception
1790: when others then
1791: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinaj'
1792: ,p_log_level_rec => p_log_level_rec);
1793: return FALSE;
1794: END faxinaj;
1795:

Line 1856: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj',

1852: adj_ptr_local.account_type := X_account_type;
1853:
1854: if (X_current_units=0) then
1855: FA_SRVR_MSG.ADD_MESSAGE
1856: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj',
1857: NAME => 'FA_INS_ADJ_ZERO_UNITS'
1858: ,p_log_level_rec => p_log_level_rec);
1859: return FALSE;
1860: end if;

Line 1869: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj',

1865: elsif (X_selection_mode='SINGLE') then
1866: adj_ptr_local.selection_mode := FA_ADJUST_TYPE_PKG.FA_AJ_SINGLE;
1867: else
1868: FA_SRVR_MSG.ADD_MESSAGE
1869: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj',
1870: NAME => 'FA_INS_ADJ_BAD_SEL_MODE'
1871: ,p_log_level_rec => p_log_level_rec);
1872: return FALSE;
1873: end if;

Line 1881: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj',

1877: elsif (X_flush_adj_flag='FALSE') then
1878: adj_ptr_local.flush_adj_flag:=FALSE;
1879: else
1880: FA_SRVR_MSG.ADD_MESSAGE
1881: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj',
1882: NAME => 'FA_INS_ADJ_BAD_FLUSH_FLAG'
1883: ,p_log_level_rec => p_log_level_rec);
1884: return FALSE;
1885: end if;

Line 1893: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj',

1889: elsif (X_gen_ccid_flag='FALSE') then
1890: adj_ptr_local.gen_ccid_flag:=FALSE;
1891: else
1892: FA_SRVR_MSG.ADD_MESSAGE
1893: (CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj',
1894: NAME => 'FA_INS_ADJ_BAD_GEN_CCID_FLAG'
1895: ,p_log_level_rec => p_log_level_rec);
1896: return FALSE;
1897: end if;

Line 1914: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj'

1910: X_last_update_date,
1911: X_last_updated_by,
1912: X_last_update_login
1913: ,p_log_level_rec => p_log_level_rec)) then
1914: FA_SRVR_MSG.ADD_MESSAGE(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj'
1915: ,p_log_level_rec => p_log_level_rec);
1916: return FALSE;
1917: end if;
1918:

Line 1925: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj'

1921: return TRUE;
1922:
1923: exception
1924: when others then
1925: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => 'FA_INS_ADJUST_PKG.faxinadj'
1926: ,p_log_level_rec => p_log_level_rec);
1927: return FALSE;
1928:
1929: END faxinadj;

Line 1931: END FA_INS_ADJUST_PKG;

1927: return FALSE;
1928:
1929: END faxinadj;
1930:
1931: END FA_INS_ADJUST_PKG;