Buenas tardes:
Gracias por la atencion, ya hice mi primera funcion de insercion de registros en postgresql, ahora si me funciona bien, PERO el inconveniente que tengo es que cuando se trata de agumentos tipo char y numerico no me daja insertar, pero cundo todos los argumentos son de tipo char, se insertan bien, que puedo estar haciendo mal.
campos de la tabla (un cahracter y un numerico)
lo he reducido a dos campos a grabar cuando se insertan un registro:
codigo char 12
fact_vta numerico 8 enteros 2 decimales (8,2)
*** PROCESO VFP6
*** OJO HE PROBADO CON ARGUMENTOS TIPO CHARACTER Y FUNCIONA BIEN MI PROBLEMA ES
*** CUANDO HAY ARGUMENTOS CHARACTER Y NUMERICO (PODRIA PASARME CON TIPO FECHA)
DA1=ALLTRIM(THISFORM.TEXT1.VALUE) && CODIGO CHAR 12
DA7=THISFORM.TEXT6.VALUE && FACTOR DE VENTA NUMERICO 8,2
IF OPT=1
no_error = SQLEXEC(gnConnHandle,'SELECT manart2(?DA1,?DA7)')
IF no_error < 0
=MESSAGEBOX('Tabla no disponible',16,'Error')
ENDIF
Endif
*** FUNCION POSTGRESQL
*** OJO HE PROBADO CON ARGUMENTOS TIPO CHARACTER Y FUNCIONA BIEN MI PROBLEMA ES
*** CUANDO HAY ARGUMENTOS CHARACTER Y NUMERICO (PODRIA PASARME CON TIPO FECHA)
DROP FUNCTION IF EXISTS manart2(CHAR,NUMERIC);
CREATE OR REPLACE FUNCTION manart2(DATO1 CHAR,DATO7 NUMERIC)
RETURNS integer AS
$$
DECLARE datoz INTEGER;
Begin
insert into art_a(CODIGO,FACT_VTA) values (DATO1,DATO7);
return datoz;
end;
$$
languaGe 'plpgsql';
NOTA: ESTOY APRENDIENDO CON USTEDES, GRACIAS POR COMPARTIR SUS CONOCIMIENTO,
JRCORONADO
