用X++实现有规律分割的长字符串，分别提取(如逗号隔开)

 

/***用X++实现有规律分割的长字符串，分别提取(如逗号隔开)*/

Job Test

static void xyf_ProcessLongStr_set(Args _args)

{

    YAM_ProcessLongStr  st = new YAM_ProcessLongStr();

    setIterator         setIt; //set会自动排序和去除冗余字符串

    ListIterator        ListIt;//list同理，只是list不会去除字符串冗余和不会自动排序

    str s = 'd,te,ut,o,w,q';

 

;    /**

    要拆分的分隔符为逗号，即可容许各种有规律的分隔符

    默认为"，"

    */

    st.ProcessMulitSet(s,',');

    setIt = new setIterator(st.parmSet());

    while(setIt.more())

    {

        print setIt.value();

        setIt.next();

    }

    print st.parmSet().toString();

    pause;

}

Class (Function)

class YAM_ProcessLongStr

{

    Set         _set;

    List        _list;

}

/**********************************************/

void ProcessMulitList(csm_text   _str,

                      str 10     _flag = ','

                      )

{

    int              CountLine=0,long;

    CSM_Text         _Sid,next_Sid,longIdx;

    str              DateIdx;

;

    _list     = new list(types::String);

 

    _Sid    = strRem(_str,"/n");

    _Sid    = strRem(_Sid,"/r");

    longIdx = _Sid;

 

    while(StrFind(_Sid,_flag,1,30)!=0)

    {

        long        = strFind(_Sid,_flag,1,30);

        DateIdx     = substr(_Sid,1,long-1);

        _list.addEnd(DateIdx);

        next_Sid    = substr(_Sid,long+1,strlen(longIdx)-long);

        _Sid        = strltrim(next_Sid);

        long =0;

    }

    _list.addEnd(_Sid) ;

}

/**********************************************/

void ProcessMulitSet(CSM_text   _str ,

                     str  10    _flag =  ','

                     )

{

    int            CountLine=0,long;

    CSM_Text       _Sid,next_Sid,longIdx;

    str            DateIdx;

;

    _set     = new set(types::String);

 

    _Sid    = strRem(_str,"/n");

    _Sid    = strRem(_Sid,"/r");

    longIdx = _Sid;

 

    while(StrFind(_Sid,_flag,1,30)!=0)

    {

        long        = strFind(_Sid,_flag,1,30);

        DateIdx     = substr(_Sid,1,long-1);

        _set.add(DateIdx);

        next_Sid    = substr(_Sid,long+1,strlen(longIdx)-long);

        _Sid        = strltrim(next_Sid);

        long =0;

    }

    _set.add(_Sid) ;

}

/**********************************************/

list parmList()

{

;

    return  _list;

}

/**********************************************/

set parmSet()

{

;

    return  _set;

}