FUNCTION dataSessionExist(iDSSearched) PRIVATE aDataSession RETURN ASESSIONS(aDataSession)>0 AND ASCAN(aDataSession,m.iDSSearched)>0 ENDFUNC