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 | 10 | WRAP^PSOERUT ($$CLNSTR,$$COMPARE,ADDLINE,BLANKLN,RESET,SETPAT)^PSOERUT0 SETPROV^PSOERUT1 ALLERGY^PSOERUT3 ($$PROVCOMM,$$VASIG,PENFLAG,PODOSAGE)^PSOERUT4 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) | ; 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+25, SETPEN+33, SETPEN+34, SETPEN+37, SETPEN+43 , SETPEN+48, SETPEN+49, SETPEN+50, SETPEN+61, SETPEN+68, SETPEN+69, SETPEN+73, SETPEN+74, SETPEN+75, SETPEN+94 , SETPEN+95, SETPEN+117, SETPEN+209, SETPEN+216, SETPEN+227, SETPEN+244, SETPEN+258, SETPEN+274, SETPEN+290 |
| GETS^DIQ | SETPEN+56 |
| ^DIWP | SETPEN+38 |
| WRAP^PSOERUT | SETPEN+125, SETPEN+138, SETPEN+146, SETPEN+165, SETPEN+174, SETPEN+180, SETPEN+187, SETPEN+265 |
| $$CLNSTR^PSOERUT0 | SETPEN+110 |
| $$COMPARE^PSOERUT0 | SETPEN+28, SETPEN+40, SETPEN+89, SETPEN+91, SETPEN+93, SETPEN+97, SETPEN+108, SETPEN+113, SETPEN+114, SETPEN+121 , SETPEN+129, SETPEN+131, SETPEN+149, SETPEN+150, SETPEN+167, SETPEN+176, SETPEN+192, SETPEN+193, SETPEN+196, SETPEN+199 , SETPEN+202, SETPEN+205, SETPEN+210, SETPEN+215, SETPEN+219, SETPEN+223, SETPEN+228, SETPEN+235, SETPEN+236, SETPEN+243 , SETPEN+246, SETPEN+250, SETPEN+261, SETPEN+276, SETPEN+277, SETPEN+284, SETPEN+291 |
| ADDLINE^PSOERUT0 | SETPEN+28, SETPEN+35, SETPEN+40, SETPEN+85, SETPEN+101, SETPEN+134, SETPEN+147, SETPEN+151, SETPEN+161, SETPEN+168 , SETPEN+171, SETPEN+177, SETPEN+189, SETPEN+194, SETPEN+197, SETPEN+200, SETPEN+203, SETPEN+206, SETPEN+212, SETPEN+221 , SETPEN+230, SETPEN+238, SETPEN+248, SETPEN+252, SETPEN+254, SETPEN+270, SETPEN+279, SETPEN+286, SETPEN+293 |
| BLANKLN^PSOERUT0 | SETPEN+41, SETPEN+72, SETPEN+102, SETPEN+135, SETPEN+152, SETPEN+156, SETPEN+178, SETPEN+207, SETPEN+213, SETPEN+231 , SETPEN+239, SETPEN+271, SETPEN+280, SETPEN+287, SETPEN+294 |
| RESET^PSOERUT0 | SETPEN+22 |
| SETPAT^PSOERUT0 | SETPEN+33 |
| SETPROV^PSOERUT1 | SETPEN+46 |
| ALLERGY^PSOERUT3 | SETPEN+43 |
| $$PROVCOMM^PSOERUT4 | SETPEN+186 |
| $$VASIG^PSOERUT4 | SETPEN+145 |
| PENFLAG^PSOERUT4 | SETPEN+31 |
| PODOSAGE^PSOERUT4 | SETPEN+155 |
| EN^PSOERUT6 | SETPEN+296 |
| $$CS^PSOERXA0 | SETPEN+25 |
| $$CHVAELIG^PSOERXU9 | HDR+10 |
| $$ERXIEN^PSOERXUT | HDR+5 |
| $$ERXSIG^PSOERXUT | SETPEN+58 |
| $$RENEWALS^PSOERXUT | SETPEN+64 |
| DIN^PSONFI | SETPEN+90 |
| INSTR^VALM1 | HDR+11, HDR+15 |
| $$FMTE^XLFDT | SETPEN+79, SETPEN+218, SETPEN+228 |
| $$UP^XLFSTR | SETPEN+162, SETPEN+172, SETPEN+216 |
| 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 |
| ^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+183, SETPEN+184 |
| ^PS(52.49 - [#52.49] | SETPEN+52, SETPEN+53, SETPEN+54 |
| ^PS(55 - [#55] | SETPEN+201 |
| ^PSDRUG("AQ" | SETPEN+107 |
| ^UTILITY($J | SETPEN+38!, SETPEN+39, SETPEN+40 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACCDTBY | SETPEN+19~ |
| AMATCH | SETPEN+19~, SETPEN+73*, SETPEN+78 |
| ARR | SETPEN+19~ |
| >> BLINKLN( | SETPEN+84* |
| CMOPDRUG | SETPEN+19~, SETPEN+107*, SETPEN+108 |
| COPIES | SETPEN+19~ |
| DATA | SETPEN+16~, SETPEN+56 |
| DATA( | SETPEN+57 |
| DFN | HDR+2~, HDR+8*, HDR+9*, HDR+10, SETPEN+36, SETPEN+37, SETPEN+201 |
| >> DIWF | SETPEN+38* |
| >> DIWL | SETPEN+38* |
| >> DIWR | SETPEN+38* |
| DMARR | SETPEN+18~, SETPEN+125!, SETPEN+265! |
| DMARR( | SETPEN+126, SETPEN+131, SETPEN+266, SETPEN+267 |
| DRUGDATA | SETPEN~ |
| DRUGDATA("IEN" | SETPEN+68 |
| DRUGDATA("NAME" | SETPEN+69 |
| DRUGDATA("OI" | SETPEN+68 |
| DT | SETPEN+227 |
| EARR | SETPEN+19~, SETPEN+88!, SETPEN+105!, SETPEN+138!, SETPEN+180!, SETPEN+256! |
| EARR( | SETPEN+89*, SETPEN+93*, SETPEN+100, SETPEN+101, SETPEN+106*, SETPEN+113*, SETPEN+121*, SETPEN+129*, SETPEN+133, SETPEN+134 , SETPEN+148, SETPEN+149, SETPEN+190, SETPEN+191, SETPEN+192, SETPEN+193, SETPEN+261*, SETPEN+269, SETPEN+270 |
| EQCOMM | SETPEN+19~, SETPEN+186*, SETPEN+192, SETPEN+193 |
| EQDRUG | SETPEN+17~, SETPEN+110*, SETPEN+113, SETPEN+114 |
| ERXDAYS | SETPEN+16~, SETPEN+59*, SETPEN+235, SETPEN+236 |
| ERXDFORM | SETPEN+18~, SETPEN+65*, SETPEN+118, SETPEN+120, SETPEN+121, SETPEN+122*, SETPEN+126, SETPEN+128, SETPEN+129, SETPEN+130* |
| ERXDM | SETPEN+16~, SETPEN+57* |
| ERXDM( | SETPEN+58, SETPEN+59, SETPEN+61, SETPEN+63, SETPEN+64 |
| ERXDM(41 | SETPEN+65 |
| ERXDM(42 | SETPEN+65 |
| ERXDM(43 | SETPEN+65 |
| ERXDM(8 | SETPEN+59 |
| ERXDRUG | SETPEN+16~, SETPEN+58*, SETPEN+110, SETPEN+111, SETPEN+113, SETPEN+115* |
| ERXDSTRE | SETPEN+18~, SETPEN+65* |
| ERXEFDT | SETPEN+16~, SETPEN+59*, SETPEN+223 |
| ERXIEN | HDR+2~, HDR+5*, HDR+8, HDR+12, HDR+13, SETPEN~, SETPEN+25, SETPEN+33, SETPEN+43, SETPEN+46 , SETPEN+48, SETPEN+49, SETPEN+50, SETPEN+52, SETPEN+53, SETPEN+54, SETPEN+56, SETPEN+57, SETPEN+58, SETPEN+61 , SETPEN+64, SETPEN+68, SETPEN+73, SETPEN+74, SETPEN+75 |
| ERXNOTES | SETPEN+16~, SETPEN+59*, SETPEN+180, SETPEN+186 |
| ERXPRVNM | SETPEN+18~, SETPEN+58* |
| ERXQTY | SETPEN+16~, SETPEN+59*, SETPEN+243, SETPEN+246 |
| ERXQTYQ | SETPEN+16~, SETPEN+61*, SETPEN+259, SETPEN+261 |
| ERXQTYUM | SETPEN+16~, SETPEN+65*, SETPEN+250, SETPEN+253, SETPEN+254 |
| ERXREFS | SETPEN+16~, SETPEN+63*, SETPEN+275*, SETPEN+276, SETPEN+277 |
| ERXRENS | SETPEN+17~, SETPEN+64*, SETPEN+93 |
| ERXSIG | SETPEN+16~, SETPEN+58*, SETPEN+138 |
| ERXSTS | HDR+2~, HDR+12* |
| ERXSUBS | SETPEN+18~, SETPEN+64*, SETPEN+89 |
| ERXWRTDT | SETPEN+16~, SETPEN+59*, SETPEN+215 |
| ESIG | SETPEN+17~ |
| EXTISSDT | SETPEN+19~, SETPEN+216*, SETPEN+218*, SETPEN+219 |
| HDR | HDR+13*, HDR+14*, HDR+15*, SETPEN+19~, SETPEN+82*, SETPEN+84, SETPEN+85 |
| >> HIGUNDLN( | SETPEN+267* |
| I | SETPEN+18~, SETPEN+39*, SETPEN+40, SETPEN+67~, SETPEN+96*, SETPEN+100*, SETPEN+101, SETPEN+111*, SETPEN+126*, SETPEN+131 , SETPEN+133*, SETPEN+134, SETPEN+142*, SETPEN+143, SETPEN+144, SETPEN+148*, SETPEN+149, SETPEN+150, SETPEN+162*, SETPEN+166* , SETPEN+167, SETPEN+172*, SETPEN+175*, SETPEN+176, SETPEN+183*, SETPEN+184, SETPEN+190*, SETPEN+191, SETPEN+192, SETPEN+193 , SETPEN+266*, SETPEN+267, SETPEN+269*, SETPEN+270 |
| >> IOBOFF | HDR+11 |
| >> IOBON | HDR+11 |
| >> IOINORM | HDR+15 |
| >> IORVOFF | HDR+15 |
| >> IORVON | HDR+15 |
| >> IOUON | HDR+15 |
| >> LINE | SETPEN+15*, SETPEN+84, SETPEN+88, SETPEN+105, SETPEN+160, SETPEN+211, SETPEN+220, SETPEN+229, SETPEN+237, SETPEN+247 , SETPEN+256, SETPEN+278, SETPEN+285, SETPEN+292 |
| LMLINE | SETPEN+18~, SETPEN+88*, SETPEN+89*, SETPEN+91, SETPEN+92, SETPEN+93*, SETPEN+97, SETPEN+98*, SETPEN+102!, SETPEN+105* , SETPEN+106*, SETPEN+108, SETPEN+109, SETPEN+112*, SETPEN+113, SETPEN+114, SETPEN+119*, SETPEN+121, SETPEN+127*, SETPEN+129 , SETPEN+131, SETPEN+135!, SETPEN+156!, SETPEN+256*, SETPEN+260*, SETPEN+261, SETPEN+267*, SETPEN+271! |
| MATCH | SETPEN+19~, SETPEN+76*, SETPEN+78*, SETPEN+79*, SETPEN+80*, SETPEN+81*, SETPEN+82, SETPEN+83* |
| MEDIEN | SETPEN+18~, SETPEN+52*, SETPEN+53*, SETPEN+54*, SETPEN+61 |
| MTYPE | SETPEN+16~, SETPEN+49*, SETPEN+52, SETPEN+53, SETPEN+54, SETPEN+63 |
| >> NFID | SETPEN+108 |
| >> NFIO | SETPEN+91 |
| NMSPC | SETPEN~, SETPEN+15*, SETPEN+28, SETPEN+31, SETPEN+33, SETPEN+35, SETPEN+40, SETPEN+43, SETPEN+46, SETPEN+85 , SETPEN+101, SETPEN+134, SETPEN+147, SETPEN+151, SETPEN+155, SETPEN+161, SETPEN+168, SETPEN+171, SETPEN+177, SETPEN+189 , SETPEN+194, SETPEN+197, SETPEN+200, SETPEN+203, SETPEN+206, SETPEN+212, SETPEN+221, SETPEN+230, SETPEN+238, SETPEN+248 , SETPEN+252, SETPEN+254, SETPEN+270, SETPEN+279, SETPEN+286, SETPEN+293 |
| NONFORM | SETPEN+18~ |
| OIFORM | SETPEN+67~, SETPEN+94*, SETPEN+95 |
| OINAME | SETPEN+67~, SETPEN+94*, SETPEN+95*, SETPEN+96, SETPEN+97, SETPEN+98* |
| >> ORD | HDR+5, HDR+9 |
| ORDIEN | SETPEN~, SETPEN+31, SETPEN+33, SETPEN+34, SETPEN+43, SETPEN+145, SETPEN+155, SETPEN+183, SETPEN+184, SETPEN+216 , SETPEN+227, SETPEN+274, SETPEN+290 |
| PATSTS | SETPEN+19~, SETPEN+209*, SETPEN+210 |
| PENDATA | SETPEN~, SETPEN+155 |
| PENDATA("# OF | REFILLS" , SETPEN+274 |
| PENDATA("CLINIC" | SETPEN+290 |
| PENDATA("DAYS | SUPPLY" , SETPEN+234 |
| PENDATA("FILL | DATE" , SETPEN+224, SETPEN+225 |
| PENDATA("IND" | SETPEN+195, SETPEN+196, SETPEN+198, SETPEN+199 |
| PENDATA("INDO" | SETPEN+201, SETPEN+202, SETPEN+204, SETPEN+205 |
| PENDATA("ISSU | E DATE" , SETPEN+216, SETPEN+218 |
| PENDATA("PATI | ENT STATUS" , SETPEN+209 |
| PENDATA("PROVIDER" | SETPEN+34 |
| PENDATA("SIG" | SETPEN+162 |
| PENDATA("SINS" | SETPEN+169, SETPEN+172 |
| PRVIEN | SETPEN+18~, SETPEN+34*, SETPEN+46 |
| >> PSONEW("MAIL/WINDOW" | SETPEN+283 |
| >> PSONEW("QTY" | SETPEN+242 |
| >> PSORXIEN | HDR+4 |
| RENEWORD | SETPEN~, SETPEN+15*, SETPEN+91, SETPEN+92, SETPEN+108, SETPEN+109, SETPEN+155, SETPEN+159, SETPEN+160, SETPEN+209 , SETPEN+210, SETPEN+211, SETPEN+219, SETPEN+228, SETPEN+236, SETPEN+237, SETPEN+245, SETPEN+246, SETPEN+247, SETPEN+275 , SETPEN+276, SETPEN+277, SETPEN+278, SETPEN+284, SETPEN+285, SETPEN+291, SETPEN+292 |
| RESP | HDR+2~, HDR+7*, HDR+12*, HDR+13 |
| RSPTYPE | SETPEN+16~, SETPEN+50*, SETPEN+54, SETPEN+63 |
| SCREEN | HDR~, HDR+15 |
| SIG | SETPEN+17~, SETPEN+140*, SETPEN+143*, SETPEN+144*, SETPEN+145*, SETPEN+146 |
| >> UNDERLN( | SETPEN+84*, SETPEN+92*, SETPEN+109*, SETPEN+160*, SETPEN+211*, SETPEN+220*, SETPEN+229*, SETPEN+237*, SETPEN+247*, SETPEN+278* , SETPEN+285*, SETPEN+292* |
| V2017 | SETPEN+16~, SETPEN+48*, SETPEN+51, SETPEN+61 |
| VACLINIC | SETPEN+18~, SETPEN+290*, SETPEN+291 |
| VADAYS | SETPEN+17~, SETPEN+234*, SETPEN+235, SETPEN+236 |
| VADRGIEN | SETPEN+19~, SETPEN+68*, SETPEN+69, SETPEN+78, SETPEN+90, SETPEN+107, SETPEN+117, SETPEN+244, SETPEN+258 |
| VADRGMSG | SETPEN+17~, SETPEN+67~, SETPEN+117*, SETPEN+118, SETPEN+123, SETPEN+125 |
| VADRUG | SETPEN+17~, SETPEN+67~, SETPEN+69*, SETPEN+110, SETPEN+111, SETPEN+114, SETPEN+115* |
| VAFILLDT | SETPEN+20~, SETPEN+225*, SETPEN+227*, SETPEN+228 |
| VALDTTM | SETPEN+19~, SETPEN+74*, SETPEN+75, SETPEN+79 |
| VALUSER | SETPEN+19~, SETPEN+74*, SETPEN+79 |
| VAOIIEN | SETPEN+17~, SETPEN+68*, SETPEN+90, SETPEN+94 |
| >> VAOTHINS | SETPEN+172*, SETPEN+173*, SETPEN+174 |
| VAPATIEN | SETPEN+17~ |
| VAPATINS | SETPEN+17~, SETPEN+162*, SETPEN+163*, SETPEN+164, SETPEN+165 |
| VAPATSTS | SETPEN+18~ |
| VAPRCOMM | SETPEN+17~, SETPEN+182*, SETPEN+184*, SETPEN+185*, SETPEN+186, SETPEN+187 |
| VAQTDMSG | SETPEN+19~, SETPEN+258*, SETPEN+259, SETPEN+263, SETPEN+265 |
| VAQTY | SETPEN+17~, SETPEN+242*, SETPEN+243, SETPEN+246 |
| VAQTYUM | SETPEN+17~, SETPEN+244*, SETPEN+245, SETPEN+246 |
| VAREFS | SETPEN+17~, SETPEN+274*, SETPEN+276, SETPEN+277 |
| VARR | SETPEN+19~, SETPEN+88!, SETPEN+105!, SETPEN+146!, SETPEN+165!, SETPEN+174!, SETPEN+187!, SETPEN+256! |
| VARR( | SETPEN+91*, SETPEN+97*, SETPEN+100, SETPEN+101, SETPEN+108*, SETPEN+114*, SETPEN+124*, SETPEN+131*, SETPEN+133, SETPEN+134 , SETPEN+148, SETPEN+150, SETPEN+166, SETPEN+167, SETPEN+175, SETPEN+176, SETPEN+190, SETPEN+191, SETPEN+192, SETPEN+193 , SETPEN+264*, SETPEN+267*, SETPEN+269, SETPEN+270 |
| VASIG | SETPEN~ |
| VASIG( | SETPEN+142, SETPEN+143, SETPEN+144 |
| VASIG(0 | SETPEN+141 |
| VDRGLEN | SETPEN+18~ |
| VMAILWIN | SETPEN+18~, SETPEN+283*, SETPEN+284 |
| VSIG | SETPEN+17~ |
| >> X | SETPEN+37* |
| XE | SETPEN+17~, SETPEN+27*, SETPEN+28, SETPEN+147*, SETPEN+149*, SETPEN+151, SETPEN+188*, SETPEN+189, SETPEN+192*, SETPEN+194 , SETPEN+196*, SETPEN+197, SETPEN+199*, SETPEN+200, SETPEN+202*, SETPEN+203, SETPEN+205*, SETPEN+206, SETPEN+215*, SETPEN+221 , SETPEN+223*, SETPEN+230, SETPEN+235*, SETPEN+238, SETPEN+243*, SETPEN+248, SETPEN+250*, SETPEN+252, SETPEN+254*, SETPEN+276* , SETPEN+279 |
| XEI | SETPEN+18~, SETPEN+88*, SETPEN+89*, SETPEN+93*, SETPEN+105*, SETPEN+106*, SETPEN+113*, SETPEN+121*, SETPEN+129*, SETPEN+256* , SETPEN+261* |
| XV | SETPEN+17~, SETPEN+35*, SETPEN+40*, SETPEN+147*, SETPEN+150*, SETPEN+151, SETPEN+159*, SETPEN+161, SETPEN+167*, SETPEN+168 , SETPEN+170*, SETPEN+171, SETPEN+176*, SETPEN+177, SETPEN+188*, SETPEN+189, SETPEN+193*, SETPEN+194, SETPEN+196*, SETPEN+197 , SETPEN+199*, SETPEN+200, SETPEN+202*, SETPEN+203, SETPEN+205*, SETPEN+206, SETPEN+210*, SETPEN+212, SETPEN+219*, SETPEN+221 , SETPEN+228*, SETPEN+230, SETPEN+236*, SETPEN+238, SETPEN+245*, SETPEN+246*, SETPEN+248, SETPEN+251*, SETPEN+252, SETPEN+254* , SETPEN+277*, SETPEN+279, SETPEN+284*, SETPEN+286, SETPEN+291*, SETPEN+293 |
| XVI | SETPEN+18~, SETPEN+88*, SETPEN+91*, SETPEN+97*, SETPEN+105*, SETPEN+108*, SETPEN+114*, SETPEN+124*, SETPEN+131*, SETPEN+256* , SETPEN+264*, SETPEN+267* |
| XX | SETPEN+19~, SETPEN+26*, SETPEN+27 |
