Using CASE, LPAD, LENGTH, SUBSTR in PLSQL Query

https://randomsrsolutions.blogspot.com/2018/05/using-case-lpad-length-substr-in-plsql.html

select
case when LENGTH(b.org_id)='3' then  LPAD(b.org_id,4,' ')
else LPAD(b.org_id,4) end||'-'||a.segment1 A,
trim(case when LENGTH(b.org_id)='3' then  LPAD(b.org_id,4,' ')
else LPAD(b.org_id,4) end||'-'||a.segment1) B,
length(
case when LENGTH(b.org_id)='3' then  LPAD(b.org_id,4,' ')
else LPAD(b.org_id,4) end||'-'||a.segment1
) C,
substr(Case when LENGTH(b.org_id)='3' then  LPAD(b.org_id,4,' ')
else LPAD(b.org_id,4) end||'-'||a.segment1,1,4) D
,trim(substr(Case when LENGTH(b.org_id)='3' then  LPAD(b.org_id,4,' ')
else LPAD(b.org_id,4) end||'-'||a.segment1,1,4)) E
from  ap_suppliers a, ap_supplier_sites_all b
where a.vendor_id = b.vendor_id