DG: LSTPELIG^DGPMAPI9 - returns primary eligibility code (REF-386)