EEprom mim PIC 16F870 beschreiben

Hallo
Ich versuche schon seit Stunden meinen Fehler zu finden, irgend etwas 
habe ich anscheint übersehen.
Der Versuch ins EEPROM zu schreiben geht nicht richtig.

Ich verwende  ein PIC 16F870 und bin in bank0

MOVLW  D'30'                     ;   Adresse
MOVWF  EEprom_adress    ;   EEprom_adress liegt in bank0 auf adresse 50h
MOVFW  D'10'                     ;  wert der ins EEprom soll
MOVWF  EEprom_data       ;  EEprom_data liegt in bank0 auf adresse 51h
call EEschreiben


Eigentlich soll auf Adresse 30 ( 1Eh) der Wert 10 geschrieben werden.
in der Subrutine wird dann auf die richtige bank umgeschaltet und 
geschrieben.
Wenn ich nachher mit dem Prommer das eeprom auslese ist auf die richtige 
Adresse geschrieben
aber die daten sind falsch .
wenn ich z.b in der subrutine das ; entferne wird der richtige wert 10 
geschrieben .
Also sollte  an der bank Umschaltung liegen aber ich sehe den Fehler 
leider nicht.

Vieleicht hat jemand ne Info für mich wo ich suchen könnte.
( versuche den ram ab 70h zu nutzen gingen auch nicht )
danke
Peter



;Subrutine EEschreiben
EEschreiben
     BCF    STATUS, RP1    ; umschalten auf Bank 0 sicherheitshalber ( 
sollte aber auch ohne gehen )
     MOVF   EEprom_adress,0
     BSF    STATUS, RP1    ; umschalten auf Bank 2
     MOVWF  EEADR
     BCF    STATUS, RP1    ; umschalten auf Bank 0

     MOVF   EEprom_data,0
    ; MOVLW   D'10'
     BSF    STATUS, RP1    ; umschalten auf Bank 2
     MOVWF  EEDATA

    BSF    STATUS, RP0        ; EECON1 liegt in der Bank 3
    BCF    EECON1, EEPGD      ; wir wollen Datenspeicher beschreiben
    BSF    EECON1, WREN       ; nun ist Schreiben erlaubt

    MOVLW  0x55               ;
    MOVWF  EECON2             ; schreibe 55h nach EECON2
    MOVLW  0xAA               ;
    MOVWF  EECON2             ; schreibe AAh nach EECON2
    BSF    EECON1, WR         ; starte den Schreibzyklus

    BCF    STATUS, RP0        ; zurueck auf Bank 0
    BCF    STATUS, RP1        ; zurueck auf Bank 0

  return