DIM EventType AS MESSAGE;
DIM TagName AS MESSAGE;
DIM Q AS MESSAGE;
DIM pos1 AS INTEGER;
DIM pos2 AS INTEGER;

Q = StringChar(34);
EventType = StringMid(#ThisEvent.HandleEventEventInfo, 1, 12);
pos1 = StringInString( #ThisEvent.HandleEventEventInfo, Q + "," + Q, 12, 0) + 3;
pos1 = StringInString( #ThisEvent.HandleEventEventInfo, Q + "," + Q, pos1, 0) + 3;
pos2 = StringInString( #ThisEvent.HandleEventEventInfo, Q + ")]", pos1, 0);
TagName = StringMid(#ThisEvent.HandleEventEventInfo, pos1, pos2 - pos1);

IF EventType == "[CallSigned(" THEN
  PageControlAck1.Name = TagName;
  PageControlAck2.Name = TagName;
  PageControlAck1.Ack = 1;
  PageControlAck2.Ack = 1;
  PageControlAck1.Name = "";
  PageControlAck2.Name = "";
ENDIF;