ER ref_flg ( ID flgid, T_RFLG *pk_rflg );
MOVW BC, #LOWW(_pk_rflg)
MOV A, #flgid
CALL !!_ref_flg
ID flgid;
T_RFLG *pk_rflg;