*! Update of _glmfl (sg16.3), PR 14-Feb-94.  STB-18: sg22
program define _jprglef
	version 3.1
	local fam "`1'"
	local link "`2'"
	if "`link'"=="l" | "`link'"=="opo" { local eform "eform(Odds Ratio)" }
	else if "link'"=="p" | "`link'"=="c" {
		local eform "eform(ExpB)"
	}
	else if ("`fam'"=="poi") { local eform "eform(IRR)" }
	else local eform "eform(e^coef)"
	global S_1 `eform'
end