Error con pl sql

[Diegon]

BUENAS TARDES AMIGOS NECESITIO POR FAVOR QUE ME COLABOREN CON ESTE PROBLEMA ; TENGO BUCLE Y DENTRO DE ESTE BUCLE SALE UNA CONSULTA A LA BASE DE DATOS

ASI ES MAS OMENOS

WHILE TRUE
LOOP
SELECT dcd.acronimo_diagnostico
FROM cargos_directos_hc
INNER JOIN diag_cargos_directos_hc dcd
ON (dcd.codigo_cargo_directo=cd.codigo_datos_hc)
WHERE cd.numero_solicitud = sol
AND dcd.principal = 'N'
AND dcd.complicacion = 'N'
ORDER BY dcd.codigo
END LOOP;
LOOP IF total = nume THEN acronimo := registro.acronimo_diagnostico;
END IF;
END LOOP;
total := total + 1;
END LOOP;
END IF;
END IF;
RETURN acronimo;
END;

LA COSA ES QUE ME SACA UN ERRO DE statement ingnored

[jc3000]

¿ Solo te saca un error ?
De entrada :
-- O te sobra un end loop o te falta un loop
-- Aquí te falta el punto y coma : ORDER BY dcd.codigo
-- Tienes dos end if pero no veo los if
-- En el SELECT te falta el " INTO "
Bla, bla , bla, bla............
Eso que has puesto no hay por donde cogerlo........................................... ......

[Diegon]

Jc3000 bueno te muestro todo el plsql es el siguiente

Código PHP:

  reate or replace 
FUNCTION        getAcronimoServPrincipPaquetiz 
    ( 
      INT sol, 
      BOOLEAN prin, 
      BOOLEAN comp) RETURN VARCHAR 
  IS 
  BEGIN  
    DECLARE 
      servicio     INTEGER; 
      solicitud    INT; 
      tipo         INTEGER; 
      tiposervicio VARCHAR; 
      acro         VARCHAR; 
      prin_acro    VARCHAR(2); 
      com_acro     VARCHAR(1); 
   
      BEGIN 
       SELECT dp.servicio  , 
        dp.numero_solicitud, 
        s.tipo             , 
        gettiposervicio(dp.servicio) 
         INTO servicio, 
        solicitud     , 
        tipo          , 
        tiposervicio 
         FROM detalle_paquetizacion dp 
      inner join paquetizacion 
          ON(dp.codigo_paquetizacion = paquetizacion.codigo) 
      inner join  solicitudes s 
           ON(s.numero_solicitud         = dp.numero_solicitud) 
        WHERE p.numero_solicitud_paquete = sol 
      AND principal                      =''''; 
       
      acro          := '\'; 
      IF tipo        = 12 THEN 
        IF prin      = true THEN 
          prin_acro := ''''; 
        ELSE 
           prin_acro := ''''; 
        END IF; 
        IF comp     = true THEN 
          com_acro := ''''; 
        ELSE 
          com_acro := '''; 
        END IF; 
         SELECT dcd.acronimo_diagnostico 
           INTO acro 
           FROM cargos_directos cd 
        inner join  diag_cargos_directos_hc dcd 
             on (dcd.codigo_cargo_directo=cd.codigo_datos_hc) 
          where  cd.numero_solicitud      = solicitud 
        AND dcd.principal                = prin_acro 
        AND dcd.complicacion             = com_acro limit 0,1; 
      ELSE 
        IF tiposervicio   IS NOT NULL THEN 
          IF tiposervicio IN (R,Q,D) THEN 
             SELECT d.diagnostico 
               INTO acro 
               FROM sol_cirugia_por_servicio sc 
            INNER JOIN diag_post_opera_sol_cx d 
                 ON(d.cod_sol_cx_servicio=sc.codigo 
            AND d.principal              = prin 
            AND d.complicacion           = comp ) 
              WHERE sc.numero_solicitud  = solicitud 
            AND sc.servicio              = servicio limit 1; 
          END IF; 
          IF tiposervicio = P THEN 
             SELECT dp.acronimo 
               INTO acro 
               FROM res_sol_proc rsp 
            INNER JOIN diag_procedimientos dp 
                 ON(dp.codigo_respuesta  =rsp.codigo 
            AND dp.principal             = prin 
            AND dp.complicacion          = comp) 
              WHERE rsp.numero_solicitud = solicitud 
           ORDER BY rsp.codigo DESC limit 0,1; 
          END IF; 
        END IF; 
      END IF; 
      IF acro IS NULL THEN 
        acro  := ; 
      END IF; 
      RETURN acro; 
    END; 
  END;  
   

estos on los errores que saca

Error(35,24): PLS-00103: Encountered the symbol "\" when expecting one of the following: ( - + case mod new not null <an identifier> <a double-quoted delimited-identifier> <a bind variable> continue avg count current exists max min prior sql stddev sum variance execute forall merge time timestamp interval date <a string literal with character set specification> <a number> <a single-quoted SQL string> pipe <an alternatively-quoted string literal with character set specification> <an alternatively

Error(50,9): PLS-00103: Encountered the symbol "INNER" when expecting one of the following: , ; for group having intersect minus order start union where connect

[jc3000]

Revisa esto
--
reate or replace
--
INT sol,
BOOLEAN prin,
BOOLEAN comp

¿ No sería ?

sol INT ,
prin BOOLEAN ,
comp BOOLEAN )

--

Y revisa esta serie :

='''';

Y esta
:='''';

Me da la impresion de que o te sobra una comilla simple o te falta una.

Es que no estoy en el curro y no lo puedo chequear con un editor de sql para ver los string en otro color y demas.................

[Diegon]

Gracias Ṕor tu respuesta jc3000, lo tendre presente