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 ; 11/18/92

Source Information

Source file <PSOSULOG.m>

Call Graph

Call Graph

Call Graph Total: 11

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  

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: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSO PNDLOG  

Entry Points

Name Comments DBIA/ICR reference
LOG
DATE
EDATE
SKIP ;
SKIPC ;
EXIT ;
MESS
REP ;
HEAD ;
BIG ;
HEADB ;
HEADND
CHKADDR
FOREIGN
CHKMAIL
CHKBAD ;

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LOG+0
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+13
Function Call: WRITE
  • Prompt: !!?9,"Patient Name: "_$G(PATNAME)
  • Line Location: REP+23
Function Call: WRITE
  • Prompt: ?62,PSOBAD
  • Line Location: REP+37
Function Call: WRITE
  • Prompt: !
  • Line Location: REP+40
Function Call: WRITE
  • Prompt: !,"NOTE: B=BAD ADDRESS INDICATOR D=NO NOT MAIL F=FOREIGN ADDRESS"
  • Line Location: REP+41
Function Call: WRITE
  • Prompt: !,"** END OF REPORT **"
  • Line Location: REP+42
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+2
    • EDATE+2
    • EDATE+7
    • SKIP+2
    • SKIPC+1
    • REP+14
    • REP+40
    • 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
^PSRX - [#52] GET1^DIQ
^PS(59 - [#59] GET1^DIQ

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
BIG REP+12
CHKADDR CHKBAD+3
CHKBAD REP+37, BIG+25
CHKMAIL CHKBAD+4
DATE DATE
EDATE EDATE
EXIT LOG+2, DATE, EDATE, EDATE+2, EDATE+7, SKIP+2, SKIPC+1, SKIPC+3, SKIPC+4, REP+13
, REP+43, BIG+2, BIG+31
FOREIGN CHKBAD+5
HEAD REP+13, REP+16, REP+24
HEADB BIG+2, BIG+4, BIG+11
HEADND BIG+4
MESS LOG+2, 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+3~, EDATE*, EXIT+2!, REP+3*, REP+4
DFN FOREIGN+1~, FOREIGN+2*
DIR LOG!, LOG+2!, EDATE+2!, EDATE+6!, EDATE+7!, SKIP+2!, SKIPC+1!, REP+14!, REP+40!, HEAD+1!
, BIG+3!, BIG+28!, HEADB+1!
DIR("?" LOG+1*, EDATE+6*
DIR("A" LOG*, EDATE+2*, EDATE+6*, SKIP+2*, SKIPC+1*, HEAD+1*, HEADB+1*
DIR("B" LOG*, EDATE+2*, EDATE+6*, SKIP+2*, SKIPC+1*
DIR(0 LOG*, EDATE+2*, EDATE+6*, SKIP+2*, SKIPC+1*, REP+14*, REP+40*, HEAD+1*, BIG+3*, BIG+28*
, HEADB+1*
>> DIRUT LOG+2, EDATE+2, EDATE+7, SKIP+2, SKIPC+1
DT CHKMAIL+7
>> DTOUT DATE, EDATE
EDATE PSOSULOG+3~, EDATE+1*, EXIT+2!, REP+4
FILL CHKBAD+8~, CHKBAD+9*, CHKBAD+11
GG PSOSULOG+3~, SKIPC+5*, EXIT+2!
HDAT PSOSULOG+3~, EXIT+2!, REP+15*, REP+23
HPAT PSOSULOG+3~, EXIT+2!, REP+15*, REP+23*
IO REP+2
IO("Q" SKIPC+4
IOF HEAD+2, HEADB+2
IOP SKIPC+3!
IOSL REP+24, BIG+11
IOST REP+13, REP+40, HEAD+1, BIG+2, BIG+28, HEADB+1
LINE PSOSULOG+3~, EXIT+2!, REP+2*, HEAD+2, HEADB+3
MAILEXP CHKMAIL+1~, CHKMAIL+4*, CHKMAIL+5*, CHKMAIL+7
MAILST CHKMAIL+1~, CHKMAIL+3*, CHKMAIL+5*, CHKMAIL+6
NODE PSOSULOG+3~, EXIT+2!, REP+18*, REP+22, REP+25, REP+26, REP+29, REP+30, REP+31, REP+32
, REP+33, REP+38, REP+39, BIG+6*, BIG+10, BIG+12, BIG+13, BIG+17, BIG+18, BIG+19
, BIG+20, BIG+21, BIG+26, BIG+27, CHKMAIL+5, CHKBAD+9
PAGE PSOSULOG+3~, EXIT+2!, REP+3*, HEAD+1, HEAD+2*, BIG+4, HEADB+1, HEADB+3*
PAT PSOSULOG+3~, EXIT+2!, REP+9*, REP+10, REP+11, REP+16*, REP+17, REP+23, BIG+4*, BIG+5
PATNAME PSOSULOG+3~, EXIT+2!, REP+20*, REP+23, BIG+8*, BIG+14
PATPTR PSOSULOG+3~, EXIT+2!, REP+18*, REP+19, REP+20, BIG+6*, BIG+7, BIG+8, CHKBAD+2
PDAT PSOSULOG+3~, EXIT+2!, REP+16*, REP+23*
PII PSOSULOG+3~, EDATE+3*, EXIT+2!
POP SKIPC+3!
PP PSOSULOG+3~, EXIT+2!, REP+32*, BIG+20*
PSOBAD EXIT+2!, REP+37*, 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+7*
PSOBDF("F" FOREIGN+5*, FOREIGN+7!, FOREIGN+8!
PSOCNT PSOSULOG+3~, EDATE+3*, EDATE+4, EXIT+2!
PSODATE PSOSULOG+3~, EXIT+2!, REP+16*, REP+17, BIG+4*, BIG+5
PSODATEX PSOSULOG+3~, EXIT+2!, REP+16*, HEAD+2, BIG+4*, HEADND
>> PSODFN CHKADDR+2, CHKADDR+4, FOREIGN+2, CHKMAIL+2, CHKBAD+2*
PSOFORGN FOREIGN+1~, FOREIGN+3*, FOREIGN+7, FOREIGN+8
PSOINRX PSOSULOG+3~, EXIT+2!, REP+25*, REP+27, BIG+12*, BIG+15
PSOMW REP+28!, REP+29*, REP+31*, REP+32*, REP+33*, REP+34, BIG+16!, BIG+17*, BIG+19*, BIG+20*
, BIG+21*, BIG+22
PSON FOREIGN+4~, FOREIGN+6*, FOREIGN+7, FOREIGN+8
PSOPRINT REP+35*, REP+36, REP+37, BIG+1~, BIG+23*, BIG+24, BIG+25
PSORMZ SKIPC+2*, EXIT+2!, REP+2, REP+12
PSORT PSOSULOG+3~, LOG+2*, EXIT+2!, REP+10, REP+11
PSOSCMOP PSOSULOG+3~, SKIP+3*, EXIT+2!, REP+7, REP+38, HEAD+2, BIG+26, HEADB+3
>> PSOSITE PSOSULOG+2, EDATE+5, REP+8, REP+22, BIG+10, FOREIGN+6
PSOTEMP CHKADDR+1~, CHKADDR+4*, CHKADDR+5, CHKMAIL+1~, CHKMAIL+2*, CHKMAIL+3, CHKMAIL+4
PSPRINT PSOSULOG+3~, EDATE+2*, EXIT+2!, REP+6, REP+21, BIG+9
PSUSDIV PSOSULOG+3~, EDATE+8*, EXIT+2!, REP+8, REP+22, BIG+10
>> PSXSYS SKIP+1
QFLAG PSOSULOG+3~, EXIT+2!, REP+3*, REP+16, REP+17, REP+24, REP+40, 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+3~, EXIT+2!, REP+4*, REP+5, REP+6, REP+7, REP+8, REP+9, REP+11
SINRX PSOSULOG+3~, EXIT+2!, REP+17*, REP+18, REP+21, REP+35, BIG+5*, BIG+6, BIG+9, BIG+23
>> VAPA(25 FOREIGN+3
X PSOSULOG+3~, DATE, EDATE, EXIT+2!, CHKBAD+10*, CHKBAD+11, CHKBAD+12, CHKBAD+13, CHKBAD+14
Y PSOSULOG+3~, LOG+2, DATE, EDATE, EDATE+1, EDATE+2, EDATE+7, EDATE+8, SKIP+2, SKIP+3
, SKIPC+1, SKIPC+2, EXIT+2!, REP+16*, HEAD+1, BIG+4*, HEADB+1
>> ZTDESC SKIPC+4*
>> ZTQUEUED EXIT+1
>> ZTREQ EXIT+1*
>> ZTRTN SKIPC+4*
>> ZTSAVE( SKIPC+5*
ZZ PSOSULOG+3~, EXIT+2!, REP+4*, REP+11, 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