PSOERUT5 ;ALB/MFR - eRx & Pending Order Side-by-Side LM Display; 06/25/2023 5:14pm
Source file <PSOERUT5.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 11 | ($$RXFLDT,$$RXRLDT)^PSOBPSUT ($$SUGFLDT,WRAP)^PSOERUT ($$CLNSTR,$$COMPARE,ADDLINE,BLANKLN,RESET,SETPAT)^PSOERUT0 SETPROV^PSOERUT1 ALLERGY^PSOERUT3 ($$PROVCOMM,$$VASIG,PENFLAG,PODOSAGE)^PSOERUT4 ($$LASTRXST,EN)^PSOERUT6 $$CS^PSOERXA0 $$CHVAELIG^PSOERXU9 ($$ERXIEN,$$ERXSIG,$$RENEWALS)^PSOERXUT DIN^PSONFI |
Kernel | 2 | $$FMTE^XLFDT $$UP^XLFSTR |
VA FileMan | 2 | ($$GET1,GETS)^DIQ ^DIWP |
List Manager | 1 | INSTR^VALM1 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Outpatient Pharmacy | 6 | PSO LM ACCEPT PSO LM RENEW MENU PSO PENDING ORDER MENU PSOORFI1 PSOORNE4 PSOORNEW |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
HDR(SCREEN) | ; Pending Order Header (Invoked from PSO LM PENDING ORDER MENU protocol, HEADER field)
|
|
SETPEN(NMSPC,ERXIEN,ORDIEN,PENDATA,DRUGDATA,VASIG,RENEWORD,LASTRX) | ; Set ListMan Side-By-Side Section for eRx Vs. Pending Order
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | HDR+7, HDR+8, HDR+9, HDR+12, HDR+13, SETPEN+26, SETPEN+34, SETPEN+35, SETPEN+38, SETPEN+45 , SETPEN+50, SETPEN+51, SETPEN+52, SETPEN+63, SETPEN+70, SETPEN+71, SETPEN+75, SETPEN+76, SETPEN+77, SETPEN+96 , SETPEN+97, SETPEN+119, SETPEN+189, SETPEN+196, SETPEN+213, SETPEN+229, SETPEN+243, SETPEN+259, SETPEN+275 |
GETS^DIQ | SETPEN+58 |
^DIWP | SETPEN+40 |
$$RXFLDT^PSOBPSUT | SETPEN+212 |
$$RXRLDT^PSOBPSUT | SETPEN+212 |
$$SUGFLDT^PSOERUT | SETPEN+207 |
WRAP^PSOERUT | SETPEN+127, SETPEN+140, SETPEN+148, SETPEN+161, SETPEN+167, SETPEN+250 |
$$CLNSTR^PSOERUT0 | SETPEN+112 |
$$COMPARE^PSOERUT0 | SETPEN+29, SETPEN+42, SETPEN+91, SETPEN+93, SETPEN+95, SETPEN+99, SETPEN+110, SETPEN+115, SETPEN+116, SETPEN+123 , SETPEN+131, SETPEN+133, SETPEN+151, SETPEN+152, SETPEN+172, SETPEN+173, SETPEN+176, SETPEN+179, SETPEN+182, SETPEN+185 , SETPEN+190, SETPEN+195, SETPEN+199, SETPEN+203, SETPEN+208, SETPEN+214, SETPEN+220, SETPEN+221, SETPEN+228, SETPEN+231 , SETPEN+235, SETPEN+246, SETPEN+261, SETPEN+262, SETPEN+269, SETPEN+276 |
ADDLINE^PSOERUT0 | SETPEN+29, SETPEN+39, SETPEN+42, SETPEN+87, SETPEN+103, SETPEN+136, SETPEN+149, SETPEN+153, SETPEN+169, SETPEN+174 , SETPEN+177, SETPEN+180, SETPEN+183, SETPEN+186, SETPEN+192, SETPEN+201, SETPEN+210, SETPEN+215, SETPEN+223, SETPEN+233 , SETPEN+237, SETPEN+239, SETPEN+255, SETPEN+264, SETPEN+271, SETPEN+278 |
BLANKLN^PSOERUT0 | SETPEN+43, SETPEN+74, SETPEN+104, SETPEN+137, SETPEN+154, SETPEN+158, SETPEN+187, SETPEN+193, SETPEN+216, SETPEN+224 , SETPEN+256, SETPEN+265, SETPEN+272, SETPEN+279 |
RESET^PSOERUT0 | SETPEN+23 |
SETPAT^PSOERUT0 | SETPEN+34 |
SETPROV^PSOERUT1 | SETPEN+48 |
ALLERGY^PSOERUT3 | SETPEN+45 |
$$PROVCOMM^PSOERUT4 | SETPEN+166 |
$$VASIG^PSOERUT4 | SETPEN+147 |
PENFLAG^PSOERUT4 | SETPEN+32 |
PODOSAGE^PSOERUT4 | SETPEN+157 |
$$LASTRXST^PSOERUT6 | SETPEN+213 |
EN^PSOERUT6 | SETPEN+282 |
$$CS^PSOERXA0 | SETPEN+26 |
$$CHVAELIG^PSOERXU9 | HDR+10 |
$$ERXIEN^PSOERXUT | HDR+5 |
$$ERXSIG^PSOERXUT | SETPEN+60 |
$$RENEWALS^PSOERXUT | SETPEN+66 |
DIN^PSONFI | SETPEN+92 |
INSTR^VALM1 | HDR+11, HDR+15 |
$$FMTE^XLFDT | SETPEN+81, SETPEN+198, SETPEN+208, SETPEN+213 |
$$UP^XLFSTR | SETPEN+196 |
FileNo | Call Tags |
---|---|
^SC - [#44] | GET1^DIQ |
^PSDRUG - [#50] | GET1^DIQ |
^PS(50.606 - [#50.606] | GET1^DIQ |
^PS(50.7 - [#50.7] | GET1^DIQ |
^PSRX - [#52] | GET1^DIQ |
^PS(52.41 - [#52.41] | GET1^DIQ |
^PS(52.45 - [#52.45] | GET1^DIQ |
^PS(52.49 - [#52.49] | GET1^DIQ, GETS^DIQ |
52.49311 | GET1^DIQ |
^PS(53 - [#53] | GET1^DIQ |
^PS(55 - [#55] | GET1^DIQ |
^PS(59.7 - [#59.7] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(52.41 - [#52.41] | SETPEN+163, SETPEN+164 |
^PS(52.49 - [#52.49] | SETPEN+54, SETPEN+55, SETPEN+56 |
^PS(55 - [#55] | SETPEN+181 |
^PSDRUG("AQ" | SETPEN+109 |
^UTILITY($J | SETPEN+40!, SETPEN+41, SETPEN+42 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACCDTBY | SETPEN+20~ |
AMATCH | SETPEN+20~, SETPEN+75*, SETPEN+80 |
ARR | SETPEN+20~ |
>> BLINKLN( | SETPEN+86* |
CMOPDRUG | SETPEN+20~, SETPEN+109*, SETPEN+110 |
COPIES | SETPEN+20~ |
DATA | SETPEN+17~, SETPEN+58 |
DATA( | SETPEN+59 |
DFN | HDR+2~, HDR+8*, HDR+9*, HDR+10, SETPEN+37, SETPEN+38, SETPEN+181 |
>> DIWF | SETPEN+40* |
>> DIWL | SETPEN+40* |
>> DIWR | SETPEN+40* |
DMARR | SETPEN+19~, SETPEN+127!, SETPEN+250! |
DMARR( | SETPEN+128, SETPEN+133, SETPEN+251, SETPEN+252 |
DRUGDATA | SETPEN~ |
DRUGDATA("IEN" | SETPEN+70 |
DRUGDATA("NAME" | SETPEN+71 |
DRUGDATA("OI" | SETPEN+70 |
EARR | SETPEN+20~, SETPEN+90!, SETPEN+107!, SETPEN+140!, SETPEN+161!, SETPEN+241! |
EARR( | SETPEN+91*, SETPEN+95*, SETPEN+102, SETPEN+103, SETPEN+108*, SETPEN+115*, SETPEN+123*, SETPEN+131*, SETPEN+135, SETPEN+136 , SETPEN+150, SETPEN+151, SETPEN+170, SETPEN+171, SETPEN+172, SETPEN+173, SETPEN+246*, SETPEN+254, SETPEN+255 |
EQCOMM | SETPEN+20~, SETPEN+166*, SETPEN+172, SETPEN+173 |
EQDRUG | SETPEN+18~, SETPEN+112*, SETPEN+115, SETPEN+116 |
ERXDAYS | SETPEN+17~, SETPEN+61*, SETPEN+220, SETPEN+221 |
ERXDFORM | SETPEN+19~, SETPEN+67*, SETPEN+120, SETPEN+122, SETPEN+123, SETPEN+124*, SETPEN+128, SETPEN+130, SETPEN+131, SETPEN+132* |
ERXDM | SETPEN+17~, SETPEN+59* |
ERXDM( | SETPEN+60, SETPEN+61, SETPEN+63, SETPEN+65, SETPEN+66 |
ERXDM(41 | SETPEN+67 |
ERXDM(42 | SETPEN+67 |
ERXDM(43 | SETPEN+67 |
ERXDM(8 | SETPEN+61 |
ERXDRUG | SETPEN+17~, SETPEN+60*, SETPEN+112, SETPEN+113, SETPEN+115, SETPEN+117* |
ERXDSTRE | SETPEN+19~, SETPEN+67* |
ERXEFDT | SETPEN+17~, SETPEN+61*, SETPEN+203 |
ERXIEN | HDR+2~, HDR+5*, HDR+8, HDR+12, HDR+13, SETPEN~, SETPEN+26, SETPEN+34, SETPEN+45, SETPEN+48 , SETPEN+50, SETPEN+51, SETPEN+52, SETPEN+54, SETPEN+55, SETPEN+56, SETPEN+58, SETPEN+59, SETPEN+60, SETPEN+63 , SETPEN+66, SETPEN+70, SETPEN+75, SETPEN+76, SETPEN+77 |
ERXNOTES | SETPEN+17~, SETPEN+61*, SETPEN+161, SETPEN+166 |
ERXPRVNM | SETPEN+19~, SETPEN+60* |
ERXQTY | SETPEN+17~, SETPEN+61*, SETPEN+228, SETPEN+231 |
ERXQTYQ | SETPEN+17~, SETPEN+63*, SETPEN+244, SETPEN+246 |
ERXQTYUM | SETPEN+17~, SETPEN+67*, SETPEN+235, SETPEN+238, SETPEN+239 |
ERXREFS | SETPEN+17~, SETPEN+65*, SETPEN+260*, SETPEN+261, SETPEN+262 |
ERXRENS | SETPEN+18~, SETPEN+66*, SETPEN+95 |
ERXSIG | SETPEN+17~, SETPEN+60*, SETPEN+140 |
ERXSTS | HDR+2~, HDR+12* |
ERXSUBS | SETPEN+19~, SETPEN+66*, SETPEN+91 |
ERXWRTDT | SETPEN+17~, SETPEN+61*, SETPEN+195 |
ESIG | SETPEN+18~ |
EXTISSDT | SETPEN+20~, SETPEN+196*, SETPEN+198*, SETPEN+199 |
HDR | HDR+13*, HDR+14*, HDR+15*, SETPEN+20~, SETPEN+84*, SETPEN+86, SETPEN+87 |
>> HIGUNDLN( | SETPEN+252* |
I | SETPEN+19~, SETPEN+41*, SETPEN+42, SETPEN+69~, SETPEN+98*, SETPEN+102*, SETPEN+103, SETPEN+113*, SETPEN+128*, SETPEN+133 , SETPEN+135*, SETPEN+136, SETPEN+144*, SETPEN+145, SETPEN+146, SETPEN+150*, SETPEN+151, SETPEN+152, SETPEN+163*, SETPEN+164 , SETPEN+170*, SETPEN+171, SETPEN+172, SETPEN+173, SETPEN+251*, SETPEN+252, SETPEN+254*, SETPEN+255 |
>> IOBOFF | HDR+11 |
>> IOBON | HDR+11 |
>> IOINORM | HDR+15 |
>> IORVOFF | HDR+15 |
>> IORVON | HDR+15 |
>> IOUON | HDR+15 |
LASTRX | SETPEN~, SETPEN+211, SETPEN+212, SETPEN+213 |
>> LINE | SETPEN+16*, SETPEN+86, SETPEN+90, SETPEN+107, SETPEN+191, SETPEN+200, SETPEN+209, SETPEN+222, SETPEN+232, SETPEN+241 , SETPEN+263, SETPEN+270, SETPEN+277 |
LMLINE | SETPEN+19~, SETPEN+90*, SETPEN+91*, SETPEN+93, SETPEN+94, SETPEN+95*, SETPEN+99, SETPEN+100*, SETPEN+104!, SETPEN+107* , SETPEN+108*, SETPEN+110, SETPEN+111, SETPEN+114*, SETPEN+115, SETPEN+116, SETPEN+121*, SETPEN+123, SETPEN+129*, SETPEN+131 , SETPEN+133, SETPEN+137!, SETPEN+158!, SETPEN+241*, SETPEN+245*, SETPEN+246, SETPEN+252*, SETPEN+256! |
MATCH | SETPEN+20~, SETPEN+78*, SETPEN+80*, SETPEN+81*, SETPEN+82*, SETPEN+83*, SETPEN+84, SETPEN+85* |
MEDIEN | SETPEN+19~, SETPEN+54*, SETPEN+55*, SETPEN+56*, SETPEN+63 |
MTYPE | SETPEN+17~, SETPEN+51*, SETPEN+54, SETPEN+55, SETPEN+56, SETPEN+65 |
>> NFID | SETPEN+110 |
>> NFIO | SETPEN+93 |
NMSPC | SETPEN~, SETPEN+16*, SETPEN+29, SETPEN+32, SETPEN+34, SETPEN+39, SETPEN+42, SETPEN+45, SETPEN+48, SETPEN+87 , SETPEN+103, SETPEN+136, SETPEN+149, SETPEN+153, SETPEN+157, SETPEN+169, SETPEN+174, SETPEN+177, SETPEN+180, SETPEN+183 , SETPEN+186, SETPEN+192, SETPEN+201, SETPEN+210, SETPEN+215, SETPEN+223, SETPEN+233, SETPEN+237, SETPEN+239, SETPEN+255 , SETPEN+264, SETPEN+271, SETPEN+278 |
NONFORM | SETPEN+19~ |
OIFORM | SETPEN+69~, SETPEN+96*, SETPEN+97 |
OINAME | SETPEN+69~, SETPEN+96*, SETPEN+97*, SETPEN+98, SETPEN+99, SETPEN+100* |
>> ORD | HDR+5, HDR+9 |
ORDIEN | SETPEN~, SETPEN+32, SETPEN+34, SETPEN+35, SETPEN+45, SETPEN+147, SETPEN+157, SETPEN+163, SETPEN+164, SETPEN+196 , SETPEN+207, SETPEN+259, SETPEN+275 |
PATSTS | SETPEN+20~, SETPEN+189*, SETPEN+190 |
PENDATA | SETPEN~, SETPEN+157 |
PENDATA("# OF | REFILLS" , SETPEN+259 |
PENDATA("CLINIC" | SETPEN+275 |
PENDATA("DAYS | SUPPLY" , SETPEN+219 |
PENDATA("FILL | DATE" , SETPEN+204, SETPEN+205 |
PENDATA("IND" | SETPEN+175, SETPEN+176, SETPEN+178, SETPEN+179 |
PENDATA("INDO" | SETPEN+181, SETPEN+182, SETPEN+184, SETPEN+185 |
PENDATA("ISSU | E DATE" , SETPEN+196, SETPEN+198 |
PENDATA("PATI | ENT STATUS" , SETPEN+189 |
PENDATA("PROVIDER" | SETPEN+35 |
PRFLDT | SETPEN+212~*, SETPEN+213 |
PRVIEN | SETPEN+19~, SETPEN+35*, SETPEN+48 |
>> PSONEW("MAIL/WINDOW" | SETPEN+268 |
>> PSONEW("QTY" | SETPEN+227 |
>> PSORXIEN | HDR+4 |
RENEWORD | SETPEN~, SETPEN+16*, SETPEN+93, SETPEN+94, SETPEN+110, SETPEN+111, SETPEN+157, SETPEN+189, SETPEN+190, SETPEN+191 , SETPEN+199, SETPEN+208, SETPEN+221, SETPEN+222, SETPEN+230, SETPEN+231, SETPEN+232, SETPEN+260, SETPEN+261, SETPEN+262 , SETPEN+263, SETPEN+269, SETPEN+270, SETPEN+276, SETPEN+277 |
RESP | HDR+2~, HDR+7*, HDR+12*, HDR+13 |
RSPTYPE | SETPEN+17~, SETPEN+52*, SETPEN+56, SETPEN+65 |
SCREEN | HDR~, HDR+15 |
SIG | SETPEN+18~, SETPEN+142*, SETPEN+145*, SETPEN+146*, SETPEN+147*, SETPEN+148 |
>> UNDERLN( | SETPEN+86*, SETPEN+94*, SETPEN+111*, SETPEN+191*, SETPEN+200*, SETPEN+209*, SETPEN+222*, SETPEN+232*, SETPEN+263*, SETPEN+270* , SETPEN+277* |
V2017 | SETPEN+17~, SETPEN+50*, SETPEN+53, SETPEN+63 |
VACLINIC | SETPEN+19~, SETPEN+275*, SETPEN+276 |
VADAYS | SETPEN+18~, SETPEN+219*, SETPEN+220, SETPEN+221 |
VADRGIEN | SETPEN+20~, SETPEN+70*, SETPEN+71, SETPEN+80, SETPEN+92, SETPEN+109, SETPEN+119, SETPEN+229, SETPEN+243 |
VADRGMSG | SETPEN+18~, SETPEN+69~, SETPEN+119*, SETPEN+120, SETPEN+125, SETPEN+127 |
VADRUG | SETPEN+18~, SETPEN+69~, SETPEN+71*, SETPEN+112, SETPEN+113, SETPEN+116, SETPEN+117* |
VAFILLDT | SETPEN+21~, SETPEN+205*, SETPEN+207*, SETPEN+208 |
VALDTTM | SETPEN+20~, SETPEN+76*, SETPEN+77, SETPEN+81 |
VALUSER | SETPEN+20~, SETPEN+76*, SETPEN+81 |
VAOIIEN | SETPEN+18~, SETPEN+70*, SETPEN+92, SETPEN+96 |
VAPATIEN | SETPEN+18~ |
VAPATINS | SETPEN+18~ |
VAPATSTS | SETPEN+19~ |
VAPRCOMM | SETPEN+18~, SETPEN+162*, SETPEN+164*, SETPEN+165*, SETPEN+166, SETPEN+167 |
VAQTDMSG | SETPEN+20~, SETPEN+243*, SETPEN+244, SETPEN+248, SETPEN+250 |
VAQTY | SETPEN+18~, SETPEN+227*, SETPEN+228, SETPEN+231 |
VAQTYUM | SETPEN+18~, SETPEN+229*, SETPEN+230, SETPEN+231 |
VAREFS | SETPEN+18~, SETPEN+259*, SETPEN+261, SETPEN+262 |
VARR | SETPEN+20~, SETPEN+90!, SETPEN+107!, SETPEN+148!, SETPEN+167!, SETPEN+241! |
VARR( | SETPEN+93*, SETPEN+99*, SETPEN+102, SETPEN+103, SETPEN+110*, SETPEN+116*, SETPEN+126*, SETPEN+133*, SETPEN+135, SETPEN+136 , SETPEN+150, SETPEN+152, SETPEN+170, SETPEN+171, SETPEN+172, SETPEN+173, SETPEN+249*, SETPEN+252*, SETPEN+254, SETPEN+255 |
VASIG | SETPEN~ |
VASIG( | SETPEN+144, SETPEN+145, SETPEN+146 |
VASIG(0 | SETPEN+143 |
VDRGLEN | SETPEN+19~ |
VMAILWIN | SETPEN+19~, SETPEN+268*, SETPEN+269 |
VSIG | SETPEN+18~ |
>> X | SETPEN+38*, SETPEN+213*, SETPEN+214 |
XE | SETPEN+18~, SETPEN+28*, SETPEN+29, SETPEN+149*, SETPEN+151*, SETPEN+153, SETPEN+168*, SETPEN+169, SETPEN+172*, SETPEN+174 , SETPEN+176*, SETPEN+177, SETPEN+179*, SETPEN+180, SETPEN+182*, SETPEN+183, SETPEN+185*, SETPEN+186, SETPEN+195*, SETPEN+201 , SETPEN+203*, SETPEN+210, SETPEN+220*, SETPEN+223, SETPEN+228*, SETPEN+233, SETPEN+235*, SETPEN+237, SETPEN+239*, SETPEN+261* , SETPEN+264 |
XEI | SETPEN+19~, SETPEN+90*, SETPEN+91*, SETPEN+95*, SETPEN+107*, SETPEN+108*, SETPEN+115*, SETPEN+123*, SETPEN+131*, SETPEN+241* , SETPEN+246* |
XV | SETPEN+18~, SETPEN+39*, SETPEN+42*, SETPEN+149*, SETPEN+152*, SETPEN+153, SETPEN+168*, SETPEN+169, SETPEN+173*, SETPEN+174 , SETPEN+176*, SETPEN+177, SETPEN+179*, SETPEN+180, SETPEN+182*, SETPEN+183, SETPEN+185*, SETPEN+186, SETPEN+190*, SETPEN+192 , SETPEN+199*, SETPEN+201, SETPEN+208*, SETPEN+210, SETPEN+214*, SETPEN+215, SETPEN+221*, SETPEN+223, SETPEN+230*, SETPEN+231* , SETPEN+233, SETPEN+236*, SETPEN+237, SETPEN+239*, SETPEN+262*, SETPEN+264, SETPEN+269*, SETPEN+271, SETPEN+276*, SETPEN+278 |
XVI | SETPEN+19~, SETPEN+90*, SETPEN+93*, SETPEN+99*, SETPEN+107*, SETPEN+110*, SETPEN+116*, SETPEN+126*, SETPEN+133*, SETPEN+241* , SETPEN+249*, SETPEN+252* |
XX | SETPEN+20~, SETPEN+27*, SETPEN+28 |