####### Book goods receipt #######

$artid  = ???;  // value for Article_ID
$amount = ???;  // value for Amount
$sthid  = ???;  // value for Storehouse_ID

SET AUTOCOMMIT = 0;
LOCK TABLES T_Stock WRITE, T_Stocklist WRITE, T_Storehouse WRITE;

SELECT @stock:=Stock FROM T_Stock WHERE Storehouse_ID = $sthid and Article_ID = $artid;
SELECT @tstock:=Total_Stock FROM T_Stocklist WHERE Article_ID = $artid;

UPDATE T_Stock SET Stock =@stock+$amount WHERE Storehouse_ID = $sthid and Article_ID = $artid;
UPDATE T_Stocklist SET Total_Stock =@tstock+$amount WHERE Article_ID=$artid;

UNLOCK TABLES;
COMMIT;