PLS-00103: stießen auf das symbol "end-of-file", wenn Sie erwarten, einen der folgenden Schritte: starten Sie die Funktion pragma-Verfahren

SUBSTRING ist nicht eine Funktion in Oracle - du suchst SUBSTR.

Einer Variablen wie d können nicht deklariert werden, als VARCHAR2 - es muss gegeben werden, eine Länge. Beachten Sie, dass dies unterscheidet sich von einem parameter, wie p_IBAN oder einer return-Wert-Erklärung - in beiden Fällen ist eine Länge nicht erforderlich ist (oder sogar erlaubt).

@wweicker richtig darauf hin, dass Sie nicht WÄHLEN, in einem SUBSTR, und müssen stattdessen eine variable verwenden.

Wenn diese Fehler behoben sind ich denke, deine Funktion sollte so Aussehen:

CREATE OR REPLACE FUNCTION checkIBAN
    (p_IBAN in varchar2)
  RETURN varchar2
is
  v_landcode          varchar2(2);
  v_lengte            number(2);
  v_omgezettelandcode varchar2(32767);  -- max possible size for a VARCHAR2 var
  v_teller            number(2) DEFAULT 1;
  n                   number(9);
  d                   varchar2(32767);
  s                   VARCHAR2(32767);
BEGIN
  v_landcode := SUBSTR(p_IBAN, 1, 2);

  select lengte
    into v_lengte
    from IBAN
    where code = v_landcode;

  if p_IBAN.LENGTH != v_lengte then
    return 'F';
  end if;

  v_omgezettelandcode := SUBSTR(p_IBAN, 5) || SUBSTR(p_IBAN, 1, 4);

  WHILE v_teller < v_omgezettelandcode.LENGTH LOOP
    select getal
      into s
      from abc
      where SUBSTR(v_omgezettelandcode, v_lengte, v_lengte) = letter;

    v_omgezettelandcode := SUBSTR(vomgezettelandcode, 1, v_lengte-1) ||
                           letter ||
                           SUBSTR(vomgezettelandcode, v_lengte+LENGTH(letter));

    v_teller := v_teller + 1;
  END LOOP;

  d := v_omgezettelandcode;
  n := SUBSTR(d, 1, 9);
  d := SUBSTR(d, 10);
  n := n/97;

  WHILE d.LENGTH > 7 LOOP
    n := n || SUBSTR(d, 1, 7);
    d := SUBSTR(d, 8);
    n := n/97;
  END LOOP;

  n := n || d;

  if n/97 = 1
    then return 'T';
    else return 'F';
  end if;
END checkIBAN;

Viel Glück.

Teilen und genießen.

danke an Euch alle, irgendwann drehte ich Sie über al little bit, jetzt funktioniert es.

CREATE OR REPLACE FUNCTION checkIBAN
(p_IBAN in varchar2)
RETURN varchar2
is
v_landcode          varchar2(2);
v_lengte            number(2);
v_omgezettelandcode varchar2(32767);  -- max possible size for a VARCHAR2 var
v_teller            number(2) DEFAULT 1;
n                   number(9);
d                   varchar2(32767);
s                   VARCHAR2(32767);
v_omgezet           varchar2(32767);
v_number            varchar2(32767);
BEGIN
v_landcode := SUBSTR(p_IBAN, 1, 2);

select lengte
into v_lengte
from IBAN
where code = v_landcode;

if LENGTH(p_IBAN) != v_lengte then
return 'F';
end if;

v_omgezettelandcode := SUBSTR(p_IBAN, 5) || SUBSTR(p_IBAN, 1, 4);

while v_teller < LENGTH(v_omgezettelandcode) LOOP
    if SUBSTR(v_omgezettelandcode, v_teller, v_teller) in (0, 1, 2, 3, 4, 5, 6,     7, 8, 9)
        then v_omgezet := v_omgezet || SUBSTR(v_omgezettelandcode,     v_teller, v_teller);
    else 
        select getal
        into v_number
        from abc
        where letter = SUBSTR(v_omgezettelandcode, v_teller, v_teller);
        v_omgezet := v_omgezet || v_number;
    end if;
end loop;

d := v_omgezet;
n := SUBSTR(d, 1, 9);
d := SUBSTR(d, 10);
n := n/97;

WHILE LENGTH(d) > 7 LOOP
n := n || SUBSTR(d, 1, 7);
d := SUBSTR(d, 8);
n := n/97;
END LOOP;

n := n || d;

if n/97 = 1
then return 'T';
else return 'F';
end if;
END checkIBAN;