ER ref_cyc ( ID cycid, T_RCYC *pk_rcyc );
MOVW BC, #LOWW(_pk_rcyc)
MOV A, #cycid
CALL !!_ref_cyc
ID cycid;
T_RCYC *pk_rcyc;