©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PSUCS17 ;BIR/DJE,DJM - GENERATE PSU CS RECORDS (TYPE 17) ;25 AUG 1998
Source file <PSUCS17.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Benefits Management | 4 | DIVISION^PSUCS2 (FORMIND,GNAME,LOCTYP,NDC,NFIND,VDC,VPNAME)^PSUCS4 BUILDREC^PSUCS5 $$VALI^PSUTL |
| Registration | 1 | PID^VADPT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FACILTY | ;
|
|
| TYP17 | ; Processing the transaction for dispensing type 17
|
|
| UNITC | ;Unit Cost
|
|
| QTY17 | ;For transactions with a dispensing type =17, total the number of doses
|
|
| DRUG | ;EP loop drugs within patient
|
|
| DUNIT | ;Dispense Unit
|
|
| EN | ;EP scan the ^XTMP(job,"MC",loc,pat,drug,qt)=PSUIENDA
; where type 17 were stored combining multiples for a patient |
|
| SSN | ;Field # 58.81,73 [PATIENT] Points to File # 2
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XTMP( | EN+3, EN+5, DRUG+2, QTY17+8 |
| Name | Line Occurrences |
|---|---|
| DRUG | EN+5 |
| DUNIT | TYP17+21 |
| FACILTY | TYP17+4 |
| QTY17 | TYP17+21 |
| SSN | TYP17+8 |
| TYP17 | DRUG+8 |
| UNITC | TYP17+21 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DRUG+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | EN+4*, EN+5*, DRUG+2, DRUG+3, SSN+3*, QTY17+8 |
| >> PSUCSJB | EN+3, EN+5, DRUG+2, QTY17+8 |
| >> PSUDRG | DRUG+4*, QTY17+8 |
| >> PSUDRG(4 | DUNIT+2, UNITC+2 |
| >> PSUDTM(3 | DRUG+5* |
| >> PSUDUN( | DUNIT+2*, DUNIT+3 |
| >> PSUIENDA | DRUG+4*, DRUG+5 |
| >> PSULOC | EN+2*, EN+3*, EN+5, DRUG+2, QTY17+8 |
| >> PSULTP(1 | TYP17+13 |
| >> PSUMCHK | EN+2* |
| >> PSUPDU(16 | UNITC+2* |
| >> PSUPIEN(73 | DRUG+3*, SSN+2, SSN+3 |
| PSUPLC | DRUG+11! |
| >> PSUSNDR | DRUG+5 |
| PSUSSN | DRUG+11! |
| PSUSSN( | SSN+4* |
| >> PSUTQY(5 | DRUG+9, QTY17+8* |
| >> PSUTYP | EN+2* |
| >> SENDER | DRUG+5* |
| >> UNIT | DUNIT+3* |
| >> VA("PID" | SSN+4 |
| >> X | DRUG+2*, DRUG+4 |
| Z | DRUG+1*, DRUG+2*, DRUG+4, DRUG+7~ |