| NCPDP FIELD NUMBER |
B95 |
| F6 LENGTH |
2 |
| NAME |
FACILITY ID QUALIFIER |
| FORMAT |
ALPHA/NUMERIC |
| F6 FORMAT |
ALPHANUMERIC |
| ID |
3Z |
| LENGTH |
2 |
| D0 LENGTH |
2 |
| D0 FORMAT |
ALPHANUMERIC |
| VISTA FIELD NUMBER |
2095 |
| STANDARD NCPDP FIELD NAME |
FACILITY ID QUALIFIER |
| GET CODE |
S BPS("X")=$G(BPS("Insurer","Facility ID"))
S BPS("X")=$S(BPS("X")'="":1,1:"")
|
| REQUEST SEGMENT |
FACILITY |
| D0 FORMAT CODE |
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),2)
|
| SET CODE |
S $P(^BPSC(BPS(9002313.02),400,BPS(9002313.0201),"B90"),U,1)=BPS("X")
|
| FORMAT CODE |
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),2)
|
| F6 FORMAT CODE |
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),2)
|
