CREATE OR REPLACE FUNCTION SF_ZY_GETYBSXZD 
(
PZYID00  number    ,--סԺID
PMZZYBZ  varchar2  ,--ÃÅÕïסԺ±êÖ¾ 0:ÃÅÕï 1£º×¡Ôº
PYBSXBM  varchar2  ,--Ò½±£ÊôÐÔ±àÂë
PBQBM00  varchar2  ,--²¡Çé±àÂë
PBRLB00  varchar2  ,--²¡ÈËÀà±ð 0:ÆÕͨ 1:ÉúÓý 2:¹¤ÉË 3:Ìå¼ì 4£ºµ¥²¡ÖÖ 5:ÔñÈÕסԺ 9£ºÒâÍâÉ˺¦
PDBZBM0  varchar2   --µ¥²¡ÖÖ±àÂë
)
return varchar2 is
  LS_RETURN varchar2(50);
  
  LS_aac999      varchar2(30);--¸öÈ˹ÜÀíÂë(Ò½±£±àºÅ)
  LS_YBKH00      varchar2(30);--Ò½±£¿¨ºÅ
  LS_YBID00      varchar2(30);--Ò½±£ID
  LS_BRZJBH      varchar2(30);--²¡ÈËÖ¤¼þºÅÂë
  LS_AAE140        varchar2(10);--ÏÕÖÖÀàÐͱàÂë
  JSQD_psn_no_Type varchar2(10);--Ò½ÁƱ£ÕÏ»ù½ð½áËãÇåµ¥(psn_no:ÈËÔ±±àºÅ)ÀàÐÍ(0:Ö¤¼þºÅÂë(Éí·ÝÖ¤) 1:Ö¤¼þºÅÂë-Ö¤¼þÀàÐÍ)  ĬÈÏÖµ:0
-- modification history
-- Person      Date        Comments
-- zhangyc     2019.10.24  create ZYSF-20191024-002
-- zhangyc     2019.10.25  Ôö¼ÓÒ½ÁÆÀà±ð¡¢½áËã±êʶ	 by ZYSF-20191025-001
-- zhangyc     2019.12.04  ÐÞ¸ÄÒ½ÁƾÍÕ﷽ʽ	¡¢Ò½ÁÆÀà±ð  by ZYSF-20191205-002
-- zhangyc     2019.12.11  Ôö¼ÓBKE241¡¢BKE284 by ZYSF-20191211-004
-- zhangyc     2019.12.17  ÖØÐÂÕûÀíaka078ºÍaka130 È¡Öµ by ZYSF-20191217-001
-- zhangyc     2021.10.19  Ôö¼Ó½ÚµãΪpsnno¡¢insutype»ñÈ¡ by  ZYSF-20211019-001 
-- zhangyc     2022.01.10  PBRLB00=9£¨ÒâÍâÉ˺¦£© aka130=93  by  ZYSF-20220110-001
begin
	/*
--aka078 Ò½ÁƾÍÕ﷽ʽ	
AKA078	Ò½ÁƾÍÕ﷽ʽ	10	ÃÅ(¼±)Õï
AKA078	Ò½ÁƾÍÕ﷽ʽ	20	סԺ
AKA078	Ò½ÁƾÍÕ﷽ʽ	40	Ò©µê¹ºÒ©
AKA078	Ò½ÁƾÍÕ﷽ʽ	50	ÌØÊâÃÅÕï
AKA078	Ò½ÁƾÍÕ﷽ʽ	60	Ìå¼ì
AKA078	Ò½ÁƾÍÕ﷽ʽ	81	ÉúÓýÃÅÕï
AKA078	Ò½ÁƾÍÕ﷽ʽ	82	ÉúÓýסԺ
AKA078	Ò½ÁƾÍÕ﷽ʽ	91	¹¤ÉËÃÅÕï
AKA078	Ò½ÁƾÍÕ﷽ʽ	92	¹¤ÉËסԺ
--aka130	Ò½ÁÆÀà±ð
AKA130	Ò½ÁÆÀà±ð	11	ÆÕͨÃÅÕï
AKA130	Ò½ÁÆÀà±ð	12	¼±Õï
AKA130	Ò½ÁÆÀà±ð	13	ÃÅÕïÂýÐÔ²¡
AKA130	Ò½ÁÆÀà±ð	15	ÒìµØÃÅÕï
AKA130	Ò½ÁÆÀà±ð	16	¼±Õï¹ÛÁô´²
AKA130	Ò½ÁÆÀà±ð	21	ÆÕͨסԺ
AKA130	Ò½ÁÆÀà±ð	22	ÌØÊⲡÖÖסԺ
AKA130	Ò½ÁÆÀà±ð	23	תÕï¾ÍÕï
AKA130	Ò½ÁÆÀà±ð	25	ÒìµØ¾ÍÕï
AKA130	Ò½ÁÆÀà±ð	26	ÒìµØ¼±Õï
AKA130	Ò½ÁÆÀà±ð	27	תÕï¼±Õï
AKA130	Ò½ÁÆÀà±ð	29	ÔñÈÕסԺ
AKA130	Ò½ÁÆÀà±ð	31	¼ÒÍ¥²¡´²
AKA130	Ò½ÁÆÀà±ð	32	פÍâ¾ÍÕï
AKA130	Ò½ÁÆÀà±ð	33	Ôвú¸¾·ÖÃä
AKA130	Ò½ÁÆÀà±ð	34	°´²¡ÖÖסԺ
AKA130	Ò½ÁÆÀà±ð	41	¶¨µãÒ©µê¹ºÒ©
AKA130	Ò½ÁÆÀà±ð	42	´¦·½¹ºÒ©
AKA130	Ò½ÁÆÀà±ð	43	·Ç´¦·½¹ºÒ©
AKA130	Ò½ÁÆÀà±ð  52  ÉúÓýסԺ
AKA130	Ò½ÁÆÀà±ð	89	ÃñÕþ²¹Öú±¨Ïú
AKA130	Ò½ÁÆÀà±ð	93	¾ÓÃñÒâÍâÉ˺¦±¨Ïú
AKA130	Ò½ÁÆÀà±ð	94	ÒìµØÉ̱£±¨Ïú
AKA130	Ò½ÁÆÀà±ð	95	¹¤É˱¨Ïú
AKA130	Ò½ÁÆÀà±ð	96	ÉúÓý±¨Ïú
AKA130	Ò½ÁÆÀà±ð	97	¾ÓÃñÉúÓý±¨Ïú
AKA130	Ò½ÁÆÀà±ð	98	ÐÂÉú¶ù±¨Ïú
AKA130	Ò½ÁÆÀà±ð	99	ÌØÊⱨÏú
AKA130	Ò½ÁÆÀà±ð	A1	Ìå¼ì
½áËã±êʶ	
bke286	½áËã±êʶ	0	Ô¤½áËã
bke286	½áËã±êʶ	1	ÖÐ;½áËã
bke286	½áËã±êʶ	2	ÃÅÕï½áËã/³öÔº½áËã
Êý¾ÝÀ´Ô´
BKE241	Êý¾ÝÀ´Ô´	50	ÊÕ·ÑÖÕ¶Ë
BKE241	Êý¾ÝÀ´Ô´	51	×ÔÖúÖÕ¶Ë
BKE241	Êý¾ÝÀ´Ô´	52	Ò½Éú¹¤×÷Õ¾
BKE241	Êý¾ÝÀ´Ô´	53	Òƶ¯Ö§¸¶
Éí·ÝÈÏÖ¤ÀàÐÍ
BKE284	Éí·ÝÈÏÖ¤ÀàÐÍ	01	¶Á¿¨
BKE284	Éí·ÝÈÏÖ¤ÀàÐÍ	02	ÈÚºÏÂë
BKE284	Éí·ÝÈÏÖ¤ÀàÐÍ	06	Ò½±£Âë
BKE284	Éí·ÝÈÏÖ¤ÀàÐÍ	20	Ò½ÁÆÖ¤
ÀëÔº·½Ê½
BKE078	ÀëÔº·½Ê½	01	Ò½ÖöÀëÔº
BKE078	ÀëÔº·½Ê½	02	Ò½ÖöתԺ
BKE078	ÀëÔº·½Ê½	03	Ò½ÖöתÉçÇøÎÀÉú·þÎñ»ú¹¹/ÏçÕòÎÀÉúÔº
BKE078	ÀëÔº·½Ê½	04	·ÇÒ½ÖöÀëÔº
BKE078	ÀëÔº·½Ê½	05	ËÀÍö
BKE078	ÀëÔº·½Ê½	09	"ÆäËû
"

	*/
LS_RETURN:=null;
 if PYBSXBM in ('psnno','insutype') then --ÈËÔ±±àºÅ¡¢ÏÕÖÖÀàÐÍ
 	begin
      select substrb(trim(A.YBKH00),1,30)YBKH00,substrb(trim(A.YBID00),1,30)YBID00,substrb(trim(A.BRZJBH),1,30)BRZJBH,substrb(trim(AAC999),1,30)AAC999,substrb(trim(a.AAE140),1,10)AAE140 
      into LS_YBKH00, LS_YBID00,LS_BRZJBH,LS_AAC999,LS_AAE140
      from  BM_BRXXB0 A,ZY_BRXXB0 B  
      where  A.BRID00=B.BRID00
        and  B.ZYID00=PZYID00
        ;
    exception
      when others  then
         LS_aac999:=null;--¸öÈ˹ÜÀíÂë(Ò½±£±àºÅ)
         LS_YBKH00:=null;--Ò½±£¿¨ºÅ
         LS_YBID00:=null;--Ò½±£ID
         LS_BRZJBH:=null;--²¡ÈËÖ¤¼þºÅÂë
    end;
   if LS_YBKH00='0' then  LS_YBKH00:=null; end if;
   if LS_YBID00='0' then  LS_YBID00:=null; end if; 
   --Ò½ÁƱ£ÕÏ»ù½ð½áËãÇåµ¥(psn_no:ÈËÔ±±àºÅ)ÀàÐÍ(0:Ö¤¼þºÅÂë(Éí·ÝÖ¤) 1:Ö¤¼þºÅÂë-Ö¤¼þÀàÐÍ)  ĬÈÏÖµ:0
   JSQD_psn_no_Type:= nvl(substrb(SF_SF_TYZD00('Ò½±£Ð½ӿڲÎÊýÉèÖÃ','JSQD_psn_no_Type'),1,10),'0');
   --ÈËÔ±±àºÅ 
   if PYBSXBM='psnno' then
     if SP_SF_CHECKSFZH(LS_BRZJBH)=1 and length(LS_BRZJBH)=18  then
      LS_RETURN:=trim(LS_BRZJBH);
     else
      LS_RETURN:=trim(LS_YBID00);
     end if;
    if JSQD_psn_no_Type='1' then 
    	LS_RETURN:='35000001'||LS_RETURN||'01';
    end if;
   end if;
   --ÏÕÖÖÀàÐÍ(310:Ö°¹¤»ù±¾Ò½ÁƱ£ÏÕ  390:³ÇÏç¾ÓÃñ»ù±¾Ò½ÁƱ£ÏÕ 320:¹«ÎñÔ±Ò½ÁƲ¹Öú 392:³ÇÏç¾ÓÃñ´ó²¡Ò½ÁƱ£ÏÕ 330:´ó¶îÒ½ÁÆ·ÑÓò¹Öú   510:ÉúÓý±£ÏÕ 340:ÀëÐÝÈËÔ±Ò½ÁƱ£ÕÏ   ) 
   if PYBSXBM='insutype' then
    LS_RETURN:=nvl(LS_AAE140,'310');
   end if;
   
 elsif PYBSXBM='aka078' then --Ò½ÁƾÍÕ﷽ʽ
  if PBRLB00 in ('1') then  --²¡ÈËÀà±ð 0:ÆÕͨ 1:ÉúÓý 2:¹¤ÉË 3:Ìå¼ì 4£ºµ¥²¡ÖÖ 5:ÔñÈÕסԺ
   LS_RETURN:='82'; --82	ÉúÓýסԺ
  elsif PBRLB00 in ('2') then 
 	 LS_RETURN:='92'; --92	¹¤ÉËסԺ
 	elsif PBRLB00 in ('3') then 
 	 LS_RETURN:='60'; --60	Ìå¼ì
 	elsif PBRLB00 in ('4') then 
 	 LS_RETURN:='20'; --20	סԺ
  else	
	 LS_RETURN:='20'; --20	סԺ
  end if;
 elsif PYBSXBM='aka130' then -- Ò½ÁÆÀà±ð
 	if PBRLB00 in ('1') then  --²¡ÈËÀà±ð 0:ÆÕͨ 1:ÉúÓý 2:¹¤ÉË 3:Ìå¼ì 4£ºµ¥²¡ÖÖ 5:ÔñÈÕסԺ
   LS_RETURN:='52'; --52  ÉúÓýסԺ
  elsif PBRLB00 in ('2') then 
 	 LS_RETURN:='95'; --95	¹¤É˱¨Ïú
 	elsif PBRLB00 in ('3') then 
 	 LS_RETURN:='A1'; --A1	Ìå¼ì
 	elsif PBRLB00 in ('4') then 
 	 LS_RETURN:='34'; --34	°´²¡ÖÖסԺ
 	elsif PBRLB00 in ('5') then 
 	 LS_RETURN:='29'; --29	ÔñÈÕסԺ
 	elsif PBRLB00 in ('9') then 
 	 LS_RETURN:='93'; --93	ÒâÍâÉ˺¦
  else	
	 LS_RETURN:='21'; --21	ÆÕͨסԺ
  end if;
 elsif PYBSXBM='bke286' then --½áËã±êʶ 0:Ô¤½áËã 1:ÖÐ;½áËã 2:ÃÅÕï½áËã/³öÔº½áËã 
  	if PMZZYBZ='0' then 
  		LS_RETURN:='2';
  	else
  		LS_RETURN:='2';
  	end if;	
  elsif PYBSXBM='bke241' then --Êý¾ÝÀ´Ô´:50:ÊÕ·ÑÖÕ¶Ë 51:×ÔÖúÖÕ¶Ë 52:Ò½Éú¹¤×÷Õ¾ 53:Òƶ¯Ö§¸¶
  	LS_RETURN:='50';
  elsif PYBSXBM='bke284' then --Éí·ÝÈÏÖ¤ÀàÐÍbke284:01:¶Á¿¨ 02:ÈÚºÏÂë 06:Ò½±£Âë 20:Ò½ÁÆÖ¤
  	LS_RETURN:='01';	
  elsif PYBSXBM='bke078' then --ÀëÔº·½Ê½bke078:01:Ò½ÖöÀëÔº02:Ò½ÖöתԺ03:Ò½ÖöתÉçÇøÎÀÉú·þÎñ»ú¹¹/ÏçÕòÎÀÉúÔº04:·ÇÒ½ÖöÀëÔº05:ËÀÍö09:ÆäËû
  	LS_RETURN:='01';	
  end if;
   return trim(LS_RETURN);
end;
/