PSBMLLKU ;BIRMINGHAM/TEJ - BCMA RPC LOOKUP UTLILITIES ;03/06/16 3:06pm
Source file <PSBMLLKU.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RPC(RESULTS,PSBREC) | ; Remote Procedure Call Entry Point.
|
|
| ADMLKUP(RESULTS,PSBREC) | ;
; Lookup ADMinistrations per DFN and search DATE ; input - PSBREC(1) DFN ; PSBREC(2) Search DATE |
|
| CHKKEY(PSBIENX) | ;
|
|
| PTLKUP(RESULTS,PSBREC) | ; Patient lookup handled separately for security
; input - PSBREC (array) User entered patient lookup data |
|
| PTREC(DFN) | ;
; Extrinsic to return a Pt Rec in standard list format |
|
| SELECTAD(RESULTS,PSBREC) | ; Select Administration
|
|
| SELSTTUS(RESULTS) | ;
; Provide the SELectable STaTUS |
|
| KILLAADT | ;
; Here because there is an errant index entry via version 1.0/2.0 ; Cleansing! |
|
| PAD(VAL) | ; Return VAL with leading zeroes padded to 6 characters
|
| RPC Name | Call Tags |
|---|---|
| PSB MED LOG LOOKUP | RPC |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | FIND^DIC, GET1^DIQ |
| ^NURSF(211.4 - [#211.4] | GET1^DIQ |
| ^DIC(42 - [#42] | GET1^DIQ |
| ^PSDRUG - [#50] | GET1^DIQ |
| ^PS(52.6 - [#52.6] | GET1^DIQ |
| ^PS(52.7 - [#52.7] | GET1^DIQ |
| ^PSB(53.79 - [#53.79] | GET1^DIQ |
| ^AUTTLOC - [#9999999.06] | GET1^DIQ |
