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

Package: Pharmacy Point of Sale

Routine: ABSPOSQ1


Information

ABSPOSQ1 ; IHS/FCS/DRS - POS background, Part 1 ; [ 11/04/2002 2:21 PM ]

Source Information

Source file <ABSPOSQ1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Pharmacy Point of Sale 5 TASK^ABSPOSIZ  (INIT,RELSLOT)^ABSPOSL  ONE59^ABSPOSQA  $$STAT19^ABSPOSQS  SETSTAT^ABSPOSU  
Kernel 1 ^%ZTLOAD  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Pharmacy Point of Sale 8 ABSPOS1  ABSPOS2D  ABSPOS6D  ABSPOS6L  ABSPOSAN  ABSPOSQ2  ABSPOSQ4  ABSPOSQA  

Entry Points

Name Comments DBIA/ICR reference
TASK ;EP - from ABSPOS2D,ABSPOS6D,ABSPOS6L,ABSPOSQ2,ABSPOSQ4
PACKETER ;EP - from ABSPOSAN,ABSPOSQA
; tell the packetizer it's time to get working
; But only if there are claims in status 30
SETSTAT(NEWSTAT)
NEXT59() ; Get the next entry with Status = 0
; If there is one, change its status to 10
; (says "Gathering claim information")
; (Being very careful to LOCK access while you're getting the entry
; and changing its status.)
; Timed lock and resulting complications is a hassle but not a mess.
TASKAT(ZTDTH)
LOOP ; line item detail: your work list is ^ABSPT("AD",0)

External References

Name Field # of Occurrence
^%DT TASK+1
^%ZTLOAD TASKAT+5
TASK^ABSPOSIZ NEXT59+8
INIT^ABSPOSL LOOP+17
RELSLOT^ABSPOSL LOOP+19
ONE59^ABSPOSQA LOOP+18
$$STAT19^ABSPOSQS LOOP+22
SETSTAT^ABSPOSU SETSTAT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSP(9002313.99 - [#9002313.99] LOOP+7
^ABSPT - [#9002313.59] NEXT59+6, NEXT59+11
^ABSPT("AD" LOOP+21, NEXT59+9, PACKETER+3

Label References

Name Line Occurrences
$$NEXT59 LOOP+16
PACKETER LOOP+24
SETSTAT NEXT59+10
TASK PACKETER+3
TASKAT TASK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT TASK+1~*
ABSBNDC LOOP+2~
ABSBPATI LOOP+3~
ABSBPDIV LOOP+3~
ABSBRXI LOOP+2~, SETSTAT+1~*
ABSBRXR LOOP+2~
ABSBSDIV LOOP+3~
ABSBVISI LOOP+3~
ABSPHARM LOOP+3~
APCDVCN LOOP+4~
COUNT LOOP+1~, LOOP+15*, LOOP+23*, LOOP+24
ERROR LOOP+1~
IEN59 LOOP+2~, LOOP+16*, LOOP+17, NEXT59+9*, NEXT59+10, NEXT59+12, SETSTAT+1
INSURER LOOP+3~
MODULO LOOP+2~, LOOP+14*, LOOP+24
NEWSTAT SETSTAT~, SETSTAT+2
PACKETER LOOP+1~*, TASK+3*
PREVPAT LOOP+1~
THISPAT LOOP+1~
VMEDDFN LOOP+4~
X TASK+1~*
Y TASK+1~, TASK+2
ZTDTH TASKAT~
ZTIO TASKAT+3~, TASKAT+4*
>> ZTQUEUED LOOP+10
>> ZTREQ LOOP+10*
ZTRTN TASKAT+3~, TASKAT+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All