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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSOSULOG

Package: Outpatient Pharmacy

Routine: PSOSULOG


Information

PSOSULOG ;BHAM ISC/RTR-Log of prescriptions on suspense by day ;29-May-2012 15:15;PLS

Source Information

Source file <PSOSULOG.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Outpatient Pharmacy 3 $$CHKTEMP^PSOBAI  ^PSOLSET  WARN^PSOSUDCN  
VA Fileman 3 (,DD)^%DT  $$GET1^DIQ  ^DIR  
Registration 2 $$BADADR^DGUTL3  ADD^VADPT  
IHS Patient 1 $$HRN^AUPNPAT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSO PNDLOG  

Entry Points

Name Comments DBIA/ICR reference
SKIPC ;
HEAD ;
LOG ;IHS/MSC/PLS - 04/30/2009
MESS
SKIP ;
REP ;
CHKADDR ;
FOREIGN ;
CHKMAIL ;
EXIT ;
HEADB ;
HEADND
BIG ;
DATE
CHKBAD ;
EDATE

External References

Name Field # of Occurrence
^%DT DATE, EDATE
DD^%DT REP+22, BIG+4
^%ZIS SKIPC+3
^%ZISC REP+19, REP+49, BIG+2, BIG+31
^%ZTLOAD SKIPC+6
$$HRN^AUPNPAT REP+14
$$BADADR^DGUTL3 CHKADDR+2
$$GET1^DIQ REP+13
^DIR LOG+5, EDATE+2, EDATE+7, SKIP+2, SKIPC+1, REP+20, REP+46, HEAD+1, BIG+3, BIG+28
, HEADB+1
$$CHKTEMP^PSOBAI CHKADDR+4
^PSOLSET PSOSULOG+3
WARN^PSOSUDCN PSOSULOG+3
ADD^VADPT FOREIGN+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LOG+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EDATE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EDATE+2
Function Call: WRITE
  • Prompt: !!?3,"You are logged in under the "_$P($G(^PS(59,+$G(PSOSITE),0)),"^")_" division.",!
  • Line Location: EDATE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SKIP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SKIPC+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SKIPC+2
Function Call: WRITE
  • Prompt: !,"Task queued to print"
  • Line Location: SKIPC+6
Function Call: WRITE
  • Prompt: !!,"No report printed!",!!
  • Line Location: MESS+0
Function Call: WRITE
  • Prompt: !!,"NO RECORDS TO PRINT",!
  • Line Location: REP+19
Function Call: WRITE
  • Prompt: !!?9,"Patient Name: "_$G(PATNAME)
  • Line Location: REP+29
Function Call: WRITE
  • Prompt: ?62,PSOBAD
  • Line Location: REP+43
Function Call: WRITE
  • Prompt: !
  • Line Location: REP+46
Function Call: WRITE
  • Prompt: !,"NOTE: B=BAD ADDRESS INDICATOR D=NO NOT MAIL F=FOREIGN ADDRESS"
  • Line Location: REP+47
Function Call: WRITE
  • Prompt: !,"** END OF REPORT **"
  • Line Location: REP+48
Function Call: WRITE
  • Prompt: ?68,"PAGE: ",$G(PAGE)
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"RX #",?13,"DRUG",?53,"MW",?56,"PRNT B/D/F",?66,$S($G(PSOSCMOP):"CMOP STATUS",1:"")
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"RX #",?13,"DRUG",?53,"MW",?56,"PRNT B/D/F",?66,$S($G(PSOSCMOP):"CMOP STATUS",1:"")
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !!,"NO RECORDS TO PRINT",!
  • Line Location: BIG+2
Function Call: WRITE
  • Prompt: ?103,PSOBAD
  • Line Location: BIG+25
Function Call: WRITE
  • Prompt: !
  • Line Location: BIG+28
Function Call: WRITE
  • Prompt: !,"NOTE: B=BAD ADDRESS INDICATOR D=NO NOT MAIL F=FOREIGN ADDRESS"
  • Line Location: BIG+29
Function Call: WRITE
  • Prompt: !,"** END OF REPORT **"
  • Line Location: BIG+30
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADB+2
Function Call: WRITE
  • Prompt: !,"RX #",?13,"PATIENT",?45,"DRUG",?88,"TYPE",?93,"PRINTED B/D/F",?108,$S($G(PSOSCMOP):"CMOP STATUS",1:""),?122,"PAGE ",$G(PAGE)
  • Line Location: HEADB+3
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: HEADB+3
Routine Call
  • DIR
  • Line Location:
    • LOG+5
    • EDATE+2
    • EDATE+7
    • SKIP+2
    • SKIPC+1
    • REP+20
    • REP+46
    • HEAD+1
    • BIG+3
    • BIG+28
    • HEADB+1
Routine Call
  • %ZIS
  • Line Location:
    • SKIPC+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(59 - [#59] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] REP+10, REP+17, REP+26, BIG+8
^PS(52.5 - [#52.5] REP+5, REP+6, REP+7, REP+8, REP+9, REP+10, REP+13, REP+24, REP+27, REP+41
, BIG+6, BIG+9, BIG+23
^PS(55 - [#55] CHKMAIL+2
^PS(59 - [#59] EDATE+3, EDATE+5
^PSDRUG - [#50] REP+33, BIG+15
^PSRX - [#52] REP+32, REP+33, REP+35, REP+36, REP+37, REP+38, REP+39, BIG+13, BIG+15, BIG+17
, BIG+18, BIG+19, BIG+20, BIG+21, CHKBAD+10
^TMP($J PSOSULOG+4!, EXIT+1!, REP+1!, REP+17*, REP+19, REP+22, REP+23, BIG+2, BIG+4, BIG+5

Label References

Name Line Occurrences
BIG REP+18
CHKADDR CHKBAD+3
CHKBAD REP+43, BIG+25
CHKMAIL CHKBAD+4
DATE DATE
EDATE EDATE
EXIT LOG+5, DATE, EDATE, EDATE+2, EDATE+7, SKIP+2, SKIPC+1, SKIPC+3, SKIPC+4, REP+19
, REP+49, BIG+2, BIG+31
FOREIGN CHKBAD+5
HEAD REP+19, REP+22, REP+30
HEADB BIG+2, BIG+4, BIG+11
HEADND BIG+4
MESS LOG+5, DATE, EDATE, EDATE+2, EDATE+7, SKIP+2, SKIPC+1, SKIPC+3
REP SKIPC+7
SKIP EDATE+4
SKIPC SKIP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DATE!*, EDATE*!
%DT("A" DATE*, EDATE*
%DT(0 EDATE*
%ZIS SKIPC+3!*
BDATE PSOSULOG+4~, EDATE*, EXIT+2!, REP+4*, REP+5
DFN FOREIGN+1~, FOREIGN+2*
DIR LOG+2!, LOG+5!, EDATE+2!, EDATE+6!, EDATE+7!, SKIP+2!, SKIPC+1!, REP+20!, REP+46!, HEAD+1!
, BIG+3!, BIG+28!, HEADB+1!
DIR("?" LOG+4*, EDATE+6*
DIR("A" LOG+2*, EDATE+2*, EDATE+6*, SKIP+2*, SKIPC+1*, HEAD+1*, HEADB+1*
DIR("B" LOG+2*, EDATE+2*, EDATE+6*, SKIP+2*, SKIPC+1*
DIR(0 LOG+2*, EDATE+2*, EDATE+6*, SKIP+2*, SKIPC+1*, REP+20*, REP+46*, HEAD+1*, BIG+3*, BIG+28*
, HEADB+1*
>> DIRUT LOG+5, EDATE+2, EDATE+7, SKIP+2, SKIPC+1
DIVINS REP+3~, REP+13*, REP+14
DT CHKMAIL+3
>> DTOUT DATE, EDATE
EDATE PSOSULOG+4~, EDATE+1*, EXIT+2!, REP+5
FILL CHKBAD+8~, CHKBAD+9*, CHKBAD+11
GG PSOSULOG+4~, SKIPC+5*, EXIT+2!
HDAT PSOSULOG+4~, EXIT+2!, REP+21*, REP+29
HPAT PSOSULOG+4~, EXIT+2!, REP+21*, REP+29*
IO REP+2
IO("Q" SKIPC+4
IOF HEAD+2, HEADB+2
IOP SKIPC+3!
IOSL REP+30, BIG+11
IOST REP+19, REP+46, HEAD+1, BIG+2, BIG+28, HEADB+1
LINE PSOSULOG+4~, EXIT+2!, REP+2*, HEAD+2, HEADB+3
MAILEXP CHKMAIL+1~, CHKMAIL+3*
NODE PSOSULOG+4~, EXIT+2!, REP+24*, REP+28, REP+31, REP+32, REP+35, REP+36, REP+37, REP+38
, REP+39, REP+44, REP+45, BIG+6*, BIG+10, BIG+12, BIG+13, BIG+17, BIG+18, BIG+19
, BIG+20, BIG+21, BIG+26, BIG+27, CHKBAD+9
PAGE PSOSULOG+4~, EXIT+2!, REP+4*, HEAD+1, HEAD+2*, BIG+4, HEADB+1, HEADB+3*
PAT PSOSULOG+4~, EXIT+2!, REP+10*, REP+14, REP+17, REP+22*, REP+23, REP+29, BIG+4*, BIG+5
PATNAME PSOSULOG+4~, EXIT+2!, REP+26*, REP+29, BIG+8*, BIG+14
PATPTR PSOSULOG+4~, EXIT+2!, REP+24*, REP+25, REP+26, BIG+6*, BIG+7, BIG+8, CHKBAD+2
PDAT PSOSULOG+4~, EXIT+2!, REP+22*, REP+29*
PHRN REP+3~, REP+14*, REP+15, REP+17
PII PSOSULOG+4~, EDATE+3*, EXIT+2!
POP SKIPC+3!
PP PSOSULOG+4~, EXIT+2!, REP+38*, BIG+20*
PSOBAD EXIT+2!, REP+43*, BIG+25*, CHKBAD+3*, CHKBAD+4*, CHKBAD+5*, CHKBAD+12*, CHKBAD+13*, CHKBAD+14*
PSOBADR CHKADDR+1~, CHKADDR+2*, CHKADDR+3, CHKADDR+5
>> PSOBAI CHKADDR+5*
PSOBDF CHKBAD+1!, CHKBAD+3!, CHKBAD+4!, CHKBAD+5!
PSOBDF("" CHKBAD+3, CHKBAD+4, CHKBAD+5
PSOBDF("B" CHKADDR+5*
PSOBDF("D" CHKMAIL+3*
PSOBDF("F" FOREIGN+3*
PSOCNT PSOSULOG+4~, EDATE+3*, EDATE+4, EXIT+2!
PSODATE PSOSULOG+4~, EXIT+2!, REP+22*, REP+23, BIG+4*, BIG+5
PSODATEX PSOSULOG+4~, EXIT+2!, REP+22*, HEAD+2, BIG+4*, HEADND
>> PSODFN CHKADDR+2, CHKADDR+4, FOREIGN+2, CHKMAIL+2, CHKBAD+2*
PSOFORGN FOREIGN+1~, FOREIGN+3*
PSOINRX PSOSULOG+4~, EXIT+2!, REP+31*, REP+33, BIG+12*, BIG+15
PSOMW REP+34!, REP+35*, REP+37*, REP+38*, REP+39*, REP+40, BIG+16!, BIG+17*, BIG+19*, BIG+20*
, BIG+21*, BIG+22
PSOPRINT REP+41*, REP+42, REP+43, BIG+1~, BIG+23*, BIG+24, BIG+25
PSORMZ SKIPC+2*, EXIT+2!, REP+2, REP+18
PSORT PSOSULOG+4~, LOG+5*, EXIT+2!, REP+15, REP+17
PSOSCMOP PSOSULOG+4~, SKIP+3*, EXIT+2!, REP+8, REP+44, HEAD+2, BIG+26, HEADB+3
>> PSOSITE PSOSULOG+3, EDATE+5, REP+9, REP+28, BIG+10
PSOTEMP CHKADDR+1~, CHKADDR+4*, CHKADDR+5, CHKMAIL+1~, CHKMAIL+2*, CHKMAIL+3
PSPRINT PSOSULOG+4~, EDATE+2*, EXIT+2!, REP+7, REP+27, BIG+9
PSUSDIV PSOSULOG+4~, EDATE+8*, EXIT+2!, REP+9, REP+28, BIG+10
>> PSXSYS SKIP+1
QFLAG PSOSULOG+4~, EXIT+2!, REP+4*, REP+22, REP+23, REP+30, REP+46, HEAD+1*, BIG+4, BIG+5
, BIG+11, BIG+28, HEADB+1*
RX CHKBAD+8~, CHKBAD+9*, CHKBAD+10
SEQ CHKBAD+8~, CHKBAD+10*
SIN PSOSULOG+4~, EXIT+2!, REP+5*, REP+6, REP+7, REP+8, REP+9, REP+10, REP+13, REP+17
SINRX PSOSULOG+4~, EXIT+2!, REP+23*, REP+24, REP+27, REP+41, BIG+5*, BIG+6, BIG+9, BIG+23
SUSDIV REP+3~, REP+13*
U REP+13
>> VAPA(25 FOREIGN+3
X PSOSULOG+4~, DATE, EDATE, EXIT+2!, CHKBAD+10*, CHKBAD+11, CHKBAD+12, CHKBAD+13, CHKBAD+14
Y PSOSULOG+4~, LOG+5, DATE, EDATE, EDATE+1, EDATE+2, EDATE+7, EDATE+8, SKIP+2, SKIP+3
, SKIPC+1, SKIPC+2, EXIT+2!, REP+22*, HEAD+1, BIG+4*, HEADB+1
>> ZTDESC SKIPC+4*
>> ZTQUEUED EXIT+1
>> ZTREQ EXIT+1*
>> ZTRTN SKIPC+4*
>> ZTSAVE( SKIPC+5*
ZZ PSOSULOG+4~, EXIT+2!, REP+5*, REP+17, CHKBAD+8~, CHKBAD+11*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All