Class: | _LIST_PARSER_ENGINE |
LPARAMETERS CHNGREF laFiles,INPREF lcData LOCAL liFormat,loParser,llRet This.cData=lcData lcData="" && freeze liFormat=This.CheckFormat() IF !PEMSTATUS(This,"PL"+STR(liFormat,1),5) This.AddObject("PL"+STR(liFormat,1),"_LIST_PARSER_"+STR(liFormat,1)) ENDIF loParser=EVALUATE("This.PL"+STR(liFormat,1)) loParser.oFTP=This.oFTP llRet=loParser.Parse(@laFiles,This) loParser.oFTP=.NULL. RETURN llRet