ER pget_mpf ( ID mpfid, VP *p_blk );
MOVW BC, #LOWW(_p_blk)
MOV A, #mpfid
CALL !!_pget_mpf
ID mpfid;
VP *p_blk;