PSSUTIL1 ;BIR/RTR-Utility routine ;08/21/00
Source file <PSSUTIL1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(PSSDRIEN) | ;
|
|
EN1(PSSOA,PSSOAP) | ;
|
|
ITEM(PSSIT,PSSDR) | ;Return Orderable Item to CPRS
|
|
IVQ | ;
|
|
SCHQT | ;
|
|
DRG(PSSDD,PSSOI,PSSPK) | ;
; PSSDD - Array of Drugs ; PSSOI - Orderable Item (Pharmacy) ; PSSPK - Application Package ("O"-Outpatient;"I"-IV;"X"-Non-VA Med) |
|
IVX | ;
|
|
SCH(SCH) | ;Expand schedule for Outpatient order in CPRS
|
|
IVDEA(PSSIVOI,PSSIVOIP) | ;DEA Special Handling to CPRS for IV Fluids dialogue
|
|
Name | Field # of Occurrence |
---|---|
$$DFSU^PSNAPIS | EN+4 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(50.607 - [#50.607] | EN+5 |
^PS(50.7 - [#50.7] | ITEM+3, EN1+12, EN1+13 |
^PS(51 - [#51] | SCH+7, SCH+15 |
^PS(51.1 - [#51.1] | SCH+5, SCH+13 |
^PS(52.6 - [#52.6] | IVDEA+16 |
^PS(52.7 - [#52.7] | IVDEA+18 |
^PSDRUG - [#50] | EN+3, EN+4, DRG+9, DRG+11, DRG+13, DRG+15, ITEM+3, ITEM+4, EN1+8, EN1+9 , EN1+15, EN1+16, EN1+17, EN1+18, IVDEA+12, IVDEA+13, IVX+1 |
^PSDRUG("A526" | IVDEA+15 |
^PSDRUG("A527" | IVDEA+17 |
^PSDRUG("ASP" | DRG+8, EN1+7, EN1+14, IVDEA+11 |
Name | Line Occurrences |
---|---|
IVQ | IVDEA+10 |
IVX | IVDEA+16, IVDEA+18 |
SCHQT | SCH+3, SCH+6, SCH+7, SCH+9 |
Name | Field # of Occurrence |
---|---|
^( | SCH+7, SCH+15 |
^("DOS" | EN+3 |
^("I" | EN1+15, IVDEA+12, IVDEA+16, IVDEA+18 |
^("ND" | EN+4 |
^(0 | EN1+13, SCH+5, SCH+13 |
^(2 | DRG+9, EN1+18, IVDEA+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DT | DRG+10, EN1+13, EN1+15, IVDEA+12, IVDEA+16, IVDEA+18 |
PSSAP | DRG+5~, DRG+9*, DRG+13, DRG+14 |
PSSDD | DRG~ |
PSSDD( | DRG+13*, DRG+15* |
PSSDR | ITEM~, ITEM+2, ITEM+3, ITEM+4 |
PSSDRIEN | EN~, EN+2, EN+3, EN+4 |
PSSIN | DRG+5~, DRG+9*, DRG+10 |
PSSIT | ITEM~, ITEM+2, ITEM+3, ITEM+5, ITEM+6 |
PSSIVDD | IVDEA+7~, IVDEA+8*, IVDEA+16*, IVDEA+18*, IVQ+1 |
PSSIVDEA | IVDEA+7~, IVX+1*, IVX+2, IVX+3 |
PSSIVDO | IVDEA+7~, IVDEA+8*, IVDEA+11, IVDEA+15, IVDEA+17, IVQ+1*, IVQ+2, IVX+2*, IVX+3* |
PSSIVL | IVDEA+7~, IVDEA+11*, IVDEA+12, IVDEA+13, IVDEA+15, IVDEA+17, IVX+1 |
PSSIVLP | IVDEA+7~, IVDEA+15*, IVDEA+16, IVDEA+17*, IVDEA+18 |
PSSIVLPX | IVDEA+7~, IVDEA+15*, IVDEA+16*, IVDEA+17*, IVDEA+18* |
PSSIVOI | IVDEA~, IVDEA+10, IVDEA+11 |
PSSIVOIP | IVDEA~, IVDEA+9*, IVDEA+14 |
PSSL | DRG+5~, DRG+8*, DRG+9, DRG+11, DRG+13, DRG+15 |
PSSMA | EN+1~, EN+10*, EN+12 |
PSSMA1 | EN+1~, EN+10* |
PSSMASH | EN+1~, EN+7*, EN+8*, EN+9 |
PSSMASH2 | EN+1~, EN+11* |
PSSMASH3 | EN+1~, EN+11*, EN+12 |
PSSMB | EN+1~, EN+10*, EN+12 |
PSSMB1 | EN+1~, EN+10*, EN+11, EN+12 |
PSSMNDFS | EN+1~, EN+4*, EN+6, EN+8, EN+11, EN+13 |
PSSMSSTR | EN+1~, EN+3*, EN+6, EN+8, EN+9, EN+11, EN+13 |
PSSMUNIT | EN+1~, EN+3*, EN+4*, EN+5, EN+6, EN+9 |
PSSNAT1 | EN+1~, EN+4* |
PSSNAT3 | EN+1~, EN+4* |
PSSND | DRG+5~, DRG+11*, DRG+13, DRG+15 |
PSSNEW | ITEM+1~, ITEM+4*, ITEM+5, ITEM+6 |
PSSNODEU | EN+1~, EN+4* |
PSSOA | EN1~, EN1+4, EN1+7, EN1+10 |
PSSOA( | EN1+11, EN1+14, EN1+17*, EN1+18* |
PSSOADT | EN1+6~ |
PSSOAIT | EN1+6~, EN1+9*, EN1+10, EN1+11, EN1+12, EN1+13, EN1+14, EN1+17, EN1+18 |
PSSOAL | EN1+6~, EN1+7*, EN1+8, EN1+9 |
PSSOALD | EN1+6~, EN1+8*, EN1+9 |
PSSOAN | EN1+6~, EN1+9* |
PSSOAP | EN1~, EN1+5, EN1+17 |
PSSOAZ | EN1+6~, EN1+14*, EN1+15, EN1+16, EN1+17, EN1+18 |
PSSOI | DRG~, DRG+6, DRG+8 |
PSSPK | DRG~, DRG+7, DRG+12, DRG+13 |
PSSUNX | EN+1~, EN+12*, EN+13 |
PSSUNZ | EN+1~, EN+5*, EN+6, EN+9, EN+10 |
SCH | SCH~, SCH+2, SCH+3, SCH+5, SCH+7, SCH+8, SCH+9, SCH+11, SCHQT+1* |
SCHEX | SCH+1~, SCH+2*, SCH+5*, SCH+7*, SCH+9*, SCH+16*, SCHQT+1 |
SCIN | SCH+1~, SCH+11*, SCH+13, SCH+15 |
SCLHOLD | SCH+1~, SCH+11! |
SCLHOLD( | SCH+11*, SCH+13*, SCH+15*, SCH+16 |
SCLOOP | SCH+1~, SCH+5*, SCH+8*, SCH+9, SCH+10*, SCH+11, SCH+16 |
SCLP | SCH+1~, SCH+8* |
SCLPS | SCH+1~, SCH+8* |
SODL | SCH+1~, SCH+11*, SCH+12, SCH+13, SCH+15 |
SQFLAG | SCH+1~, SCH+2*, SCH+5*, SCH+6, SCH+13*, SCH+14, SCH+16* |
SST | SCH+1~, SCH+13*, SCH+16* |