MODULE PParams;
VAR ExitCode : INTEGER;
PROCEDURE Sum6(a, b, c, d, e, f : INTEGER) : INTEGER;
BEGIN
  RETURN a + b + c + d + e + f
END Sum6;
BEGIN
  ExitCode := Sum6(1, 2, 3, 4, 5, 6)
END PParams.