CREATE OR REPLACE FUNCTION SF_YS_GETZJCMLID(ad_JCMLID in number 
                                            )
return varchar2 is

  LS_JCMLID  BM_JCMLMX.JCMLID%type;
  LS_JCMLSTR varchar2(200);
  LS_JCMLSTR1 varchar2(200);
-- MODIFICATION HISTORY
-- Person       Date        Comments
-- dsm   	2015.04.08  create for MZYS-20150408-001
begin     

  if ad_JCMLID=0 then
    return ' ';
  end if;  

  LS_JCMLSTR:=' ';
  LS_JCMLSTR1:=' ';  
  for c_yl in (select JCMLID from BM_JCMLMX where FLID00=ad_JCMLID order by PXH000 ) loop
      LS_JCMLSTR1:=SF_YS_GETZJCMLID(c_yl.JCMLID);
      if LS_JCMLSTR1<>' ' then        
        LS_JCMLSTR:=LS_JCMLSTR||LS_JCMLSTR1||c_yl.JCMLID; 
      else  
        LS_JCMLSTR:=LS_JCMLSTR||','||c_yl.JCMLID; 
      end if;  
  end loop;
  if LS_JCMLSTR<>' ' and  substr(LS_JCMLSTR,-1,1)<>',' then 
     LS_JCMLSTR:=LS_JCMLSTR||',';
  end if;
  return LS_JCMLSTR;
end;
/