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 |  Local Variables  | All
Print Page as PDF
Routine: PSO283PI

Package: Outpatient Pharmacy

Routine: PSO283PI


Information

PSO283PI ;BIR/MFR-EXPIRATION DATE PROBLEM TALLY ;05/03/07

Source Information

Source file <PSO283PI.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 1 ($$DT,$$FMADD,$$FMDIFF,$$FMTE,$$NOW)^XLFDT  
Master Patient Index VistA 1 $$GETICN^MPIF001  
Order Entry Results Reporting 1 $$STATUS^ORQOR2  
Outpatient Pharmacy 1 ($$JOBSTS,CALCEXP,DISPLAY,JOB,LOG,MAIL)^PSO283P1  
Registration 1 $$SITE^VASITE  
VA FileMan 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
PI ; Post-Install entry point
EN ;
QUIT ;
STOP ;
SET ;
CPRSNUM(RXP) ;
SETXTMP ; - Initialize the XTMP global

External References

Name Field # of Occurrence
^DIR PSO283PI+31
$$GETICN^MPIF001 EN+20
$$STATUS^ORQOR2 CPRSNUM+3
$$JOBSTS^PSO283P1 PSO283PI+8, PSO283PI+38
CALCEXP^PSO283P1 SET+7, SET+33
DISPLAY^PSO283P1 PSO283PI+43
JOB^PSO283P1 PSO283PI+46, PI+4
LOG^PSO283P1 PI+3, EN+7, EN+45, STOP+3, SETXTMP+2, SETXTMP+4
MAIL^PSO283P1 EN+46, STOP+4
$$SITE^VASITE EN+13
$$DT^XLFDT EN+11, EN+18
$$FMADD^XLFDT EN+14, SETXTMP+6
$$FMDIFF^XLFDT SET+32
$$FMTE^XLFDT PSO283PI+14, PSO283PI+16
$$NOW^XLFDT PI+4, EN+43, STOP+2, SETXTMP+2, SETXTMP+4, SETXTMP+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"Expiration Date problem tally patch for Outpatient Pharmacy prescriptions"
  • Line Location: PSO283PI+10
Function Call: WRITE
  • Prompt: !?5,"========================================================================="
  • Line Location: PSO283PI+11
Function Call: WRITE
  • Prompt: !?5,"Current status: "
  • Line Location: PSO283PI+12
Function Call: WRITE
  • Prompt: !!,"Stopping..."
  • Line Location: PSO283PI+34
Function Call: WRITE
  • Prompt: $S(UNABLE:"NOT OK (may no longer be running)",1:"OK")
  • Line Location: PSO283PI+39
Routine Call
  • DIR
  • Line Location:
    • PSO283PI+31

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN+31
^PSDRUG - [#50] EN+31
^PSRX - [#52] EN+17, EN+19, EN+21, EN+22, EN+23, EN+24, EN+25, EN+26, CPRSNUM+2
^XTMP( PSO283PI+14, PSO283PI+16, PSO283PI+17, PSO283PI+36*, PSO283PI+37, PSO283PI+38, PSO283PI+40!, PSO283PI+44!, PI+2!, EN+7
, EN+16, EN+37*, EN+38, EN+42*, EN+43*, EN+44!, QUIT+1, STOP+1!, STOP+2*, SET+11*
, SET+12*, SET+16*, SET+18*, SET+20*, SET+21*, SET+25*, SET+26*, SET+36*, SET+37*, SET+38*
, SET+39*, SET+43*, SET+44*, SET+51*, SET+52*, SET+56*, SET+57*, SET+61*, SET+63*, SET+70*
, SET+71*, SETXTMP+1, SETXTMP+2*, SETXTMP+3, SETXTMP+4*, SETXTMP+5!, SETXTMP+6*

Label References

Name Line Occurrences
$$CPRSNUM SET+6, SET+30, SET+47, SET+66
QUIT PSO283PI+31, PSO283PI+34, PSO283PI+42, PSO283PI+43, EN+7, EN+40
SET EN+34
SETXTMP EN+9
STOP EN+40

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION PSO283PI+5~, PSO283PI+32*, PSO283PI+34, PSO283PI+42, PSO283PI+43, PSO283PI+44
BADRXCNT EN+2~, EN+37, EN+42
BADRXCNT("LASTRX" EN+28*
BADRXCNT(10 SET+57*
BADRXCNT(102 SET+10*
BADRXCNT(103 SET+16*
BADRXCNT(104 SET+18*
BADRXCNT(105 SET+24*
BADRXCNT(106 SET+36*
BADRXCNT(107 SET+37*
BADRXCNT(108 SET+42*
BADRXCNT(109 SET+50*
BADRXCNT(11 SET+62*
BADRXCNT(110 SET+55*
BADRXCNT(111 SET+60*
BADRXCNT(112 SET+69*
BADRXCNT(12 SET+71*
BADRXCNT(13 EN+30*, EN+31*, EN+32*
BADRXCNT(14 EN+27*
BADRXCNT(2 SET+12*
BADRXCNT(3 SET+20*
BADRXCNT(4 SET+21*
BADRXCNT(5 SET+26*
BADRXCNT(6 SET+38*
BADRXCNT(7 SET+39*
BADRXCNT(8 SET+44*
BADRXCNT(9 SET+52*
COUNTER EN+1~, EN+17*, EN+18, EN+36
CPRSDC SET+1~, SET+2*, SET+15, SET+17, SET+19, SET+34, SET+48
CPRSTA SET+1~, SET+6*, SET+15, SET+17, SET+19, SET+30*, SET+34, SET+47*, SET+48
CUTOFF EN+1~, EN+14*, SET+8, SET+46
DA SET+1~
DAYSSUP EN+2~, EN+24*
DIE SET+1~
DIR PSO283PI+5~
DIR("A" PSO283PI+19*, PSO283PI+21*, PSO283PI+23*, PSO283PI+25*, PSO283PI+27*, PSO283PI+29*, PSO283PI+30*
DIR("B" PSO283PI+21*, PSO283PI+29*
DIR(0 PSO283PI+19*, PSO283PI+21*, PSO283PI+23*, PSO283PI+25*, PSO283PI+27*, PSO283PI+28*, PSO283PI+30*
DIROUT PSO283PI+5~, PSO283PI+31
DIRUT PSO283PI+5~, PSO283PI+31
DR SET+1~
DRUG EN+1~, EN+21*, EN+30, EN+31
DT EN+11*, EN+14, EN+18*
DTOUT PSO283PI+5~, PSO283PI+31
DUOUT PSO283PI+5~, PSO283PI+31
DUZ EN+4
EXPIRDT EN+2~, EN+26*, SET+5, SET+7, SET+8, SET+32, SET+46
EXPJOBDT PSO283PI+5~, PI+1~
ISSUEDT EN+2~, EN+23*, EN+32, SET+32
JOBSTS PSO283PI+5~, PSO283PI+8*, PSO283PI+13, PSO283PI+14, PSO283PI+15, PSO283PI+16, PSO283PI+20, PSO283PI+22, PSO283PI+24, PSO283PI+26
, PSO283PI+28
NEWEXPDT SET+1~, SET+31*, SET+33*, SET+36, SET+37, SET+38, SET+39, SET+40
NMSP PSO283PI+5~, PSO283PI+6*, PSO283PI+14, PSO283PI+16, PSO283PI+17, PSO283PI+36, PSO283PI+37, PSO283PI+38, PSO283PI+40, PSO283PI+44
, PI+1~, PI+2*, EN+1~, EN+4*, EN+7, EN+16, EN+37, EN+38, EN+42, EN+43
, EN+44, QUIT+1, STOP+1, STOP+2, SET+11, SET+12, SET+16, SET+18, SET+20, SET+21
, SET+25, SET+26, SET+36, SET+37, SET+38, SET+39, SET+43, SET+44, SET+51, SET+52
, SET+56, SET+57, SET+61, SET+63, SET+70, SET+71, SETXTMP+1, SETXTMP+2, SETXTMP+3, SETXTMP+4
, SETXTMP+5, SETXTMP+6
NUMREFS EN+2~, EN+25*
ORN SET+1~, SET+6*, SET+13, SET+22, SET+30*, SET+34, SET+47*, SET+48, SET+53, SET+58
, SET+66*, SET+67, CPRSNUM+1~, CPRSNUM+2*, CPRSNUM+3*, CPRSNUM+4
PATICN EN+1~, EN+20*, SET+9, SET+14, SET+23, SET+35, SET+41, SET+49, SET+54, SET+59
, SET+68
PATIENT EN+1~, EN+19*, EN+20, EN+30, EN+31
PSOACT EN+1~
PSODUZ PSO283PI+5~, EN+4*
PSOINACT EN+1~, EN+15*, SET+46
PSOINST EN+1~, EN+13*
RXP EN+1~, EN+16*, EN+17*, EN+19, EN+21, EN+22, EN+23, EN+24, EN+25, EN+26
, EN+28, SET+6, SET+11, SET+12, SET+16, SET+18, SET+20, SET+21, SET+25, SET+26
, SET+30, SET+36, SET+37, SET+38, SET+39, SET+43, SET+44, SET+47, SET+51, SET+52
, SET+56, SET+57, SET+61, SET+63, SET+66, SET+70, SET+71, CPRSNUM~, CPRSNUM+2
STA CPRSNUM+1~, CPRSNUM+2*, CPRSNUM+3*, CPRSNUM+4
STATUS EN+1~, EN+22*, SET+29, SET+46, SET+65
STOP EN+1~, EN+16*, EN+17, EN+38*, EN+40
TIME PSO283PI+35~, PSO283PI+36*, PSO283PI+38*
UNABLE PSO283PI+35~, PSO283PI+36*, PSO283PI+37, PSO283PI+38*, PSO283PI+39
Y PSO283PI+5~, PSO283PI+32
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All