[Home] [Help]
7063: p_error_text => lv_error_text,
7064: p_token1 => 'COLUMN_NAMES',
7065: p_token_value1 => 'SR_INSTANCE_CODE OR WEIGHT_UOM',
7066: p_token2 => 'MASTER_TABLE',
7067: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
7068: p_token3 => 'CHILD_TABLE',
7069: p_token_value3 => 'MSC_ST_TRADING_PARTNERS');
7070: IF lv_return <> 0 THEN
7071: RAISE ex_logging_err;
7081: ||' FROM msc_units_of_measure muom '
7082: ||' WHERE NVL(muom.uom_code, '||''''||NULL_CHAR||''''||') = '
7083: ||' NVL(mstp.weight_uom,'||''''||NULL_CHAR||''''||')'
7084: ||' UNION '
7085: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
7086: ||' WHERE NVL(msuom.uom_code, '||''''||NULL_CHAR||''''||') = '
7087: ||' NVL(mstp.weight_uom,'||''''||NULL_CHAR||''''||')'
7088: ||' AND msuom.sr_instance_id = :v_instance_id'
7089: ||' AND msuom.process_flag = '||G_VALID||' ) '
7111: p_error_text => lv_error_text,
7112: p_token1 => 'COLUMN_NAMES',
7113: p_token_value1 => 'SR_INSTANCE_CODE OR VOLUME_UOM',
7114: p_token2 => 'MASTER_TABLE',
7115: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
7116: p_token3 => 'CHILD_TABLE',
7117: p_token_value3 => 'MSC_ST_TRADING_PARTNERS');
7118: IF lv_return <> 0 THEN
7119: RAISE ex_logging_err;
7128: ||' FROM msc_units_of_measure muom'
7129: ||' WHERE NVL(muom.uom_code, '||''''||NULL_CHAR||''''||') = '
7130: ||' NVL(mstp.volume_uom,'||''''||NULL_CHAR||''''||')'
7131: ||' UNION '
7132: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
7133: ||' WHERE NVL(msuom.uom_code,' ||''''||NULL_CHAR||''''||') = '
7134: ||' NVL(mstp.volume_uom,'||''''||NULL_CHAR||''''||')'
7135: ||' AND msuom.sr_instance_id = :v_instance_id'
7136: ||' AND msuom.process_flag = '||G_VALID||' )'
19658: END LOAD_CATEGORY_SET;
19659:
19660: /*==========================================================================+
19661: | DESCRIPTION : This procedure performs validation and loads data into the |
19662: | table msc_st_units_of_measure. |
19663: +==========================================================================*/
19664: PROCEDURE LOAD_UOM IS
19665: TYPE RowidTab IS TABLE OF ROWID INDEX BY BINARY_INTEGER;
19666: lb_rowid RowidTab;
19668: lv_error_text VARCHAR2(250);
19669: lv_where_str VARCHAR2(5000);
19670: lv_sql_stmt VARCHAR2(5000);
19671: lv_column_names VARCHAR2(5000);
19672: lv_batch_id msc_st_units_of_measure.batch_id%TYPE;
19673: lv_message_text msc_errors.error_text%TYPE;
19674:
19675: ex_logging_err EXCEPTION;
19676:
19675: ex_logging_err EXCEPTION;
19676:
19677: CURSOR c1(p_batch_id NUMBER) IS
19678: SELECT rowid
19679: FROM msc_st_units_of_measure
19680: WHERE process_flag IN (G_IN_PROCESS,G_ERROR_FLG)
19681: AND batch_id = p_batch_id
19682: AND sr_instance_code = v_instance_code;
19683:
19681: AND batch_id = p_batch_id
19682: AND sr_instance_code = v_instance_code;
19683:
19684: BEGIN
19685: --*********Validation for msc_st_units_of_measure***********
19686: lv_return := MSC_ST_UTIL.GET_ERROR_MESSAGE
19687: (p_app_short_name => 'MSC',
19688: p_error_code => 'MSC_PP_DUP_REC_FOR_XML',
19689: p_message_text => lv_message_text,
19695:
19696: --Duplicate records check for the records whose source is XML
19697: v_sql_stmt := 01;
19698: lv_sql_stmt :=
19699: ' UPDATE msc_st_units_of_measure mum1'
19700: ||' SET process_flag = '||G_ERROR_FLG||','
19701: ||' error_text = '||''''||lv_message_text||''''
19702: ||' WHERE message_id < (SELECT MAX(message_id)'
19703: ||' FROM msc_st_units_of_measure mum2'
19699: ' UPDATE msc_st_units_of_measure mum1'
19700: ||' SET process_flag = '||G_ERROR_FLG||','
19701: ||' error_text = '||''''||lv_message_text||''''
19702: ||' WHERE message_id < (SELECT MAX(message_id)'
19703: ||' FROM msc_st_units_of_measure mum2'
19704: ||' WHERE NVL(mum2.unit_of_measure,' ||''''||NULL_CHAR||''''||') ='
19705: ||' NVL(mum1.unit_of_measure,' ||''''||NULL_CHAR||''''||') '
19706: ||' AND NVL(mum2.company_name, ' ||''''||NULL_CHAR||''''||') = '
19707: ||' NVL(mum1.company_name, ' ||''''||NULL_CHAR||''''||')'
19733: --Different SQL is used because in XML we can identify the latest records
19734: --whereas in batch load we cannot.
19735: v_sql_stmt := 02;
19736: lv_sql_stmt :=
19737: ' UPDATE msc_st_units_of_measure mum1'
19738: ||' SET process_flag = '||G_ERROR_FLG||','
19739: ||' error_text = '||''''||lv_message_text||''''
19740: ||' WHERE EXISTS( SELECT 1 '
19741: ||' FROM msc_st_units_of_measure mum2'
19737: ' UPDATE msc_st_units_of_measure mum1'
19738: ||' SET process_flag = '||G_ERROR_FLG||','
19739: ||' error_text = '||''''||lv_message_text||''''
19740: ||' WHERE EXISTS( SELECT 1 '
19741: ||' FROM msc_st_units_of_measure mum2'
19742: ||' WHERE NVL(mum2.unit_of_measure, '||''''||NULL_CHAR||''''||')'
19743: ||' = NVL(mum1.unit_of_measure,'||''''||NULL_CHAR||''''||')'
19744: ||' AND NVL(mum2.company_name, '||''''||NULL_CHAR||''''||') = '
19745: ||' NVL(mum1.company_name, '||''''||NULL_CHAR||''''||')'
19777: FROM dual;
19778:
19779: v_sql_stmt := 04;
19780: lv_sql_stmt :=
19781: 'UPDATE msc_st_units_of_measure '
19782: ||' SET batch_id = :lv_batch_id'
19783: ||' WHERE process_flag IN ('||G_IN_PROCESS||','||G_ERROR_FLG||')'
19784: ||' AND sr_instance_code = :v_instance_code'
19785: ||' AND NVL(batch_id,'||NULL_VALUE||') = '||NULL_VALUE
19799: CLOSE c1;
19800:
19801: v_sql_stmt := 05;
19802: FORALL j IN lb_rowid.FIRST..lb_rowid.LAST
19803: UPDATE msc_st_units_of_measure
19804: SET st_transaction_id = msc_st_units_of_measure_s.NEXTVAL,
19805: refresh_id = v_refresh_id,
19806: last_update_date = v_current_date,
19807: last_updated_by = v_current_user,
19800:
19801: v_sql_stmt := 05;
19802: FORALL j IN lb_rowid.FIRST..lb_rowid.LAST
19803: UPDATE msc_st_units_of_measure
19804: SET st_transaction_id = msc_st_units_of_measure_s.NEXTVAL,
19805: refresh_id = v_refresh_id,
19806: last_update_date = v_current_date,
19807: last_updated_by = v_current_user,
19808: creation_date = v_current_date,
19815: p_error_code => 'MSC_PP_NO_DELETION',
19816: p_message_text => lv_message_text,
19817: p_error_text => lv_error_text,
19818: p_token1 => 'TABLE_NAME',
19819: p_token_value1 => 'MSC_ST_UNITS_OF_MEASURE');
19820:
19821: IF lv_return <> 0 THEN
19822: RAISE ex_logging_err;
19823: END IF;
19823: END IF;
19824:
19825: v_sql_stmt := 06;
19826: lv_sql_stmt :=
19827: 'UPDATE msc_st_units_of_measure '
19828: ||' SET process_flag = '||G_ERROR_FLG||','
19829: ||' error_text = '||''''||lv_message_text||''''
19830: ||' WHERE deleted_flag = '||SYS_YES
19831: ||' AND process_flag = '||G_IN_PROCESS
19858: ||' NOT IN(1,2)';
19859: --Log a warning for those records where the deleted_flag has a value other
19860: --than SYS_NO
19861: lv_return := MSC_ST_UTIL.LOG_ERROR
19862: (p_table_name => 'MSC_ST_UNITS_OF_MEASURE',
19863: p_instance_code => v_instance_code,
19864: p_row => lv_column_names,
19865: p_severity => G_SEV_WARNING,
19866: p_message_text => lv_message_text,
19888: END IF;
19889:
19890: v_sql_stmt := 07;
19891: lv_sql_stmt :=
19892: 'UPDATE msc_st_units_of_measure '
19893: ||' SET process_flag = '||G_ERROR_FLG||','
19894: ||' error_text = '||''''||lv_message_text||''''
19895: ||' WHERE (NVL(uom_code, '||''''||NULL_CHAR||''''||') '
19896: ||' = '||''''||NULL_CHAR||''''
19908: v_instance_code;
19909:
19910: v_sql_stmt := 08;
19911: lv_sql_stmt :=
19912: 'UPDATE msc_st_units_of_measure '
19913: ||' SET unit_of_measure = uom_code'
19914: ||' WHERE NVL(unit_of_measure,'||''''||NULL_CHAR||''''||') '
19915: ||' = '||''''||NULL_CHAR||''''
19916: ||' AND batch_id = :lv_batch_id'
19938: END IF;
19939:
19940: v_sql_stmt := 09;
19941: lv_sql_stmt :=
19942: 'UPDATE msc_st_units_of_measure mum1 '
19943: ||' SET process_flag = '||G_ERROR_FLG||','
19944: ||' error_text = '||''''||lv_message_text||''''
19945: ||' WHERE EXISTS(SELECT 1'
19946: ||' FROM msc_units_of_measure mum2'
19952: ||' NVL(mum1.uom_class, '||''''||NULL_CHAR||''''||' )'
19953: ||' AND mum2.base_uom_flag = ''Y'' '
19954: ||' UNION'
19955: ||' SELECT 1'
19956: ||' FROM msc_st_units_of_measure mum3'
19957: ||' WHERE NVL(mum3.unit_of_measure,'||''''||NULL_CHAR||''''||') <> '
19958: ||' NVL(mum1.unit_of_measure,'||''''||NULL_CHAR||''''||')'
19959: ||' AND NVL(mum3.uom_code, '||''''||NULL_CHAR||''''||') <> '
19960: ||' NVL(mum1.uom_code, '||''''||NULL_CHAR||''''||')'
19992: --Log a warning for those records where the base_uom_flag has value
19993: --other than('Y','N')
19994:
19995: lv_return := MSC_ST_UTIL.LOG_ERROR
19996: (p_table_name => 'MSC_ST_UNITS_OF_MEASURE',
19997: p_instance_code => v_instance_code,
19998: p_row => lv_column_names,
19999: p_severity => G_SEV_WARNING,
20000: p_message_text => lv_message_text,
20022: RAISE ex_logging_err;
20023: END IF;
20024:
20025: lv_return := MSC_ST_UTIL.SET_PROCESS_FLAG
20026: (p_table_name => 'MSC_ST_UNITS_OF_MEASURE',
20027: p_instance_id => v_instance_id,
20028: p_instance_code => v_instance_code,
20029: p_process_flag => G_VALID,
20030: p_error_text => lv_error_text,
20035: RAISE ex_logging_err;
20036: END IF;
20037:
20038: lv_return := MSC_ST_UTIL.LOG_ERROR
20039: (p_table_name => 'MSC_ST_UNITS_OF_MEASURE',
20040: p_instance_code => v_instance_code,
20041: p_row => lv_column_names,
20042: p_severity => G_SEV_ERROR,
20043: p_message_text => NULL,
20464: p_error_text => lv_error_text,
20465: p_token1 => 'COLUMN_NAMES',
20466: p_token_value1 => 'FROM_UOM_CODE, FROM_UOM_CLASS AND FROM_UNIT_OF_MEASURE',
20467: p_token2 => 'MASTER_TABLE',
20468: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
20469: p_token3 => 'MASTER_TABLE',
20470: p_token_value3 => 'MSC_ST_UNITS_OF_MEASURE',
20471: p_token4 => 'CHILD_TABLE',
20472: p_token_value4 => 'MSC_ST_UOM_CLASS_CONVERSIONS');
20466: p_token_value1 => 'FROM_UOM_CODE, FROM_UOM_CLASS AND FROM_UNIT_OF_MEASURE',
20467: p_token2 => 'MASTER_TABLE',
20468: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
20469: p_token3 => 'MASTER_TABLE',
20470: p_token_value3 => 'MSC_ST_UNITS_OF_MEASURE',
20471: p_token4 => 'CHILD_TABLE',
20472: p_token_value4 => 'MSC_ST_UOM_CLASS_CONVERSIONS');
20473: IF lv_return <> 0 THEN
20474: RAISE ex_logging_err;
20486: ||' AND mum.unit_of_measure = mcc.from_unit_of_measure'
20487: ||' AND mum.base_uom_flag = ''Y'' '
20488: ||' UNION'
20489: ||' SELECT 1'
20490: ||' FROM msc_st_units_of_measure mum'
20491: ||' WHERE mum.uom_code = mcc.from_uom_code'
20492: ||' AND mum.uom_class = mcc.from_uom_class'
20493: ||' AND mum.unit_of_measure = mcc.from_unit_of_measure'
20494: ||' AND mum.base_uom_flag = ''Y'' '
20514: p_token1 => 'COLUMN_NAMES',
20515: p_token_value1 => 'TO_UOM_CODE, TO_UOM_CLASS'
20516: ||' AND TO_UNIT_OF_MEASURE',
20517: p_token2 => 'MASTER_TABLE',
20518: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
20519: p_token3 => 'CHILD_TABLE',
20520: p_token_value3 => 'MSC_ST_UOM_CLASS_CONVERSIONS');
20521: IF lv_return <> 0 THEN
20522: RAISE ex_logging_err;
20534: ||' AND mum.unit_of_measure = mcc.to_unit_of_measure'
20535: ||' AND mum.base_uom_flag = ''Y'' '
20536: ||' UNION'
20537: ||' SELECT 1'
20538: ||' FROM msc_st_units_of_measure mum'
20539: ||' WHERE mum.uom_code = mcc.to_uom_code'
20540: ||' AND mum.uom_class = mcc.to_uom_class'
20541: ||' AND mum.unit_of_measure = mcc.to_unit_of_measure'
20542: ||' AND mum.base_uom_flag = ''Y'' '
21043: p_error_text => lv_error_text,
21044: p_token1 => 'COLUMN_NAMES',
21045: p_token_value1 => 'UOM_CODE, UOM_CLASS AND UNIT_OF_MEASURE',
21046: p_token2 => 'MASTER_TABLE',
21047: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
21048: p_token3 => 'CHILD_TABLE',
21049: p_token_value3 => 'MSC_ST_UOM_CONVERSIONS');
21050: IF lv_return <> 0 THEN
21051: RAISE ex_logging_err;
21062: ||' AND mum.uom_class = mcc.uom_class'
21063: ||' AND mum.unit_of_measure = mcc.unit_of_measure'
21064: ||' UNION'
21065: ||' SELECT 1'
21066: ||' FROM msc_st_units_of_measure mum'
21067: ||' WHERE mum.uom_code = mcc.uom_code'
21068: ||' AND mum.uom_class = mcc.uom_class'
21069: ||' AND mum.unit_of_measure = mcc.unit_of_measure'
21070: ||' AND mum.process_flag = '||G_VALID||')'
22579: p_error_text => lv_error_text,
22580: p_token1 => 'COLUMN_NAMES',
22581: p_token_value1 => 'SR_INSTANCE_CODE ,UOM_CODE',
22582: p_token2 => 'MASTER_TABLE',
22583: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
22584: p_token3 => 'CHILD_TABLE',
22585: p_token_value3 => 'MSC_ST_SYSTEM_ITEMS');
22586: IF lv_return <> 0 THEN
22587: RAISE ex_logging_err;
22596: ||' WHERE NOT EXISTS (SELECT 1 '
22597: ||' FROM msc_units_of_measure muom'
22598: ||' WHERE muom.uom_code = mssi.uom_code'
22599: ||' UNION'
22600: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
22601: ||' WHERE msuom.uom_code = mssi.uom_code'
22602: ||' AND msuom.sr_instance_id = :v_instance_id'
22603: ||' AND msuom.process_flag = '||G_VALID||')'
22604: ||' AND mssi.sr_instance_code = :v_instance_code'
22622: p_error_text => lv_error_text,
22623: p_token1 => 'COLUMN_NAMES',
22624: p_token_value1 => 'SR_INSTANCE_CODE OR VOLUME_UOM',
22625: p_token2 => 'MASTER_TABLE',
22626: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
22627: p_token3 => 'CHILD_TABLE',
22628: p_token_value3 => 'MSC_ST_SYSTEM_ITEMS');
22629: IF lv_return <> 0 THEN
22630: RAISE ex_logging_err;
22641: ||' FROM msc_units_of_measure muom'
22642: ||' WHERE muom.uom_code = mssi.volume_uom'
22643: ||' UNION'
22644: ||' SELECT 1 '
22645: ||' FROM msc_st_units_of_measure msuom'
22646: ||' WHERE msuom.uom_code = mssi.volume_uom'
22647: ||' AND msuom.sr_instance_id = :v_instance_id'
22648: ||' AND msuom.process_flag = '||G_VALID||')'
22649: ||' AND NVL(mssi.volume_uom,'||''''||NULL_CHAR||''''||') '
22670: p_error_text => lv_error_text,
22671: p_token1 => 'COLUMN_NAMES',
22672: p_token_value1 => 'SR_INSTANCE_CODE OR WEIGHT_UOM',
22673: p_token2 => 'MASTER_TABLE',
22674: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
22675: p_token3 => 'CHILD_TABLE',
22676: p_token_value3 => 'MSC_ST_SYSTEM_ITEMS');
22677: IF lv_return <> 0 THEN
22678: RAISE ex_logging_err;
22689: ||' WHERE NOT EXISTS( SELECT 1 '
22690: ||' FROM msc_units_of_measure muom'
22691: ||' WHERE muom.uom_code = mssi.weight_uom'
22692: ||' UNION'
22693: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
22694: ||' WHERE msuom.uom_code = mssi.weight_uom'
22695: ||' AND msuom.sr_instance_id = :v_instance_id'
22696: ||' AND msuom.process_flag = '||G_VALID||')'
22697: ||' AND NVL(mssi.weight_uom,'||''''||NULL_CHAR||''''||') '
25208: p_token1 => 'COLUMN_NAMES',
25209: p_token_value1 => 'SR_INSTANCE_CODE OR'
25210: ||' PURCHASING_UNIT_OF_MEASURE',
25211: p_token2 => 'MASTER_TABLE',
25212: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
25213: p_token3 => 'CHILD_TABLE',
25214: p_token_value3 => 'MSC_ST_ITEM_SUPPLIERS');
25215:
25216: IF lv_return <> 0 THEN
25227: ||' FROM msc_units_of_measure muom '
25228: ||' WHERE NVL(muom.unit_of_measure, '||''''||NULL_CHAR||''''||') = '
25229: ||' NVL(mstp.purchasing_unit_of_measure,'||''''||NULL_CHAR||''''||')'
25230: ||' UNION '
25231: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
25232: ||' WHERE NVL(msuom.unit_of_measure, '||''''||NULL_CHAR||''''||') = '
25233: ||' NVL(mstp.purchasing_unit_of_measure,'||''''||NULL_CHAR||''''||')'
25234: ||' AND msuom.sr_instance_id = :v_instance_id'
25235: ||' AND msuom.process_flag = '||G_VALID||' ) '
40872: ||' WHERE NOT EXISTS (SELECT 1'
40873: ||' FROM msc_units_of_measure muom'
40874: ||' WHERE muom.uom_code = msb.uom'
40875: ||' UNION'
40876: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
40877: ||' WHERE msuom.uom_code = msb.uom'
40878: ||' AND msuom.sr_instance_id = :v_instance_id'
40879: ||' AND msuom.process_flag = '||G_VALID||' )'
40880: ||' AND NVL(msb.uom,'||''''||NULL_CHAR||''''||') '
41769: ||' WHERE NOT EXISTS (SELECT 1'
41770: ||' FROM msc_units_of_measure muom'
41771: ||' WHERE muom.uom_code = mbc.uom_code'
41772: ||' UNION'
41773: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
41774: ||' WHERE msuom.uom_code = mbc.uom_code'
41775: ||' AND msuom.sr_instance_id = :v_instance_id'
41776: ||' AND msuom.process_flag = '||G_VALID||' )'
41777: ||' AND NVL(mbc.uom_code,'||''''||NULL_CHAR||''''||') '
44038: ||' FROM msc_units_of_measure muom'
44039: ||' WHERE NVL(muom.uom_code, '||''''||NULL_CHAR||''''||') = '
44040: ||' NVL(msr.uom_code, '||''''||NULL_CHAR||''''||')'
44041: ||' UNION'
44042: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
44043: ||' WHERE NVL(msuom.uom_code, '||''''||NULL_CHAR||''''||') = '
44044: ||' NVL(msr.uom_code,'||''''||NULL_CHAR||''''||')'
44045: ||' AND msuom.process_flag = '||G_VALID
44046: ||' AND msuom.sr_instance_id = :v_instance_id)'
55278: EXECUTE IMMEDIATE lv_sql_stmt
55279: USING lv_batch_id,
55280: v_instance_code;
55281:
55282: -- UOM_CODE should refer to a valid record in msc_units_of_measure/msc_st_units_of_measure .
55283: -- Now check for UOM code if it is Invalid error out
55284: -- Set the error message
55285:
55286: v_sql_stmt := 10;
55292: p_error_text => lv_error_text,
55293: p_token1 => 'COLUMN_NAMES',
55294: p_token_value1 => 'SR_INSTANCE_CODE ,UOM_CODE',
55295: p_token2 => 'MASTER_TABLE',
55296: p_token_value2 => 'MSC_ST_UNITS_OF_MEASURE',
55297: p_token3 => 'CHILD_TABLE',
55298: p_token_value3 => 'MSC_ST_ITEM_CUSTOMERS');
55299: IF lv_return <> 0 THEN
55300: RAISE ex_logging_err;
55308: ||' WHERE NOT EXISTS (SELECT 1 '
55309: ||' FROM msc_units_of_measure muom'
55310: ||' WHERE muom.uom_code = mic.uom_code'
55311: ||' UNION'
55312: ||' SELECT 1 FROM msc_st_units_of_measure msuom'
55313: ||' WHERE msuom.uom_code = mic.uom_code'
55314: ||' AND msuom.sr_instance_id = :v_instance_id'
55315: ||' AND msuom.process_flag = '||G_VALID||')'
55316: ||' AND mic.sr_instance_code = :v_instance_code'
55981: End IF;
55982: END IF;
55983:
55984: IF v_uom_enabled = SYS_YES THEN
55985: lv_count:= SET_IN_PROCESS (p_table_name => 'MSC_ST_UNITS_OF_MEASURE');
55986: IF lv_count > 0 Then
55987: prec.uom_flag:= SYS_YES;
55988: End IF;
55989: END IF;