Table of Content
HAL Forum
procedure SwapM4Val (
var val v1,var val v2)
Description:
Swaps the values of two val variables
Parameters:
v1 Value variable that will receive the value of v2
v2 Value variable that will receive the value of v1 
external procedure SwapM4Val(var val,var val);

procedure AgreementVcConvertB1ToB2(record AgreementVc Agreementr,var val to1,var val to2,var val br1,var val br2)
BEGIN
  val t;
  SwapM4Val(br1,br2);
  SwapM4Val(to1,to2);
  RETURN;
END;
Related topics:
««