930: message_name => 'ENG_ENUBRT_ERROR',
931: token => SQLERRM);
932: END;
933:
934: IF (PJM_UNIT_EFF.Enabled = 'Y' AND
935: PJM_UNIT_EFF.Unit_Effective_Item(
936: X_Item_ID => X_item_id,
937: X_Organization_ID => X_org_id) = 'Y')
938: THEN
931: token => SQLERRM);
932: END;
933:
934: IF (PJM_UNIT_EFF.Enabled = 'Y' AND
935: PJM_UNIT_EFF.Unit_Effective_Item(
936: X_Item_ID => X_item_id,
937: X_Organization_ID => X_org_id) = 'Y')
938: THEN
939: X_unit_assembly := 'Y';
1026: -- date, then transfer will fail
1027:
1028: X_stmt_num := 301;
1029:
1030: IF (PJM_UNIT_EFF.Enabled = 'Y' AND
1031: PJM_UNIT_EFF.Unit_Effective_Item(
1032: X_Item_ID => X_item_id,
1033: X_Organization_ID => X_org_id) = 'Y')
1034: THEN
1027:
1028: X_stmt_num := 301;
1029:
1030: IF (PJM_UNIT_EFF.Enabled = 'Y' AND
1031: PJM_UNIT_EFF.Unit_Effective_Item(
1032: X_Item_ID => X_item_id,
1033: X_Organization_ID => X_org_id) = 'Y')
1034: THEN
1035: X_unit_assembly := 'Y';