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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: APSPVST

Package: IHS Changes To Pharmacy

Routine: APSPVST


Information

APSPVST ; IHS/DSD/ENM - CHECK PRESCRIPTION FILE FOR VMED LINKAGE ; [ 09/03/97 1:30 PM ]

Source Information

Source file <APSPVST.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
IHS Changes To Pharmacy 1 ^APSPVST1  
IHS VA Utilities 1 ^XBKVAR  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
DATE ;
EN ;
END
EOJ ;
FIX ;
RX ;
ASKX ;
ASK ;
START ;
INIT ;
ENX
CHECK ;

External References

Name Field # of Occurrence
^APSPVST1 FIX+2
^DIR ASK+2
^XBKVAR START+1, EN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,"No. of RX's Checked : ",?40,"No. of V Med's Created : ",!
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: APSPVST("COUNT"),?40,APSPVST("DLCOUNT"),$C(13)
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: !!,"All done ..."
  • Line Location: DATE+5
Function Call: WRITE
  • Prompt: APSPVST("COUNT"),?40,APSPVST("DLCOUNT"),$C(13)
  • Line Location: CHECK+2
Routine Call
  • DIR
  • Line Location:
    • ASK+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT("B" START+3
^PSRX - [#52] CHECK+4, CHECK+6, CHECK+7, INIT+2, INIT+4
^PSRX("AD" DATE+3, RX+2
^TMP("APSPVST" START+3

Label References

Name Line Occurrences
ASK START+5, EN+2
ASKX ASK+3
CHECK EN+4, RX+2
DATE START+7
END START+4, START+6
ENX EN+3
EOJ END, ENX
FIX EN+4, RX+2
INIT FIX+1
RX DATE+3

Naked Globals

Name Field # of Occurrence
^( RX+2
^(0 CHECK+4
^(999999911 CHECK+6, CHECK+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCDALVR FIX+2!, INIT+1!
APCDALVR("APCDCAT" INIT+7*
APCDALVR("APCDDATE" INIT+4*
APCDALVR("APCDLOC" INIT+5*
APCDALVR("APCDPAT" INIT+3*
APCDALVR("APCDTYPE" INIT+6*
APSPVST EOJ+1!
APSPVST("APCDTYPE" ASK+4*, INIT+6
APSPVST("BD" START+2*, START+3*, START+4, DATE+3
APSPVST("COUNT" DATE+2*, DATE+4, CHECK+1*, CHECK+2
APSPVST("DATE" DATE+3*, RX+2
APSPVST("DIFFLG" EN+4, RX+2, CHECK+3!, CHECK+6*, CHECK+7*
APSPVST("DLCOUNT" DATE+2*, DATE+4, CHECK+2, FIX+3*
APSPVST("IRXN" RX+2*, CHECK+4, CHECK+6, CHECK+7, INIT+2, INIT+4
APSPVST("PSDFN" CHECK+3!, CHECK+4*, CHECK+5, INIT+3
APSPVST("QFLG" START+6, EN+3, ASK+3*
APSPVST("RFN" RX+2*, CHECK+6, CHECK+7, INIT+4
APSPVST("RX0" INIT+2*, INIT+4, INIT+7
APSPVST("VDFN" CHECK+3!
APSPVST("VMDFN" CHECK+3!
BD ASK+3!
DIR ASK+3!
DIR("A" ASK+1*
DIR(0 ASK+1*
DIRUT ASK+3!
DTOUT ASK+3!
DUOUT ASK+3!
DUZ(2 INIT+5
ED ASK+3!
U CHECK+4, INIT+4, INIT+7
X ASK+4!
Y ASK+4!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All