S BPS("X")=""
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),2)
; Not implemented
S BPS("X")=$$ANFF^BPSECFM(BPS("X"),2)