Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: PSOERUT5

Package: Outpatient Pharmacy

Routine: PSOERUT5


Information

PSOERUT5 ;ALB/MFR - eRx & Pending Order Side-by-Side LM Display; 06/25/2023 5:14pm

Source Information

Source file <PSOERUT5.m>

Call Graph

Call Graph

Call Graph Total: 16

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 7

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  

Entry Points

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

External References

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All