[@-Soft]

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 [-]
/*FORMULARIO 67A CON CAMAS*/
  IF (:formulario = '67A') THEN
  BEGIN

    /*CONSULTA EXTERNA 67A*/
    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));

    /*CONSULTA DATOS VARIOS 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);

    /*CONSULTA HOSPITALARIA 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);

    /*CONSULTA PACIENTES EXTRANJEROS 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);

    /*CONSULTA SALUD REPRODUCTIVA 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);

    /*CONSULTA REPORTE ADMINISTRATIVO-FINANCIERO 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