In article <[EMAIL PROTECTED]>,
"FERREIRA William (COFRAMI)" <[EMAIL PROTECTED]> writes:
> CREATE OR REPLACE FUNCTION adoc.CREATE_XML_FILE(docId int4, eleId int4, evo
> int4, fileName text, fileRelativeDir text)
> � RETURNS int4 AS
> $BODY$
> �my $theClob='';
> �
> �my $params = 'select
> adoc.GET_XML_FRAG('.$_[0].','.$_[1].','.$_[2].',\''.$theClob.'\','.0;
> �$params = $params.')';

> �

> �$theClob =� spi_exec_query($params);

> �elog NOTICE, $theClob;

> �

> �return 4;
> $BODY$
> � LANGUAGE 'plperl' VOLATILE;

> �

> CREATE OR REPLACE FUNCTION adoc.GET_XML_FRAG(docId int4, eleId int4, evo int4,
> clob text, indx int4)
> � RETURNS text AS
> $BODY$
> �my $t_clob = $_[3].'totototototototototot';
> �
> �return $t_clob;
> $BODY$
> � LANGUAGE 'plperl' VOLATILE;

> but the CREATE_XML_FILE doesn't display 'totototototototototot' but
> HASH(0xf03fa4)....


... and rightly so.  As documented in The Fine Manual, spi_exec_query
returns a hash reference.  Probably you want something like

my $rv = spi_exec_query($params);
$theClob = $rv-.{rows}[0]->{get_xml_frag};


---------------------------(end of broadcast)---------------------------
TIP 3: if posting/reading through Usenet, please send an appropriate
      subscribe-nomail command to [EMAIL PROTECTED] so that your
      message can get through to the mailing list cleanly

Reply via email to