| NCPDP FIELD NUMBER |
469 |
| F6 LENGTH |
3 |
| NAME |
PRIM CARE PROV LOCATION CODE |
| FORMAT |
NUMERIC |
| F6 FORMAT |
ALPHANUMERIC |
| ID |
H5 |
| LENGTH |
3 |
| D0 LENGTH |
3 |
| D0 FORMAT |
ALPHANUMERIC |
| GET CODE |
S BPS("X")=$G(BPS("Patient","Primary Care Prov Location Code"))
; Field 469-H5 was added to file 9002313.91 in error. It should never
; appear on a payer sheet, and it should never be populated.
|
| D0 FORMAT CODE |
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),3)
|
| SET CODE |
S $P(^BPSC(BPS(9002313.02),400,BPS(9002313.0201),460),U,9)=BPS("X")
|
| FORMAT CODE |
S BPS("X")=$$NFF^BPSECFM($G(BPS("X")),3)
|
| F6 FORMAT CODE |
S BPS("X")=$$ANFF^BPSECFM($G(BPS("X")),3)
|