you probably also need something like:

        bsf     STATUS,RP0
        movlw   07h             ; <-- choose appropriate value
        movwf   OPTION
        bcf     STATUS,RP0

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics