[Home] [Help]
989:
990: -----------------------------------------------------------
991: -- Validation Logic:
992: -- The charge_account_id can not be null.
993: -- If it is not null, it must be a valid id in gl_code_combinations.
994: -----------------------------------------------------------
995: PROCEDURE charge_account_id(
996: p_id_tbl IN po_tbl_number,
997: p_charge_account_id_tbl IN po_tbl_number,
1040: WHERE (p_charge_account_id_tbl(i) IS NULL OR
1041: (p_charge_account_id_tbl(i) IS NOT NULL AND
1042: NOT EXISTS(
1043: SELECT NULL
1044: FROM gl_code_combinations gcc
1045: WHERE gcc.code_combination_id = p_charge_account_id_tbl(i)
1046: AND gcc.enabled_flag = 'Y'
1047: AND TRUNC(NVL(p_gl_date_tbl(i), SYSDATE)) BETWEEN TRUNC(NVL(start_date_active,
1048: NVL(p_gl_date_tbl(i), SYSDATE)))
1073: -----------------------------------------------------------
1074: -- Validation Logic:
1075: -- 1. If po_encumbrance_flag is Y, and destination_type_code is not 'SHOP FLOOR',
1076: -- the budget_account_id can not be null.
1077: -- 2. If the account_id is not null, it must be a valid id in gl_code_combinations.
1078: -----------------------------------------------------------
1079: PROCEDURE budget_account_id(
1080: p_id_tbl IN po_tbl_number,
1081: p_budget_account_id_tbl IN po_tbl_number,
1134: p_budget_account_id_tbl(i) IS NULL)
1135: OR ( p_budget_account_id_tbl(i) IS NOT NULL
1136: AND NOT EXISTS(
1137: SELECT NULL
1138: FROM gl_code_combinations gcc
1139: WHERE gcc.code_combination_id = p_budget_account_id_tbl(i)
1140: AND gcc.enabled_flag = 'Y'
1141: AND TRUNC(NVL(p_gl_date_tbl(i), SYSDATE)) BETWEEN TRUNC(NVL(start_date_active,
1142: NVL(p_gl_date_tbl(i), SYSDATE)))
1165: END budget_account_id;
1166:
1167: ----------------------------------------------------------------------------------
1168: -- Validation Logic:
1169: -- If the account_id is not null, it must be a valid id in gl_code_combinations.
1170: -- Used to validate accrual account id and variance account id.
1171: ----------------------------------------------------------------------------------
1172: PROCEDURE account_id(
1173: p_id_tbl IN po_tbl_number,
1222: FROM DUAL
1223: WHERE p_account_id_tbl(i) IS NOT NULL
1224: AND NOT EXISTS(
1225: SELECT NULL
1226: FROM gl_code_combinations gcc
1227: WHERE gcc.code_combination_id = p_account_id_tbl(i)
1228: AND gcc.enabled_flag = 'Y'
1229: AND TRUNC(NVL(p_gl_date_tbl(i), SYSDATE)) BETWEEN TRUNC(NVL(start_date_active,
1230: NVL(p_gl_date_tbl(i), SYSDATE)))