1 dcl       1 sf_par            based,
2           2 type              bit(9),
3           2 parnum            fixed bin(9),
4           2 parsym            ptr;