IFi_mseg -charg<> '' .
"字符串长度
CLEARlv_len .
lv_len = strlen (i_mseg -charg ) .

IFlv_len< 8 .
MESSAGEe005 (zmigo ) .
ENDIF .
“字符串是否包含空格
IFlv_len> 0 .
IFi_mseg+0 (lv_len ) CAspace .
MESSAGEe006 (zmigo ) .
ENDIF .
ENDIF .
”字符串前两位是否为字幕
CLEARlv_batch .
lv_batch =i_mseg -charg+0 ( 2 ) .
REPLACE ALL OCCURRENCES OFREGEX '[A-Z]' INlv_batch WITH '*' .
REPLACE ALL OCCURRENCES OFREGEX '[a-z]' INlv_batch WITH '*' .
IFlv_batch<> '**' .
MESSAGEe004 (zmigo ) .
ENDIF .
ENDIF .