HDCApi/_custom/Rootvin/winSvc/mainSvcPause.inc

   if (rtnZapisObjMatThr<>nil) then
    if not(rtnZapisObjMatThr.Suspended) then
     rtnZapisObjMatThr.Suspend;