1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

SELECT 
  Artikel.NR,
  ((SELECT FeldA * FeldB FROM Tabelle2
  WHERE .....)
  +
  (SELECT FeldX * FeldY FROM Tabelle3
  WHERE .....))
FROM
  Artikel
WHERE
  .....					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:

CREATE PROCEDURE SP_ABC (
    EINGABE CHAR(16))
RETURNS (
    ARTIKEL_ABC CHAR(16),
    VER1 DOUBLE PRECISION,
    VER2 DOUBLE PRECISION,
    VER3 DOUBLE PRECISION)
AS
begin
for
  select artikel.nr from artikel
  where ..... into:Artikel_ABC
do
begin
  select sum(FeldA*FeldB)
  from Tabelle2
  where
    .....
  into: Var1;

  select
    sum(FeldX*FeldY)
  from
    Tabelle3
  where
    .....
  into :VER2;

  if (VER1 is null) then VER1 = 0;
  if (VER2 is null) then VER2 = 0;
  VER3 = VER1 + VER2;

  suspend;
end
end