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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABSPOSQ2

Package: Pharmacy Point of Sale

Routine: ABSPOSQ2


Information

ABSPOSQ2 ; IHS/FCS/DRS - form transmission packets ; [ 11/07/2002 6:57 AM ]

Source Information

Source file <ABSPOSQ2.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Pharmacy Point of Sale 6 LOG59^ABSPOSQ  TASK^ABSPOSQ1  STATUS31^ABSPOSQF  $$PACKET^ABSPOSQG  (SETRESU,SETSTAT)^ABSPOSU  IMPOSS^ABSPOSUE  
VA Fileman 2 ^%DT  NOW^%DTC  
Kernel 1 ^%ZTLOAD  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Pharmacy Point of Sale 6 ABSPOS2D  ABSPOSAP  ABSPOSC3  ABSPOSQF  ABSPOSQG  ABSPOSQJ  

Entry Points

Name Comments DBIA/ICR reference
NOW()
SETSTAT(NEWSTAT) ;EP - ABSPOSQF ; given IEN59
KSCRATCH ;EP - ABSPOSQG ; Kill scratch globals
NEXT59(X) ;EP - ABSPOSQF
CHKPA2() ;---------------------------------------------------------------
; IHS/SD/lwj 8/30/02 NCPDP 5.1
N59A
UNLOCK59 ;EP - ABSPOSQF
CHKPA() ;---------------------------------------------------------------
PACKETS ; construct packets for transmission to NDC
; your work list is ^ABSPT("AD",30)
SETRESU(RESCODE,TEXT)
LOCK59() ;EP - ABSPOSQF
TASK ;EP - ABSPOS2D,ABSPOSAP,ABSPOSC3,ABSPOSQG
TASKAT(ZTDTH) ;EP - ABSPOSQJ
POINTX
STATUS30 ; given STATUS30=30

External References

Name Field # of Occurrence
^%DT TASK+2
NOW^%DTC NOW
^%ZTLOAD TASKAT+9
LOG59^ABSPOSQ N59A+16
TASK^ABSPOSQ1 PACKETS+19
STATUS31^ABSPOSQF PACKETS+11
$$PACKET^ABSPOSQG POINTX+6
SETRESU^ABSPOSU SETRESU+2
SETSTAT^ABSPOSU SETSTAT+2
IMPOSS^ABSPOSUE STATUS30+31

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSP(9002313.511 - [#9002313.511] CHKPA+24, CHKPA+25
^ABSPECX($J KSCRATCH+1!, KSCRATCH+2!
^ABSPEI - [#9002313.4] N59A+5, N59A+6, N59A+24
^ABSPF(9002313.91 - [#9002313.91] CHKPA+26
^ABSPT - [#9002313.59] N59A+3, N59A+11, N59A+13, N59A+14*, N59A+24*, N59A+25*, STATUS30+8, STATUS30+21, STATUS30+24, CHKPA+19
, CHKPA2+14, CHKPA2+15
^ABSPT("AD" PACKETS+12, PACKETS+15, LOCK59+1, UNLOCK59+1, N59A

Label References

Name Line Occurrences
$$CHKPA2 STATUS30+15
$$LOCK59 STATUS30+2
$$NEXT59 STATUS30+3, STATUS30+23
$$NOW N59A+17
N59A N59A+26
POINTX STATUS30+8, STATUS30+15
SETRESU POINTX+18
SETSTAT N59A+15, N59A+23, STATUS30+6, STATUS30+32, POINTX+17, POINTX+20
STATUS30 PACKETS+12
TASKAT TASK+3
UNLOCK59 POINTX+21

Naked Globals

Name Field # of Occurrence
^(1 STATUS30+21, STATUS30+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% NOW~
%DT TASK+1~, TASK+2*
%H NOW~
%I NOW~
ABSBRXI SETSTAT+1~*, SETRESU+1~*
ERROR PACKETS+9~, POINTX+6*, POINTX+16, POINTX+18
IEN59 SETSTAT+1, SETRESU+1, N59A+15~*, N59A+16, N59A+23~*, N59A+24, N59A+25, STATUS30+1~*, STATUS30+3*, STATUS30+5
, STATUS30+8, STATUS30+21, STATUS30+22~*, STATUS30+23*, STATUS30+24, STATUS30+33, POINTX+15*, CHKPA+19, CHKPA2+14, CHKPA2+15
INS NEXT59+1~, N59A+3*, N59A+4, N59A+5, N59A+6, N59A+24, N59A+25
NCPDPF CHKPA+16~, CHKPA+25*, CHKPA+26
NCPDPFN CHKPA+16~, CHKPA+26*, CHKPA+27
NEEDQ1 PACKETS+15~*, PACKETS+19
NEWSTAT SETSTAT~, SETSTAT+2
OVRFLD CHKPA+16~, CHKPA+23*, CHKPA+24*, CHKPA+25
OVRREC CHKPA+16~, CHKPA+19*, CHKPA+20, CHKPA+24, CHKPA+25
PACLM CHKPA+16~, CHKPA+17*, CHKPA+28*, CHKPA+30, CHKPA2+12*, CHKPA2+16*, CHKPA2+18
PANUM CHKPA2+11~, CHKPA2+15*, CHKPA2+16
PATYP CHKPA2+11~, CHKPA2+14*, CHKPA2+16
RA0 STATUS30+21~*, STATUS30+27
RA1 STATUS30+21~*, STATUS30+28
RB0 STATUS30+24~*, STATUS30+27, STATUS30+29, STATUS30+30, STATUS30+31
RB1 STATUS30+24~*, STATUS30+28
RESCODE SETRESU~, SETRESU+2
RXILIST PACKETS+10~, STATUS30+4!
RXILIST( STATUS30+5*, STATUS30+33*, POINTX+15
SILENT PACKETS+9~*
STATUS30 PACKETS+10~, PACKETS+12*, LOCK59+1, UNLOCK59+1, N59A, N59A+22, STATUS30+30
T NEXT59+1~, N59A+6*, N59A+7, N59A+13, N59A+14, N59A+16, N59A+17
TEXT SETRESU~, SETRESU+2
U N59A+3, N59A+6, N59A+13, N59A+14, N59A+24, N59A+25, STATUS30+27, STATUS30+28, STATUS30+29, STATUS30+30
, STATUS30+31, POINTX+18, CHKPA+19, CHKPA+25, CHKPA+26, CHKPA2+14, CHKPA2+15
X NEXT59~, N59A*, N59A+1, N59A+3, N59A+4, N59A+5, N59A+7, N59A+11, N59A+13, N59A+14
, N59A+15, N59A+17, N59A+23, NOW~, TASK+1~, TASK+2*
Y TASK+1~, TASK+3
ZTDTH TASKAT~
ZTIO TASKAT+6~, TASKAT+7*
ZTRTN TASKAT+6~, TASKAT+7*
ZTSAVE TASKAT+6~
ZTSAVE("DIALOUT" TASKAT+8*

Marked Items

Name Field # of Occurrence
$T( STATUS30+31
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All