PSJDOSE ;BIR/MV-POSSIBLE DOSES UTILITY ;16 Jan 2001 1:53 PM
Source file <PSJDOSE.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 2 | ^DIE ^DIR | 
| Inpatient Medications | 1 | ENHLP^PSGOEM | 
| Pharmacy Data Management | 1 | DOSE^PSSORPH | 
| Registration | 1 | PAUSE^VALM1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| AGAIN | ;Prompt for dosage order again | |
| EDITDD | ;Editing DDs | |
| DOSECHK | ; | |
| GETDOSE(PSJDD) | ;Dosage Order | |
| ONEDD | ; | |
| SELDOSE(X,PSJDD) | ; | |
| DSPWARN | ; | |
| CONT(X) | ;Ask if user accepting the dose | |
| DUPD | ; | |
| SETDUPD(X) | ; | |
| BCMAUPD(PSJDD) | ; | |
| EDITDOSE | ;Editing Dosage Ordered for active order | |
| DOSECHK1 | ; | |
| SETVAR | ; | |
| DOSE(PSJDD) | ;Prompt for Dosage Ordered | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: READ | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^PS(53.45 - [#53.45] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PS(53.45 - [#53.45] | EDITDOSE+4, SETDUPD+2, SETDUPD+4*, EDITDD+3, DOSECHK+5, DOSECHK+6, DOSECHK+7*, DOSECHK1+4, DOSECHK1+5 | 
| Name | Line Occurrences | 
|---|---|
| $$CONT | AGAIN+23, AGAIN+31, AGAIN+39 | 
| AGAIN | AGAIN+20, AGAIN+28, AGAIN+36, AGAIN+39 | 
| BCMAUPD | DOSECHK1+13 | 
| DOSE | EDITDOSE+5, GETDOSE+2 | 
| DOSECHK | EDITDOSE+6, GETDOSE+6 | 
| DOSECHK1 | DOSECHK+9 | 
| DUPD | GETDOSE+4, DUPD+5, DUPD+6, DUPD+8 | 
| ONEDD | DOSECHK1+12, DOSECHK1+14 | 
| SELDOSE | AGAIN+25, AGAIN+33, AGAIN+41 | 
| SETDUPD | GETDOSE+5, DUPD+10 | 
| SETVAR | DOSE+4, DSPWARN+2 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | EDITDOSE+4 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CHK | ONEDD+4~* | 
| DA | DOSE+3~, EDITDD+1~, EDITDD+2* | 
| DIE | EDITDD+1~, EDITDD+2* | 
| DIR | DOSE+3~, AGAIN+2~, AGAIN+9!, CONT+1~, CONT+2! | 
| DIR("?" | AGAIN+12* | 
| DIR("A" | AGAIN+10*, CONT+3* | 
| DIR("B" | AGAIN+11*, CONT+3* | 
| DIR(0 | AGAIN+7*, AGAIN+9*, CONT+3* | 
| DIRUT | DOSE+3~, AGAIN+17, CONT+1~, CONT+2! | 
| DR | DOSE+3~, EDITDD+1~, EDITDD+2* | 
| DR(2 | EDITDD+2* | 
| DTIME | DUPD+3 | 
| DTOUT | DOSE+3~, AGAIN+17 | 
| DUOUT | DOSE+3~, AGAIN+4, AGAIN+17, CONT+2!, CONT+5! | 
| >> PSGDO | AGAIN+11, AGAIN+16*, AGAIN+42*, SELDOSE+2*, DOSECHK+3, DOSECHK1+2, DOSECHK1+16, ONEDD+3, ONEDD+4, ONEDD+5 | 
| >> PSGOEE | EDITDOSE+10* | 
| PSGOER1 | EDITDOSE+2~ | 
| >> PSGOROE1 | AGAIN+17*, DUPD+3* | 
| >> PSGUD | DUPD+2*, DUPD+3, DUPD+5, SETDUPD+1*, SETDUPD+3*, SETDUPD+4 | 
| PSJBCMA | BCMAUPD+2! | 
| PSJBCMA( | BCMAUPD+6* | 
| PSJCNT | DOSECHK+4~*, DOSECHK+8*, DOSECHK1+12, DOSECHK1+14, DOSECHK1+16, BCMAUPD+1~, BCMAUPD+5*, BCMAUPD+6 | 
| PSJCONT | DOSE+3~, AGAIN+20, AGAIN+23*, AGAIN+24, AGAIN+28, AGAIN+31*, AGAIN+32 | 
| PSJDD | EDITDOSE+2~, EDITDOSE+4*, EDITDOSE+5, GETDOSE~, GETDOSE+2, DOSE~, DOSE+5, AGAIN+16, AGAIN+25, AGAIN+30 , AGAIN+32, AGAIN+33, AGAIN+41, AGAIN+42, SELDOSE~, SELDOSE+4, BCMAUPD~, BCMAUPD+6 | 
| PSJDL | DOSE+3~, AGAIN+4*, AGAIN+6 | 
| PSJDOSE | DSPWARN+1~ | 
| PSJDOSE("DO" | SELDOSE+3* | 
| PSJDOSE("WARN" | EDITDOSE+8, GETDOSE+8, SETVAR+1*, DSPWARN+3 | 
| PSJDOSE("WARN1" | EDITDOSE+8, GETDOSE+8, SETVAR+2*, DSPWARN+3 | 
| >> PSJDOX | DOSE+5, DOSE+6, AGAIN+30, AGAIN+32 | 
| >> PSJDOX( | AGAIN+4, AGAIN+6, AGAIN+20, AGAIN+21, AGAIN+41, SELDOSE+1 | 
| >> PSJDOX(1 | DOSE+6*, DOSE+7, DOSE+8*, AGAIN+3, AGAIN+30, AGAIN+31 | 
| PSJDSFLG | EDITDOSE+7, GETDOSE+7, DOSECHK+1!*, DOSECHK1+3*, DOSECHK1+4, DOSECHK1+12, DOSECHK1+16*, ONEDD+1*, ONEDD+2, ONEDD+3 , ONEDD+4*, ONEDD+5* | 
| PSJDSSEL | EDITDOSE+2~, GETDOSE+1~, GETDOSE+3, GETDOSE+5, AGAIN+16*, AGAIN+40!, AGAIN+42*, SELDOSE+4*, SELDOSE+5*, SELDOSE+6* , DUPD+9*, SETDUPD+1 | 
| PSJDSUPD | EDITDOSE+2~, GETDOSE+1~, GETDOSE+4, GETDOSE+5, AGAIN+16*, AGAIN+42* | 
| PSJPIECE | DOSE+3~, DOSE+7*, DOSE+8, AGAIN+6, AGAIN+21, AGAIN+28, AGAIN+41, SELDOSE+2, SELDOSE+4, SELDOSE+6 | 
| >> PSJSYSP | EDITDOSE+4, SETDUPD+2, SETDUPD+4, EDITDD+2, EDITDD+3, DOSECHK+5, DOSECHK+6, DOSECHK+7, DOSECHK1+4, DOSECHK1+5 | 
| >> PSJSYSU | DOSECHK+2 | 
| PSJTOT | DOSECHK1+1~, DOSECHK1+3*, DOSECHK1+15*, DOSECHK1+16 | 
| PSJUNIT | DOSECHK1+1~, DOSECHK1+2*, DOSECHK1+10, DOSECHK1+11 | 
| PSJX | EDITDOSE+2~, EDITDOSE+4*, DOSE+3~, AGAIN+1*, AGAIN+5*, AGAIN+6, AGAIN+7, AGAIN+10, DUPD+1~, SETDUPD+2* , SETDUPD+4, DOSECHK+4~, DOSECHK+5*, DOSECHK+6, DOSECHK+7, DOSECHK1+1~, DOSECHK1+4*, DOSECHK1+5 | 
| PSJXDD | DOSECHK+4~, DOSECHK+6*, DOSECHK+7, DOSECHK1+1~, DOSECHK1+5*, DOSECHK1+6, DOSECHK1+7, DOSECHK1+13 | 
| >> PSJXDOSE | AGAIN+41* | 
| >> PSJXDOX | DOSECHK1+7, DOSECHK1+8, DOSECHK1+13 | 
| >> PSJXDOX( | ONEDD+2, ONEDD+3, ONEDD+4, ONEDD+5, BCMAUPD+3, BCMAUPD+4, BCMAUPD+6 | 
| >> PSJXDOX(1 | DOSECHK1+8, DOSECHK1+15 | 
| >> PSJXDUP | DOSECHK1+6*, DOSECHK1+13, ONEDD+3, ONEDD+4, ONEDD+5 | 
| PSJXFLG | DOSECHK1+1~, DOSECHK1+3*, DOSECHK1+4, DOSECHK1+8* | 
| PSJXUNIT | DOSECHK1+1~, DOSECHK1+9*, DOSECHK1+10*, DOSECHK1+11*, ONEDD+3 | 
| >> PSJY | AGAIN+13*, AGAIN+16, AGAIN+20, AGAIN+21, AGAIN+25, AGAIN+28, AGAIN+29, AGAIN+30, AGAIN+36, AGAIN+39 , AGAIN+41, AGAIN+42 | 
| U | GETDOSE+5, DOSE+7, DOSE+8, AGAIN+3, AGAIN+6, AGAIN+16, AGAIN+21, AGAIN+30, AGAIN+31, AGAIN+41 , AGAIN+42, SELDOSE+2, SELDOSE+3, SELDOSE+4, SELDOSE+5, SELDOSE+6, DUPD+9, SETDUPD+1, SETDUPD+4, DOSECHK+7 , DOSECHK1+6, DOSECHK1+8, ONEDD+3, ONEDD+4, ONEDD+5, BCMAUPD+4, BCMAUPD+6 | 
| X | AGAIN+21~*, AGAIN+22, AGAIN+23, AGAIN+41*, SELDOSE~, SELDOSE+1*, SELDOSE+2, SELDOSE+3, SELDOSE+4, SELDOSE+5 , SELDOSE+6, CONT~, CONT+3, DUPD+1~, DUPD+3*, DUPD+4*, DUPD+5*, DUPD+6, DUPD+7*, DUPD+8* , DUPD+9, DUPD+10, SETDUPD~, SETDUPD+1*, SETDUPD+2, DOSECHK1+11*, ONEDD+1~, ONEDD+2*, ONEDD+3, ONEDD+4 , ONEDD+5, BCMAUPD+3*, BCMAUPD+4, BCMAUPD+6 | 
| Y | EDITDOSE+2~, AGAIN+13, CONT+1~, CONT+6 |