How execute store procedure steps in VB script

How to write below store procedure steps in VB script

declare
l_ns varchar2(40) := null;--'ins:';
l_count number (6);
l_serial_number VARCHAR2(15);
v_quantity number (6);
v_serial_code number (6);
v_lot_code number (6);
procedure log_mesg(p_value in varchar2) is begin
dbms_output.put_line(p_value);
end;

procedure log_mesg(p_field in varchar2, p_value in varchar2) is begin
dbms_output.put_line('<'||l_ns||p_field||'>'||p_value||'</'||l_ns||p_field||'>');
end;
begin