Suche Fehler

Computer: Software & Programmierung SQL & Datenbank - Programmierung
#1

Hallo, kann mir jemand sagen wo da der Fehler ist??

REM
DROP TABLE TEST_TAB;
REM
CREATE TABLE TEST_TAB (IMS_ID Number(12),
IMS_ADR Varchar(255),
IMS_CAS_ID Varchar(255),
IMS_PAGES Number(10),
VERSION Number(5)
);
REM
DECLARE
page_adr INTEGER;
verz1_adr INTEGER;
CURSOR tabcur IS
SELECT ims.ims_adr,max(ims.version),ims_table.ims_id,
ims.ims_pages,ims.ims_cas_id_ref
FROM mdt, ims
WHERE mdt.meid = ims.ims_id
AND mdt.version = ims.version
AND ims.ims_cas_id_ref = ‚PROJEKT‘
GROUP BY ims.ims_adr,ims.ims_id,
ims.ims_pages,ims.ims_cas_id_ref
ORDER BY ims.ims_adr;
n_ims_id NUMBER(10);
n_pages NUMBER(10);
n_version NUMBER(4) ;
n_page_count NUMBER(10);
s_archiv VARCHAR2(255);
s_ims_adr VARCHAR2(255);
BEGIN
OPEN tabcur;
LOOP
FETCH tabcur
INTO s_ims_adr,n_version,n_ims_id,n_pages,s_archiv;
EXIT WHEN tabcur%NOTFOUND;
– no data
FOR page_count IN 1…n_pages LOOP
page_adr := TO_NUMBER(SUBSTR(s_ims_adr,10,3)+page_count-1);
verz1_adr := TO_NUMBER(SUBSTR(s_ims_adr,7,3)+1);

#Genau in der Ziele(verz1_adr …) bleibt das Program stehen, wieso??

IF page_adr

#2

Hallo Micha,

Falls du ernsthaft Hilfe suchst, dann musst du schon ein paar mehr Informationen dazuschreiben. Z. B. was für ein Fehler auftritt.

Grüße, Robert

PS: Mit dem HTML-Tag PRE bleiben Einrückungen in Code-Beispielen erhalten, wenn du sie hier postest. Gib einfach vor dem Code und nach dem Code ein (die Leerzeichen sind nicht wichtig).

#3

TO_NUMBER(SUBSTR(s_ims_adr,7,3)+1)
Versuchst Du hier nicht die Addition eines Datentyp String mit einem Datentyp Number?

Probier es doch mal so herum:
TO_NUMBER(SUBSTR(s_ims_adr,7,3))+1

#4

Danke für die Mühe.