S BPS("X")=$G(BPS("Patient","Street Address Line 1"))
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),40)
S $P(^BPSC(BPS(9002313.02),"B00"),U,8)=BPS("X")