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

Package: Pharmacy Point of Sale

Routine: ABSPOS6M


Information

ABSPOS6M ; IHS/FCS/DRS - Print log of claim ;

Source Information

Source file <ABSPOS6M.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Pharmacy Point of Sale 6 $$GETRX^ABSPOSIV  ($$EXISTS,PRCLLOG,PRINTLOG)^ABSPOSL  $$STATI^ABSPOSU  PRESSANY^ABSPOSU5  DISPRESP^ABSPOSUA  ($$DATETIME,$$TIMEDIF)^ABSPOSUD  
Kernel 2 ^%ZIS  ^%ZISC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Point of Sale 1 ABSPOS6D  

Entry Points

Name Comments DBIA/ICR reference
CZ
CLAIMLOG(RXI,DEST)

External References

Name Field # of Occurrence
^%ZIS CLAIMLOG+13
^%ZISC CLAIMLOG+61
$$GETRX^ABSPOSIV CLAIMLOG+11
$$EXISTS^ABSPOSL CLAIMLOG+48
PRCLLOG^ABSPOSL CLAIMLOG+57
PRINTLOG^ABSPOSL CLAIMLOG+50
$$STATI^ABSPOSU CLAIMLOG+27
PRESSANY^ABSPOSU5 CLAIMLOG+49, CLAIMLOG+54
DISPRESP^ABSPOSUA CLAIMLOG+29
$$DATETIME^ABSPOSUD CLAIMLOG+32, CLAIMLOG+34
$$TIMEDIF^ABSPOSUD CLAIMLOG+35

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Pharmacy POS Log of activity for one prescription",!
  • Line Location: CLAIMLOG+14
Function Call: WRITE
  • Prompt: "Prescription #",$P(^ABSPT(RXI,1),U,11)
  • Line Location: CLAIMLOG+17
Function Call: WRITE
  • Prompt: " Refill #",X
  • Line Location: CLAIMLOG+18
Function Call: WRITE
  • Prompt: " (RXI=",RXI,")"
  • Line Location: CLAIMLOG+19
Function Call: WRITE
  • Prompt: !
  • Line Location: CLAIMLOG+20
Function Call: WRITE
  • Prompt: "Patient: "
  • Line Location: CLAIMLOG+21
Function Call: WRITE
  • Prompt: X
  • Line Location: CLAIMLOG+22
Function Call: WRITE
  • Prompt: ?50,"Visit: "
  • Line Location: CLAIMLOG+23
Function Call: WRITE
  • Prompt: X
  • Line Location: CLAIMLOG+24
Function Call: WRITE
  • Prompt: !
  • Line Location: CLAIMLOG+25
Function Call: WRITE
  • Prompt: "Status: "
  • Line Location: CLAIMLOG+26
Function Call: WRITE
  • Prompt: X,":",$$STATI^ABSPOSU(X),!
  • Line Location: CLAIMLOG+27
Function Call: WRITE
  • Prompt: !
  • Line Location: CLAIMLOG+28
Function Call: WRITE
  • Prompt: " - ",X
  • Line Location: CLAIMLOG+31
Function Call: WRITE
  • Prompt: "Submitted on "
  • Line Location: CLAIMLOG+32
Function Call: WRITE
  • Prompt: $$DATETIME^ABSPOSUD(X1),!
  • Line Location: CLAIMLOG+32
Function Call: WRITE
  • Prompt: " Last activity @"
  • Line Location: CLAIMLOG+33
Function Call: WRITE
  • Prompt: " Elapsed time: "
  • Line Location: CLAIMLOG+35
Function Call: WRITE
  • Prompt: $$TIMEDIF^ABSPOSUD(X1,X2)
  • Line Location: CLAIMLOG+35
Function Call: WRITE
  • Prompt: !
  • Line Location: CLAIMLOG+36
Function Call: WRITE
  • Prompt: "No entry "
  • Line Location: CLAIMLOG+38
Function Call: WRITE
  • Prompt: "See also entry `",X
  • Line Location: CLAIMLOG+39
Function Call: WRITE
  • Prompt: " in file #",X1,", ",$P(^DIC(X1,0),U),!
  • Line Location: CLAIMLOG+40
Function Call: WRITE
  • Prompt: "but there is no entry "
  • Line Location: CLAIMLOG+43
Function Call: WRITE
  • Prompt: " and entry `",X
  • Line Location: CLAIMLOG+44
Function Call: WRITE
  • Prompt: " in file #",X1,", ",$P(^DIC(X1,0),U),!
  • Line Location: CLAIMLOG+45
Function Call: WRITE
  • Prompt: !
  • Line Location: CLAIMLOG+46
Function Call: WRITE
  • Prompt: "Log of this claim's activity: ",!
  • Line Location: CLAIMLOG+47
Function Call: WRITE
  • Prompt: "Log file for ",RXI," is not on file.",!
  • Line Location: CLAIMLOG+51
Routine Call
  • %ZIS
  • Line Location:
    • CLAIMLOG+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSPT - [#9002313.59] CLAIMLOG+15, CLAIMLOG+17
^AUPNVSIT - [#9000010] CLAIMLOG+24
^DIC - [#1] CLAIMLOG+40, CLAIMLOG+45
^DPT - [#2] CLAIMLOG+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DEST CLAIMLOG~, CLAIMLOG+12, CLAIMLOG+61
I CLAIMLOG+16~*
IO CLAIMLOG+12*, CLAIMLOG+14
>> POP CLAIMLOG+13
REC CLAIMLOG+15~*
REC( CLAIMLOG+16*
REC(0 CLAIMLOG+22, CLAIMLOG+24, CLAIMLOG+27, CLAIMLOG+32, CLAIMLOG+33, CLAIMLOG+37, CLAIMLOG+42, CLAIMLOG+52
REC(1 CLAIMLOG+18
RXI CLAIMLOG~, CLAIMLOG+11*, CLAIMLOG+15, CLAIMLOG+17, CLAIMLOG+19, CLAIMLOG+48, CLAIMLOG+50, CLAIMLOG+51
U CLAIMLOG+17, CLAIMLOG+18, CLAIMLOG+22, CLAIMLOG+24, CLAIMLOG+27, CLAIMLOG+32, CLAIMLOG+33, CLAIMLOG+37, CLAIMLOG+40, CLAIMLOG+42
, CLAIMLOG+45, CLAIMLOG+52
X CLAIMLOG+15~, CLAIMLOG+18*, CLAIMLOG+22*, CLAIMLOG+24*, CLAIMLOG+27*, CLAIMLOG+28, CLAIMLOG+37*, CLAIMLOG+38, CLAIMLOG+39, CLAIMLOG+41
, CLAIMLOG+42*, CLAIMLOG+43, CLAIMLOG+44, CLAIMLOG+52*, CLAIMLOG+53, CLAIMLOG+56, CLAIMLOG+57
X1 CLAIMLOG+15~, CLAIMLOG+32*, CLAIMLOG+35, CLAIMLOG+40*, CLAIMLOG+45*, CLAIMLOG+52*, CLAIMLOG+53, CLAIMLOG+57
X2 CLAIMLOG+15~, CLAIMLOG+33*, CLAIMLOG+34, CLAIMLOG+35
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables |  All