Hi there!
I edited portion of the program and incorporate both of your comments as shown:

here:
'PORTA=0

SHIFTIN DIPIN,CLPIN,MSBPRE,[wvar\6]

PORTA=wvar
'pauseUS 500
'PORTA=0
goto here

What happened is all LEDS on RA0 to RA3 are all lighted continuously, no change whatsoever.
I expect that LEDs will be lighted as data comes in. For example, if data in is 1011, then I expect RA0 and RA1 to be high, RA2 to be low and RA3 to be high. And this should happen at the same time AFTER the last bit of serial input is received.

What could be wrong?