FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
TStoredProcedure y Oracle CLOBs
Hola. A ver si alguién se ha encontrado en la misma situación que yo y sabe darme algún consejo. Tengo una función PLSQL en el server que retorna un CLOB construido dinámicamente. Esta función es llamada por mi programita en delphi, mediante un TStoredProcedure. Va todo perfecto, salvo que no consigo que me retorne el CLOB. El código es:
La funcion SQL la tengo definida así: Código:
FUNCTION Fu_Instancia_XML( p_param_xml IN VARCHAR2, p_doc_xml OUT NOCOPY CLOB, p_error OUT VARCHAR2) RETURN BOOLEAN; De hecho, tengo 2 ó 3 funciones por el estilo y ninguna de ellas me funciona. El resto de funciones, que no retornan un CLOB, me van sin problemas. ¿Estoy inicializando mal el TStoredProcedure? Según tengo entendido, un CLOB de Oracle es compatible con el tipo string de Delphi. ¿no es así? Uso D7 y Oracle 8i pero también me pasa con la 9i. Agradecería cualquier comentario.
__________________
El hombre que no lee no tiene ninguna ventaja sobre el que no sabe leer. Para hacer una buena exposición hay que escribir más de lo que se va a decir, y luego decir más de lo que se escribió. Última edición por Tino fecha: 11-10-2004 a las 21:22:01. |
#2
|
||||
|
||||
Bloques Plsql Anónimos
¿Es posible ejecutar un bloque PLSQL en Delphi? No me refiero a llamar a un proc. almacenado sino a ejecutar un bloque anónimo plsql en Delphi. Supongo que es posible, pero ¿se puede hacer que se retorne un resultado al Cliente?
Tengo un plsql que realiza lo que necesito (pregunta anterior) que me funciona bien. Visualizo el CLOB retornada por la función mediante dbms_output. Si existierá alguna manera de retornar el CLOB a mi programa en delphi sería fantástico. Agradecería cualquier comentario. Última edición por Tino fecha: 21-10-2004 a las 20:45:36. |
#3
|
||||
|
||||
Por si sirve de algo, este es el plsql que quisiera "meter" en Delphi:
Código:
DECLARE vXMLParam VARCHAR2(200) := '<?xml version="1.0" encoding="iso-8859-1"?>' || '<parametros>' || '<PARAMNIF>394002</PARAMNIF>' || '</parametros>'; cDoc CLOB; err VARCHAR2(2000); vId NUMBER; BEGIN SELECT campo3 INTO vId FROM tabla WHERE campo1 = 'PRUEBA' AND campo2='PRUEBA'; dbms_LOB.CreateTemporary(cDoc, TRUE); dbms_LOB.Open(cDoc, dbms_LOB.LOB_READWRITE); cDoc := Fu_Instancia_XML(vId, vXMLParam); PrintCLOBOut(cDoc); <== E S T O E S L O Q U E N E C E S I T O dbms_lob.Close(cDoc); dbms_lob.freetemporary(cDoc); END; Última edición por Tino fecha: 21-10-2004 a las 20:45:00. |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|