MySQL Cursor durchlaufen schlägt fehl

CREATE PROCEDURE migKunden()
BEGIN
     DECLARE no_more_rows BOOLEAN DEFAULT FALSE;
     DECLARE tmpFirma INT DEFAULT 0;
     
     DECLARE m_Kundennummer INT;     
     DECLARE m_Name VARCHAR(45);     
     DECLARE m_Vorname VARCHAR(45);     
     DECLARE m_Adresse VARCHAR(45);     
     DECLARE m_Plz INT(5);     
     DECLARE m_Ort VARCHAR(45);     
     DECLARE m_Telefon VARCHAR(45);     
     DECLARE m_Mobil VARCHAR(45);     
     DECLARE m_Telefon2 VARCHAR(45);     
     DECLARE m_Telefax VARCHAR(45);     
     DECLARE m_Email VARCHAR(45);     
     DECLARE m_Firma VARCHAR(45);     
     DECLARE m_Abteilung VARCHAR(45);     
     DECLARE m_Werk VARCHAR(45);     
     DECLARE m_Bemerkung TEXT;     
     DECLARE m_Info TEXT;          

     DECLARE m_Cursor CURSOR FOR 
     SELECT * FROM access.kundendaten ORDER BY Kundennummer;  
     
     
     DECLARE CONTINUE HANDLER FOR NOT FOUND SET  no_more_rows := TRUE;
     

        
     DELETE FROM test.Kunde;
     DELETE FROM test.Firma;     
     DELETE FROM test.tbl_Firma_Kunde;     
     DELETE FROM test.Kommunikation;



     OPEN m_Cursor;     

         SCHLEIFE: LOOP
          

             FETCH m_Cursor INTO m_Kundennummer, m_Name, m_Vorname, m_Adresse, m_Plz, m_Ort, m_Telefon, m_Mobil, m_Telefon2, m_Telefax, m_Email, m_Firma, m_Abteilung, m_Werk, m_Bemerkung, m_Info;              

                          
             /* Kundeneinträge migrieren */
             INSERT INTO test.Kunde 
                (Kunde_ID, Kunde_Name, Kunde_Vorname, Kunde_Adresse, Kunde_Plz, Kunde_Ort, Kunde_Bemerkung)                    
             VALUES                 
                (m_Kundennummer, m_Name, m_Vorname, m_Adresse, m_Plz, m_Ort, m_Bemerkung);                    


             /* Kommunikationseinträge migrieren */
             IF m_Telefon IS NOT NULL THEN                 
                INSERT INTO test.Kommunikation (Kunde_ID, Kommunikation_Art, Kommunikation_Wert) VALUES (m_Kundennummer, 'Telefon', m_Telefon);                          
             END IF;                 

             IF m_Telefon2 IS NOT NULL THEN                 
                INSERT INTO test.Kommunikation (Kunde_ID, Kommunikation_Art, Kommunikation_Wert) VALUES (m_Kundennummer, 'Telefon', m_Telefon2);                          
             END IF;   

             IF m_Mobil IS NOT NULL THEN                 
                INSERT INTO test.Kommunikation (Kunde_ID, Kommunikation_Art, Kommunikation_Wert) VALUES (m_Kundennummer, 'Mobil', m_Mobil);                          
             END IF;                 

             IF m_Telefax IS NOT NULL THEN                 
                INSERT INTO test.Kommunikation (Kunde_ID, Kommunikation_Art, Kommunikation_Wert) VALUES (m_Kundennummer, 'Telefax', m_Telefax);                          
             END IF;
                              
             IF m_Email IS NOT NULL THEN                 
                INSERT INTO test.Kommunikation (Kunde_ID, Kommunikation_Art, Kommunikation_Wert) VALUES (m_Kundennummer, 'E-Mail', m_Email);                          
             END IF;   

             /* Firma_ID raussuchen, falls Firmenname bereits vorhanden */
             SELECT Firma_ID INTO tmpFirma FROM test.Firma WHERE Firma_Name = m_Firma LIMIT 1;

             IF tmpFirma = 0 THEN 
                IF m_Firma IS NOT NULL THEN                
                   INSERT INTO test.Firma (Firma_Name) VALUES (m_Firma);                    
                   INSERT INTO test.tbl_Firma_Kunde (Firma_ID, Kunde_ID, Werk, Abteilung) VALUES (LAST_INSERT_ID(), m_Kundenummer, m_Werk, m_Abteilung);                                           
                END IF;
             ELSE                 
                INSERT INTO test.tbl_Firma_Kunde (Firma_ID, Kunde_ID, Werk, Abteilung) VALUES (tmpFirma, m_Kundenummer, m_Werk, m_Abteilung);                                        
             END IF;


            IF no_more_rows THEN
               CLOSE m_Cursor;
               LEAVE SCHLEIFE;
            END IF;        
         
         END LOOP SCHLEIFE; 

END;