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+177, SETPEN+184, SETPEN+201, SETPEN+217, SETPEN+231, SETPEN+247, SETPEN+263 |
| GETS^DIQ | SETPEN+58 |
| ^DIWP | SETPEN+40 |
| $$RXFLDT^PSOBPSUT | SETPEN+200 |
| $$RXRLDT^PSOBPSUT | SETPEN+200 |
| $$SUGFLDT^PSOERUT | SETPEN+195 |
| WRAP^PSOERUT | SETPEN+127, SETPEN+140, SETPEN+148, SETPEN+161, SETPEN+167, SETPEN+238 |
| $$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+178, SETPEN+183, SETPEN+187, SETPEN+191 , SETPEN+196, SETPEN+202, SETPEN+208, SETPEN+209, SETPEN+216, SETPEN+219, SETPEN+223, SETPEN+234, SETPEN+249, SETPEN+250 , SETPEN+257, SETPEN+264 |
| ADDLINE^PSOERUT0 | SETPEN+29, SETPEN+39, SETPEN+42, SETPEN+87, SETPEN+103, SETPEN+136, SETPEN+149, SETPEN+153, SETPEN+169, SETPEN+174 , SETPEN+180, SETPEN+189, SETPEN+198, SETPEN+203, SETPEN+211, SETPEN+221, SETPEN+225, SETPEN+227, SETPEN+243, SETPEN+252 , SETPEN+259, SETPEN+266 |
| BLANKLN^PSOERUT0 | SETPEN+43, SETPEN+74, SETPEN+104, SETPEN+137, SETPEN+154, SETPEN+158, SETPEN+175, SETPEN+181, SETPEN+204, SETPEN+212 , SETPEN+244, SETPEN+253, SETPEN+260, SETPEN+267 |
| 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+201 |
| EN^PSOERUT6 | SETPEN+270 |
| $$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+186, SETPEN+196, SETPEN+201 |
| $$UP^XLFSTR | SETPEN+184 |
| 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 |
| ^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 |
| >> DIWF | SETPEN+40* |
| >> DIWL | SETPEN+40* |
| >> DIWR | SETPEN+40* |
| DMARR | SETPEN+19~, SETPEN+127!, SETPEN+238! |
| DMARR( | SETPEN+128, SETPEN+133, SETPEN+239, SETPEN+240 |
| 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+229! |
| 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+234*, SETPEN+242, SETPEN+243 |
| EQCOMM | SETPEN+20~, SETPEN+166*, SETPEN+172, SETPEN+173 |
| EQDRUG | SETPEN+18~, SETPEN+112*, SETPEN+115, SETPEN+116 |
| ERXDAYS | SETPEN+17~, SETPEN+61*, SETPEN+208, SETPEN+209 |
| 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+191 |
| 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+216, SETPEN+219 |
| ERXQTYQ | SETPEN+17~, SETPEN+63*, SETPEN+232, SETPEN+234 |
| ERXQTYUM | SETPEN+17~, SETPEN+67*, SETPEN+223, SETPEN+226, SETPEN+227 |
| ERXREFS | SETPEN+17~, SETPEN+65*, SETPEN+248*, SETPEN+249, SETPEN+250 |
| 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+183 |
| ESIG | SETPEN+18~ |
| EXTISSDT | SETPEN+20~, SETPEN+184*, SETPEN+186*, SETPEN+187 |
| HDR | HDR+13*, HDR+14*, HDR+15*, SETPEN+20~, SETPEN+84*, SETPEN+86, SETPEN+87 |
| >> HIGUNDLN( | SETPEN+240* |
| 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+239*, SETPEN+240, SETPEN+242*, SETPEN+243 |
| >> IOBOFF | HDR+11 |
| >> IOBON | HDR+11 |
| >> IOINORM | HDR+15 |
| >> IORVOFF | HDR+15 |
| >> IORVON | HDR+15 |
| >> IOUON | HDR+15 |
| LASTRX | SETPEN~, SETPEN+199, SETPEN+200, SETPEN+201 |
| >> LINE | SETPEN+16*, SETPEN+86, SETPEN+90, SETPEN+107, SETPEN+179, SETPEN+188, SETPEN+197, SETPEN+210, SETPEN+220, SETPEN+229 , SETPEN+251, SETPEN+258, SETPEN+265 |
| 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+229*, SETPEN+233*, SETPEN+234, SETPEN+240*, SETPEN+244! |
| 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+180, SETPEN+189, SETPEN+198 , SETPEN+203, SETPEN+211, SETPEN+221, SETPEN+225, SETPEN+227, SETPEN+243, SETPEN+252, SETPEN+259, SETPEN+266 |
| 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+184 , SETPEN+195, SETPEN+247, SETPEN+263 |
| PATSTS | SETPEN+20~, SETPEN+177*, SETPEN+178 |
| PENDATA | SETPEN~, SETPEN+157 |
| PENDATA("# OF | REFILLS" , SETPEN+247 |
| PENDATA("CLINIC" | SETPEN+263 |
| PENDATA("DAYS | SUPPLY" , SETPEN+207 |
| PENDATA("FILL | DATE" , SETPEN+192, SETPEN+193 |
| PENDATA("ISSU | E DATE" , SETPEN+184, SETPEN+186 |
| PENDATA("PATI | ENT STATUS" , SETPEN+177 |
| PENDATA("PROVIDER" | SETPEN+35 |
| PRFLDT | SETPEN+200~*, SETPEN+201 |
| PRVIEN | SETPEN+19~, SETPEN+35*, SETPEN+48 |
| >> PSONEW("MAIL/WINDOW" | SETPEN+256 |
| >> PSONEW("QTY" | SETPEN+215 |
| >> PSORXIEN | HDR+4 |
| RENEWORD | SETPEN~, SETPEN+16*, SETPEN+93, SETPEN+94, SETPEN+110, SETPEN+111, SETPEN+157, SETPEN+177, SETPEN+178, SETPEN+179 , SETPEN+187, SETPEN+196, SETPEN+209, SETPEN+210, SETPEN+218, SETPEN+219, SETPEN+220, SETPEN+248, SETPEN+249, SETPEN+250 , SETPEN+251, SETPEN+257, SETPEN+258, SETPEN+264, SETPEN+265 |
| 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+179*, SETPEN+188*, SETPEN+197*, SETPEN+210*, SETPEN+220*, SETPEN+251*, SETPEN+258* , SETPEN+265* |
| V2017 | SETPEN+17~, SETPEN+50*, SETPEN+53, SETPEN+63 |
| VACLINIC | SETPEN+19~, SETPEN+263*, SETPEN+264 |
| VADAYS | SETPEN+18~, SETPEN+207*, SETPEN+208, SETPEN+209 |
| VADRGIEN | SETPEN+20~, SETPEN+70*, SETPEN+71, SETPEN+80, SETPEN+92, SETPEN+109, SETPEN+119, SETPEN+217, SETPEN+231 |
| 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+193*, SETPEN+195*, SETPEN+196 |
| 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+231*, SETPEN+232, SETPEN+236, SETPEN+238 |
| VAQTY | SETPEN+18~, SETPEN+215*, SETPEN+216, SETPEN+219 |
| VAQTYUM | SETPEN+18~, SETPEN+217*, SETPEN+218, SETPEN+219 |
| VAREFS | SETPEN+18~, SETPEN+247*, SETPEN+249, SETPEN+250 |
| VARR | SETPEN+20~, SETPEN+90!, SETPEN+107!, SETPEN+148!, SETPEN+167!, SETPEN+229! |
| 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+237*, SETPEN+240*, SETPEN+242, SETPEN+243 |
| VASIG | SETPEN~ |
| VASIG( | SETPEN+144, SETPEN+145, SETPEN+146 |
| VASIG(0 | SETPEN+143 |
| VDRGLEN | SETPEN+19~ |
| VMAILWIN | SETPEN+19~, SETPEN+256*, SETPEN+257 |
| VSIG | SETPEN+18~ |
| >> X | SETPEN+38*, SETPEN+201*, SETPEN+202 |
| XE | SETPEN+18~, SETPEN+28*, SETPEN+29, SETPEN+149*, SETPEN+151*, SETPEN+153, SETPEN+168*, SETPEN+169, SETPEN+172*, SETPEN+174 , SETPEN+183*, SETPEN+189, SETPEN+191*, SETPEN+198, SETPEN+208*, SETPEN+211, SETPEN+216*, SETPEN+221, SETPEN+223*, SETPEN+225 , SETPEN+227*, SETPEN+249*, SETPEN+252 |
| XEI | SETPEN+19~, SETPEN+90*, SETPEN+91*, SETPEN+95*, SETPEN+107*, SETPEN+108*, SETPEN+115*, SETPEN+123*, SETPEN+131*, SETPEN+229* , SETPEN+234* |
| XV | SETPEN+18~, SETPEN+39*, SETPEN+42*, SETPEN+149*, SETPEN+152*, SETPEN+153, SETPEN+168*, SETPEN+169, SETPEN+173*, SETPEN+174 , SETPEN+178*, SETPEN+180, SETPEN+187*, SETPEN+189, SETPEN+196*, SETPEN+198, SETPEN+202*, SETPEN+203, SETPEN+209*, SETPEN+211 , SETPEN+218*, SETPEN+219*, SETPEN+221, SETPEN+224*, SETPEN+225, SETPEN+227*, SETPEN+250*, SETPEN+252, SETPEN+257*, SETPEN+259 , SETPEN+264*, SETPEN+266 |
| XVI | SETPEN+19~, SETPEN+90*, SETPEN+93*, SETPEN+99*, SETPEN+107*, SETPEN+110*, SETPEN+116*, SETPEN+126*, SETPEN+133*, SETPEN+229* , SETPEN+237*, SETPEN+240* |
| XX | SETPEN+20~, SETPEN+27*, SETPEN+28 |