Probar store en sql plus
amigos una ayudita, como puedo probar este store en el sqlplus,
CREATE OR REPLACE PROCEDURE SCOTT.SP_VENTAS_OBT_MCLIENTE(as_tipo char, as_codcliente char, as_cliente out varchar2)
IS
l_cd_cliente varchar2(60);
BEGIN
SELECT CASE
WHEN CB_TIPO_PERSONA='N' THEN TRIM(NVL(CD_NOMBRES,''))|| ' ,'|| TRIM(NVL(CD_APE_PATERNO,'')) || TRIM(NVL(CD_APE_MATERNO,''))
ELSE CD_RAZON_SOCIAL END
INTO l_cd_cliente
FROM MCLIENTE
WHERE CC_TANALIS=as_tipo and
CC_CLIENTE =as_codcliente;
as_cliente:=l_cd_cliente;
end;
gracias por sus respuestas
Andrea
CREATE OR REPLACE PROCEDURE SCOTT.SP_VENTAS_OBT_MCLIENTE(as_tipo char, as_codcliente char, as_cliente out varchar2)
IS
l_cd_cliente varchar2(60);
BEGIN
SELECT CASE
WHEN CB_TIPO_PERSONA='N' THEN TRIM(NVL(CD_NOMBRES,''))|| ' ,'|| TRIM(NVL(CD_APE_PATERNO,'')) || TRIM(NVL(CD_APE_MATERNO,''))
ELSE CD_RAZON_SOCIAL END
INTO l_cd_cliente
FROM MCLIENTE
WHERE CC_TANALIS=as_tipo and
CC_CLIENTE =as_codcliente;
as_cliente:=l_cd_cliente;
end;
gracias por sus respuestas
Andrea
Asà Andrea:
DECLARE
valor2 VARCHAR2(4000);
BEGIN
-- Now call the stored program
SCOTT.SP_VENTAS_OBT_MCLIENTE('PARAMETRO', 'parametro2',valor2);
-- Output the results
dbms_output.put_line(SubStr('valor2 = '||valor2,1,255));
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line(SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1, 255));
RAISE;
END;
Paoti
Guadalajara México
DECLARE
valor2 VARCHAR2(4000);
BEGIN
-- Now call the stored program
SCOTT.SP_VENTAS_OBT_MCLIENTE('PARAMETRO', 'parametro2',valor2);
-- Output the results
dbms_output.put_line(SubStr('valor2 = '||valor2,1,255));
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line(SubStr('Error '||TO_CHAR(SQLCODE)||': '||SQLERRM, 1, 255));
RAISE;
END;
Paoti
Guadalajara México
