я SysSockConnect и SysSockListen вызываю не в каждом цикле ибо да, они изрядно подтормаживают ПЛК.
например так то так:

m_y := m_y + 1;
IF ( m_y MOD 50 ) = 0 THEN
(* каждый пиЙсятый цикл *)
END_IF