你需要一个 CASE 要首先检查下划线的表达式：

WITH yourTable AS (
    SELECT 'ABC_BAS' AS col FROM dual UNION ALL
    SELECT 'ABC' FROM dual
)

SELECT
    CASE WHEN col LIKE '%\_%' ESCAPE '\'
         THEN SUBSTR(col, 1, INSTR(col, '_') - 1)
         ELSE col END AS col_out
FROM yourTable;

使用正则表达式匹配：

SELECT REGEXP_SUBSTR('ABC_BAS', '(.*)([_]|$)?', 1, 1, NULL, 1) FROM DUAL;

返回“”，并且

SELECT REGEXP_SUBSTR('ABC', '(.*)([_]|$)?', 1, 1, NULL, 1) FROM DUAL;

还返回“”。
db<>在这里摆弄

编辑

上面给出了正确的结果，但我错过了最简单的正则表达式：

SELECT REGEXP_SUBSTR('ABC_BAS', '[^_]*') FROM DUAL;

退货 'ABC' ，也一样

SELECT REGEXP_SUBSTR('ABC', '[^_]*') FROM DUAL;

db<>在这里摆弄

另一种方法是使用 DECODE 在 substr 具体如下：

substr(str, 
       1, 
       decode(instr(str,'_'), 0, lenght(str), instr(str,'_') - 1)
       )

你好像想把一切都安排到第一个 '_' . 如果是这样，一种方法使用 regexp_replace() :

select regexp_replace(str, '(^[^_]+)_.*$', '\1')
from (select 'ABC' as str from dual union all
      select 'ABC_BAS' from dual
     ) s

更简单的方法是：

select regexp_substr(str, '^[^_]+')
from (select 'ABC' as str from dual union all
      select 'ABC_BAS' from dual
     ) s

这是一把小提琴。

我会用

regexp_replace(text,'_.*')

或者如果性能是个问题，

substr(text, 1, instr(text||'_', '_') -1)

例如，

with demo(text) as
   ( select column_value
     from   table(sys.dbms_debug_vc2coll('ABC', 'ABC_DEF', 'ABC_DEF_GHI')) )
select text
     , regexp_replace(text,'_.*')
     , substr(text, 1, instr(text||'_', '_') -1)
from   demo;

TEXT         REGEXP_REPLACE(TEXT,'_.*') SUBSTR(TEXT,1,INSTR(TEXT||'_','_')-1)
------------ --------------------------- -------------------------------------
ABC          ABC                         ABC
ABC_DEF      ABC                         ABC
ABC_DEF_GHI  ABC                         ABC

好的，我想我明白了。将nvl添加到子字符串并插入如下条件-

select nvl(substr('ABC',1,instr('F4001Z','_')-1),'ABC') from dual;