BPSSCRU2 ;BHAM ISC/SS - ECME SCREEN UTILITIES ;05-APR-05
Source file <BPSSCRU2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETMWC(BP59) | ;*/
|
|
| MWCNAME(BPMWC) | ;
|
|
| RXREF(BP59) | ;
|
|
| MWC(BPRX,BPREF) | ;MAIL/WINDOW/CMOP
|
|
| GETINSUR(BP59) | ;get insurance info by the pointer of #9002313.59
|
|
| TRANDT(BP59) | ;
|
|
| DIVIS(BP59) | ;
|
|
| GETPATID(BP59) | ;
|
|
| RXST(BP59) | ;
|
|
| RXSTATUS(RXNUM) | ;*/
|
|
| RXACTIVE(BPRXSTAT) | ;*/
; 0 not valid ; 1 valid (i.e. ACTIVE/NON-VERIFIED/REFILL/HOLD/DRUG INTERACTIONS/SUSPENDED) ; -1 doesn't exist |
|
| RXSTANAM(BPRXSTAT) | ;*/
|
|
| ISRXREL(BP59) | ;
|
|
| RL(BP59) | ;
|
|
| REFILINF(BP59) | ;*/
|
|
| RXISSDT(BPRX) | ;
|
|
| RXRELDT(BPRX) | ;
|
|
| RXFILDT(BPRX) | ;
|
|
| REFRELDT(BPRX,BPREF) | ;
|
|
| REFFILDT(BPRX,BPREF) | ;
|
|
| REFISSDT(BPRX,BPREF) | ;
|
|
| REFDISDT(BPRX,BPREF) | ;
|
|
| IFREFILL(BPRX,BPREF) | ;
|
|
| RTBB(BP59) | ;*/
|
|
| PATNAME(BPDFN) | ;
|
|
| SSN4(DFN) | ;last 4 SSN
|
|
| DRGNAM(BP50) | ;
|
|
| GETDRUG(BP52) | ;
|
|
| GETDRG59(BP59) | ;
|
|
| FINISHST(BPARR59) | ;
|
|
| RXNUM(BPRX) | ;
|
|
| NDC(BPRX,BPREF) | ;*/
|
|
| DRGNAME(BP59) | ;drug name BP59 -ptr to .59 file
|
|
| ISEVEN(BPNUM) | ;
|
|
| FORMAT(BPSTR,BPSMLEN,BPSCHR,BPSLFT) | ;
|
|
| ECMENUM(BP59) | ;*/
|
