PSBVDLU2 ;BIRMINGHAM/EFC-BCMA VDL UTILITIES ;Mar 2004
Source file <PSBVDLU2.m>
| Package | Total | Call Graph |
|---|---|---|
| Barcode Medication Administration | 1 | PSJ1^PSBVT |
| Inpatient Medications | 1 | EN^PSJBCMA1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FNDLBLO(PIN,ORDN,PSBBGID) | ; Return order IV bag was printed for AND setup ^TMP("PSJ1",$J).
|
|
| GETWSID(DFN,ORDN) | ; generate a uniqe ID for wardstock
|
|
| INFUSING | ; determine if there is any bag not completed on an order or its' previous orders
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PSB(53.79 - [#53.79] | INFUSING+7, INFUSING+8, INFUSING+9, GETWSID+3, GETWSID+4 |
| ^TMP("PSJ1" | INFUSING+4, INFUSING+5!, FNDLBLO+2!, FNDLBLO+4!, FNDLBLO+5, FNDLBLO+6 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | INFUSING+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | INFUSING+2, INFUSING+5, GETWSID~, GETWSID+3, GETWSID+4, GETWSID+5 |
| >> FNDLBLO | FNDLBLO+2*, FNDLBLO+5*, FNDLBLO+6*, FNDLBLO+7 |
| ORDN | GETWSID~, FNDLBLO~, FNDLBLO+2 |
| PIN | FNDLBLO~, FNDLBLO+2 |
| PSBBGID | FNDLBLO~, FNDLBLO+5 |
| >> PSBCOMP | INFUSING+2*, INFUSING+9* |
| >> PSBDFN | INFUSING+7, INFUSING+8 |
| >> PSBINFDT | INFUSING+9* |
| >> PSBINFST | INFUSING+9* |
| >> PSBNUM | GETWSID+2*, GETWSID+4*, GETWSID+5 |
| >> PSBONX | INFUSING+2, INFUSING+3, INFUSING+6, INFUSING+9 |
| >> PSBORD | FNDLBLO+2*, FNDLBLO+7 |
| >> PSBORDX | FNDLBLO+2*, FNDLBLO+3, FNDLBLO+4, FNDLBLO+5*, FNDLBLO+6* |
| >> PSBPIN | FNDLBLO+2*, FNDLBLO+4 |
| >> PSBPONX | INFUSING+2, INFUSING+3, INFUSING+4* |
| PSBPORA | INFUSING+2! |
| PSBPORA( | INFUSING+3*, INFUSING+4*, INFUSING+6, INFUSING+9* |
| PSBSONX | INFUSING+1~, INFUSING+3*, INFUSING+4 |
| PSBSPONX | INFUSING+1~, INFUSING+3*, INFUSING+4*, INFUSING+5 |
| >> PSBUID | GETWSID+5*, GETWSID+6 |
| PSBXDONE | FNDLBLO+3! |
| PSBXDONE( | FNDLBLO+3*, FNDLBLO+4* |
| U | INFUSING+9, FNDLBLO+5, FNDLBLO+6 |
| >> X | INFUSING+6*, INFUSING+7, INFUSING+8, INFUSING+9, GETWSID+3*, GETWSID+4 |
| >> Y | INFUSING+7*, INFUSING+8, INFUSING+9, GETWSID+4* |
| >> Z | INFUSING+8*, INFUSING+9 |