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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSOPOST

Package: Outpatient Pharmacy

Routine: PSOPOST


Information

PSOPOST ;BIR/SAB-post init for v7 ;07/29/96 9:17 AM

Source Information

Source file <PSOPOST.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Kernel 4 ^%ZTLOAD  $$DT^XLFDT  OUT^XPDMENU  (BMES,MES)^XPDUTL  
Outpatient Pharmacy 3 EN^PSOHLSN1  POP^PSOSIGNO  ECAN^PSOUTL  
VA Fileman 3 ^%DT  (C,NOW)^%DTC  FILE^DICN  
MailMan 1 ^XMD  
Order Entry Results Reporting 1 $$STATUS^ORQOR2  

Entry Points

Name Comments DBIA/ICR reference
SND
AGF ;PSO*7*73 - AG x-ref fix
AGC ;
BEG
EN0
EN1
EN2
PCLO
RESTART ;
W
MSG ;
SETUP1 ;
POST ;
CLOZ ;

External References

Name Field # of Occurrence
^%DT BEG+16
C^%DTC POST+7, AGC+4, AGC+6
NOW^%DTC POST+2, POST+35, BEG+15, AGC+5, EN2+7
^%ZTLOAD RESTART+3, PCLO, BEG+19
FILE^DICN SETUP1+7
$$STATUS^ORQOR2 EN2+4
EN^PSOHLSN1 MSG+6
POP^PSOSIGNO POST+11
ECAN^PSOUTL POST+13
$$DT^XLFDT AGC+1
^XMD SND+2
OUT^XPDMENU POST+3, POST+34
BMES^XPDUTL PSOPOST+8, PSOPOST+11, PSOPOST+17, SETUP1+2, SETUP1+5, SETUP1+8
MES^XPDUTL PSOPOST+12, SETUP1+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"DUZ and DUZ(0) must be defined as an active user.",!!
  • Line Location: RESTART+2
Function Call: WRITE
  • Prompt: !,"Background Job queued to run.",!
  • Line Location: RESTART+4
Function Call: WRITE
  • Prompt: !,"Background Job queued to run.",!
  • Line Location: PCLO+1
Function Call: WRITE
  • Prompt: !!,"Use the entry point BEG^PSOPOST to restart - quitting "
  • Line Location: AGF+1
Function Call: WRITE
  • Prompt: !!,?10,"*** 'AG' CROSS-REFERENCE CLEANUP PROCESS ***",!
  • Line Location: BEG+0
Function Call: WRITE
  • Prompt: !!,"DUZ NOT DEFINED - QUITTING",!!
  • Line Location: BEG+1
Function Call: WRITE
  • Prompt: !,"Outpatient Pharmacy V. 7.0 not installed"
  • Line Location: BEG+8
Function Call: WRITE
  • Prompt: !,"Cleanup will start from "_$E(IDT,4,5)_"-"_$E(IDT,6,7)_"-"_$E(IDT,2,3)_" (Outpatient Pharmacy V. 7.0 installed date)."
  • Line Location: BEG+9
Function Call: WRITE
  • Prompt: !!!?10,"Cleanup job not queued.."
  • Line Location: BEG+17
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,"A mail message will be sent to the installer upon completion of this job.",!
  • Line Location: W+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" AGC+5, EN2+7
^DPT - [#2] POST+24
^OR(100 - [#100] MSG+8, MSG+9
^ORD(101 - [#101] PSOPOST+10, PSOPOST+14, SETUP1+1, SETUP1+4, SETUP1+6*
^PS(52.5 - [#52.5] POST+18, POST+19, POST+20, POST+21, POST+22!, POST+23!, POST+24!, POST+25!, POST+26, POST+27!
, POST+28!, POST+29!, POST+30*, POST+31, POST+32*
^PS(55 - [#55] CLOZ+2, CLOZ+3, CLOZ+4*
^PS(59.7 - [#59.7] PSOPOST+15*, POST+1*, POST+2*, POST+35*, RESTART+1*, BEG+7, AGC+2
^PSDRUG - [#50] POST+8, POST+30
^PSRX - [#52] POST+5*, POST+6, POST+8*, POST+10*, POST+11, POST+12*, POST+13*, POST+14, POST+15!, POST+16
, POST+20, POST+30, EN0+5, EN0+6, EN1+2, EN1+3, EN2+2, EN2+3, EN2+4, EN2+5
, MSG+1
^PSRX("AD" EN1+1
^PSRX("ADP" POST+16*
^PSRX("AG" EN0+4, EN0+5!, EN0+7!*, EN1+4, EN1+5*, EN2+1
^VA(200 - [#200] RESTART+2
^XTMP( BEG+4, BEG+5, BEG+9!, BEG+12!, AGC+3*, AGC+6*, AGC+7, AGC+8, AGC+9, AGC+11*
, AGC+12*, EN0*, EN0+1*, EN0+2*, EN0+4*, EN1*, EN1+1*, EN2*, EN2+1*, EN2+7*
, SND+2!
^XTMP("PSO73" AGF+1

Label References

Name Line Occurrences
@( AGC+7
EN0 AGC+6
MSG EN2+6
SETUP1 PSOPOST+9, PSOPOST+14
SND AGC+3
W BEG+11, BEG+14

Naked Globals

Name Field # of Occurrence
^( EN2+5
^("OR1" EN2+3
^("SIG" POST+11
^("STA" POST+13, POST+20*
^(0 POST+21, POST+24, EN2+5
^(3 MSG+9*
^(49.99 PSOPOST+15*
^(6 MSG+8*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% POST+2!, POST+35!, BEG+15, AGC+5, EN2+7
%DT BEG+15!*, BEG+16!
%DT("A" BEG+15*
%DT(0 BEG+15*
%H POST+2!, POST+35!
%I POST+2!, POST+35!
>> ACR MSG+1*
>> ADT MSG+1*, MSG+7*, MSG+8, MSG+9
>> AL MSG+1*, MSG+3, MSG+4, MSG+5
>> COM MSG+2*, MSG+3*, MSG+4*, MSG+5*, MSG+6
>> CUTOFF POST+7*, POST+11
DA SETUP1+7!, POST+4!, POST+35!
DA(1 SETUP1+7*
DD SETUP1+7!
DFN CLOZ+1~, CLOZ+2*, CLOZ+3, CLOZ+4
DIC SETUP1+7!*
DIC(0 SETUP1+7*
DIE POST+4!, POST+35!
DIK POST+33!
>> DLAYGO SETUP1+7*
DO SETUP1+7!
DR POST+4!, POST+35!
DT PSOPOST+15, POST+7, POST+13, AGC+1*, AGC+6, EN2+1, MSG+7
>> DTOUT BEG+17
DUZ RESTART+2, BEG+1, SND, MSG+6*
DUZ(0 RESTART+2
>> EXD BEG+4*, BEG+5, AGC+5*, AGC+6, AGC+7, AGC+8*, AGC+10, AGC+11, EN0+1, EN0+3*
, EN0+4*, EN0+5, EN0+7, EN0+8*, EN1*, EN1+1*, EN1+6*, EN2*, EN2+1*
>> IDT BEG+7*, BEG+8, BEG+9, AGC+2*, AGC+3, AGC+4*, AGC+5, AGC+8, AGC+10, EN0+8
, EN1+6
IFN POST+5*, POST+6, POST+8, POST+10, POST+11, POST+12, POST+13, POST+14, POST+15, POST+16
, POST+33!
>> II EN2+5*
ITEM PSOPOST+9*, PSOPOST+12, PSOPOST+13!, PSOPOST+14*, SETUP1+1, SETUP1+2, SETUP1+5, SETUP1+8
>> JJ EN2+5*, EN2+6, MSG+1
MENU PSOPOST+9*, PSOPOST+10, PSOPOST+11, PSOPOST+13!, PSOPOST+14*, SETUP1+3, SETUP1+5, SETUP1+8
MENUP PSOPOST+9, PSOPOST+10*, PSOPOST+13!, PSOPOST+14*, SETUP1+4, SETUP1+6, SETUP1+7
>> ORN EN2+4*, MSG+8, MSG+9
P73 AGF+2*, BEG+3, BEG+12!
>> PH AGC+7, AGC+9*, AGC+11
>> PHR MSG+1*, MSG+4*, MSG+6
>> PNO MSG+2*, MSG+4*, MSG+6
PNODE POST+18*, POST+19, POST+22, POST+33!
>> PQ BEG+3, BEG+8*, BEG+10
PR POST+14*, POST+15, POST+16, POST+33!
PSO POST+18*, POST+19, POST+20, POST+21, POST+22, POST+23, POST+24, POST+25, POST+26, POST+27
, POST+28, POST+29, POST+30, POST+33!
PSOINRX POST+19*, POST+20, POST+25, POST+30, POST+33!
PSOIT PSOPOST+17!
PSOPT POST+3*, POST+4!, POST+34*, POST+35!
>> RF EN1+1*
>> RX EN0+4*, EN0+5, EN0+6, EN0+7, EN1+1*, EN1+2, EN1+3, EN1+4, EN1+5, EN2+1*
, EN2+2, EN2+3, EN2+4, EN2+5, MSG+1, MSG+6
SCMOP POST+17~, POST+26*, POST+27, POST+28
SCT POST+17~, POST+31*, POST+32
SDATE POST+17~, POST+21*, POST+22, POST+27
SFLAG POST+18*, POST+20*, POST+30, POST+33!
SLAST POST+17~, POST+31*, POST+32
SPAT POST+17~, POST+21*, POST+22, POST+23, POST+24, POST+27, POST+28
>> ST EN2+3*, MSG+6
SZZ POST+17~, POST+31*
>> TY BEG+2*, BEG+4, BEG+5, BEG+9, BEG+12, AGC+1*, AGC+3, AGC+6, AGC+7, AGC+8
, AGC+9, AGC+11, AGC+12, EN0, EN0+1, EN0+2, EN0+4, EN1, EN1+1, EN2
, EN2+1, EN2+7, SND+2
X SETUP1+1*, SETUP1+4, POST+2!, POST+7, POST+35!, AGC+4, AGC+6, EN0+6*, EN0+7, EN1+3*
, EN1+4, EN1+5
>> X1 POST+7*, AGC+4*, AGC+6*
>> X2 POST+7*, AGC+4*, AGC+6*
>> XMDUZ SND*
>> XMSUB SND+1*
>> XMTEXT SND+2*
XMY SND+2!
XMY( SND*
>> XQABT4 PSOPOST+15*
>> XQABT5 PSOPOST+16*
XX CLOZ+1~, CLOZ+3*, CLOZ+4
>> Y SETUP1+8, BEG+17, BEG+18, AGC+5*, AGC+12, EN0+2, EN2+7*
>> YY AGC+7*
>> ZTDESC RESTART+3*, PCLO*, BEG+18*
>> ZTDTH RESTART+3*, PCLO*, BEG+18*
>> ZTIO RESTART+3*, PCLO*, BEG+18*
>> ZTQUEUED POST+36*, SND+3
>> ZTREQ SND+3*
>> ZTRTN RESTART+3*, PCLO*, BEG+18*
>> ZTSK BEG+19
>> ZZDU MSG+6*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All