CREATE OR REPLACE FUNCTION b_6_calcPropertyTax(spielerid_in IN NUMBER,
privatfunds_out out NUMBER ) RETURN NUMBER IS
companyFunds NUMBER;
privateFunds NUMBER;
BEGIN
select b_6_spieler.PRIVATKAPITAL into privateFunds from b_6_spieler
where b_6_spieler.id = spielerid_in;
select sum(b_6_spielfeldarten.grundwert* b_6_spielfelder.fruchtbarkeit +
Anschaffungswert) into companyFunds from b_6_spieler
left outer join b_6_spielfelder on b_6_spieler.id =
b_6_spielfelder.besitzer_id
left outer join b_6_spielfeldarten on b_6_spielfeldarten.id =
b_6_spielfelder.spielfeldart_id
left outer join b_6_industrien on b_6_industrien.feld_id =
b_6_spielfelder.id
left outer join B_6_INDUSTRIENARTEN on b_6_industrien.INDUSTRIEART_ID =
B_6_INDUSTRIENARTEN.id
where b_6_spieler.id = spielerid_in;
dbms_output.put_line('CompanyFunds: '||companyFunds );
dbms_output.put_line('PrivateFunds: '||privateFunds );
dbms_output.put_line('PropertyTax: '||(companyFunds/100*5) );
select privateFunds-(companyFunds/100*5) into privatfunds_out from dual;
RETURN (companyFunds/100*5);
END;
/