x
1
DECLARE
2
v_return CHARACTER VARYING;
3
a_count integer;
4
BEGIN
5
UPDATE m_inout SET COF_leituraEmMassa = p_leituraemmassa WHERE m_inout_id = p_inout_id;
6
GET DIAGNOSTICS a_count = ROW_COUNT;
7
8
IF (a_count = 1)
9
THEN
10
v_return := ' Leituras enviadas com sucesso!';
11
ELSE
12
v_return := ' Erro ao enviar leituras.';
13
END IF;
14
RETURN v_return;
15
END;