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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABSPOS35

Package: Pharmacy Point of Sale

Routine: ABSPOS35


Information

ABSPOS35 ; IHS/FCS/DRS - survey pharmacy volume ;

Source Information

Source file <ABSPOS35.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Pharmacy Point of Sale 3 ($$DTR,$$NOWEXT)^ABSPOSU1  ENDRPT^ABSPOSU5  ($$EOPQ,EOPQ)^ABSPOSU8  
Kernel 2 ^%ZIS  ^%ZISC  
VA Fileman 1 (C,H)^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Point of Sale 1 ABSPOSX  

Entry Points

Name Comments DBIA/ICR reference
VOLTEST
WKDAY(X)
COUNT(DATE,INDEX)
YEAR(Y)
DOLLARH(X)
NEXTDAY(X1)
VOLUME(STARTDT,THRUDT)
MAIN ;EP - option: ABSP VOLUME SURVEY
HEADING ;
MMMDD(Y)

External References

Name Field # of Occurrence
C^%DTC VOLTEST, NEXTDAY+1
H^%DTC DOLLARH+1
^%ZIS MAIN+3
^%ZISC MAIN+5
$$DTR^ABSPOSU1 MAIN+2
$$NOWEXT^ABSPOSU1 VOLUME+5
ENDRPT^ABSPOSU5 VOLUME+31
$$EOPQ^ABSPOSU8 VOLUME+19
EOPQ^ABSPOSU8 VOLUME+26

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Survey of pharmacy volume",!
  • Line Location: MAIN+1
Function Call: WRITE
  • Prompt: $$MMMDD(DATE)
  • Line Location: VOLUME+16
Function Call: WRITE
  • Prompt: ?$$WKDAY(DATE)+1*8,$J(COUNT,5)
  • Line Location: VOLUME+17
Function Call: WRITE
  • Prompt: ?70,$J(WKTOTAL,6),!
  • Line Location: VOLUME+18
Function Call: WRITE
  • Prompt: "INDEX",?10,"Total",?20,"Average",!
  • Line Location: VOLUME+27
Function Call: WRITE
  • Prompt: INDEX,?10,^TMP($J,INDEX)
  • Line Location: VOLUME+29
Function Call: WRITE
  • Prompt: ?20,$J(^TMP($J,INDEX)/NDAYS,6,1),!
  • Line Location: VOLUME+30
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADING+1
Function Call: WRITE
  • Prompt: "Survey of Pharmacy Volume (",$T(+0),")",?60,RPTDATE,!
  • Line Location: HEADING+2
Function Call: WRITE
  • Prompt: "For "
  • Line Location: HEADING+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+3
Function Call: WRITE
  • Prompt: Y
  • Line Location: HEADING+4
Function Call: WRITE
  • Prompt: " through "
  • Line Location: HEADING+5
Function Call: WRITE
  • Prompt: Y
  • Line Location: HEADING+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+7
Function Call: WRITE
  • Prompt: !,YEAR
  • Line Location: HEADING+8
Function Call: WRITE
  • Prompt: ?I+1*8," ",$P("MON,TUE,WED,THU,FRI,SAT,SUN",",",I+1)
  • Line Location: HEADING+9
Function Call: WRITE
  • Prompt: ?70,"WK. TOTAL",!
  • Line Location: HEADING+10
Routine Call
  • %ZIS
  • Line Location:
    • MAIN+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HEADING+4, HEADING+6, YEAR, MMMDD
^PSRX - [#52] COUNT+2, COUNT+3, COUNT+4
^TMP($J VOLUME+3!, VOLUME+12*, VOLUME+13*, VOLUME+29, VOLUME+30

Label References

Name Line Occurrences
$$COUNT VOLUME+11
$$DOLLARH WKDAY+1
$$MMMDD VOLUME+16
$$NEXTDAY VOLUME+21
$$WKDAY VOLUME+16, VOLUME+17, VOLUME+18
$$YEAR VOLUME+7, VOLUME+22, VOLUME+23
HEADING VOLUME+7, VOLUME+24
VOLUME MAIN+4, VOLTEST

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%H VOLTEST~, DOLLARH+1~, NEXTDAY+1~
%T DOLLARH+1~
%Y DOLLARH+1~
C COUNT+1~*, COUNT+5*, COUNT+6
COUNT VOLUME+4~, VOLUME+11*, VOLUME+12, VOLUME+13, VOLUME+14, VOLUME+17
D COUNT+1~, COUNT+2*, COUNT+3, COUNT+4
DATE VOLUME+4~, VOLUME+8*, VOLUME+9, VOLUME+11, VOLUME+12, VOLUME+16, VOLUME+17, VOLUME+18, VOLUME+19*, VOLUME+21*
, VOLUME+22, VOLUME+23, COUNT~, COUNT+2
DT VOLTEST, VOLUME+6
I VOLUME+4~, HEADING+9*
INDEX VOLUME+4~, VOLUME+10*, VOLUME+11, VOLUME+12, VOLUME+13, VOLUME+15, VOLUME+28*, VOLUME+29, VOLUME+30, COUNT~
, COUNT+2, COUNT+3, COUNT+4
IOF HEADING+1
NDAYS VOLUME+4~, VOLUME+8*, VOLUME+20*, VOLUME+30
RANGE MAIN+2~*, MAIN+4, HEADING+4, HEADING+6
RPTDATE VOLUME+5~*, HEADING+2
RXI VOLUME+4~, COUNT+1~, COUNT+3*, COUNT+4
RXR VOLUME+4~, COUNT+1~, COUNT+4*
STARTDT VOLUME~, VOLUME+7, VOLUME+8
THRUDT VOLUME~, VOLUME+6*, VOLUME+9, VOLUME+21
U MAIN+4, HEADING+4, HEADING+6
WEEKDAY VOLUME+4~
WKTOTAL VOLUME+4~, VOLUME+8*, VOLUME+14*, VOLUME+18*
X VOLTEST~, VOLUME+4~, WKDAY~, WKDAY+1, DOLLARH~, NEXTDAY+1~
X1 VOLTEST~*, NEXTDAY~
X2 VOLTEST~*, NEXTDAY+1~*
Y HEADING+4~*, HEADING+6*, YEAR~, MMMDD~
YEAR VOLUME+7~*, VOLUME+22, VOLUME+23*, HEADING+8

Marked Items

Name Field # of Occurrence
$T( VOLUME+19, VOLUME+26, HEADING+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All