# // PerformAction < PCHAR 'Out, INT Length, PCHAR In, ULONG Rq_flags >               
+
  Rc = SysPerformAction (Out, Length, In, Rq_flags)      

  if Rc
  +
    Log ("All done")
  ;
  else 
  +
    Log ("Error")
  ;

  for Counter = 0; Counter < Length; Counter ++                                /* !!! */
  +
    ...
  ;

  return Rc
;