ufff mala mia, no me recordaba que el IBExpert no me a permitido hacer los cambios debido al error y entonces copie en el post anterior el mismo codigo sql y no refleje los cambios que trate de realizar en miras a buscar la solucion
este si es parte del codigo que cambie
Código SQL
[-]
IF (:formulario = '67A') THEN
BEGIN
INSERT INTO tbl_informes_det_ce (id_registro, id_form, codigo_servicio, servicio, grupo)
VALUES (
(SELECT :idregistro, :formulario, codigo, servicio, grupo
FROM vw_servicio_ce_67a));
INSERT INTO tbl_informes_det_dv (id_registro, id_form, codigo_servicio, servicio, grupo)
VALUES (
SELECT :idregistro, :formulario, codigo, servicio, grupo
FROM vw_servicio_dv_67a);
INSERT INTO tbl_informes_det_hosp (id_registro, id_form, codigo_servicio, servicio, grupo)
VALUES (
SELECT :idregistro, :formulario, codigo, servicio, grupo
FROM vw_servicio_hosp_67a);
INSERT INTO tbl_informes_det_pext (id_registro, id_form, codigo_servicio, servicio, grupo)
VALUES (
SELECT :idregistro, :formulario, codigo, servicio, grupo
FROM vw_servicio_pext_67a);
INSERT INTO tbl_informes_det_srep (id_registro, id_form, codigo_servicio, servicio, grupo)
VALUES (
SELECT :idregistro, :formulario, codigo, servicio, grupo
FROM vw_servicio_srep_67a);
INSERT INTO tbl_informes_det_rafm (id_registro, id_form, codigo_servicio, servicio, grupo)
VALUES (
SELECT :idregistro, :formulario, codigo, servicio, grupo
FROM vw_servicio_rafm_67a);
END
END