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+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

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