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