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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: APCDEH

Package: Patient Care Component

Routine: APCDEH


Information

APCDEH ; IHS/CMI/LAB - NO DESCRIPTION PROVIDED 21-SEP-1996 ;

Source Information

Source file <APCDEH.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA Fileman 4 ^%DT  ^%DTC  ^DIC  YN^DICN  
Patient Care Component 3 INAC^APCDEA  ^APCDEIN  (EN,EN2)^APCDEKL  
Kernel 2 $$FMTE^XLFDT  DISP^XQORM1  
Registration 2 EN^VALM  ($$FTIME,CLEAR,FULL)^VALM1  
IHS Patient 1 KILL^AUPNPAT  
IHS VA Utilities 1 ^XBFMK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component 1 APCDEH1  

Entry Points

Name Comments DBIA/ICR reference
HELP ; -- help code
EN ;PEP -- main entry point for APCDEHM PCC DATA ENTRY
HDR ;EP -- header code
GETLOC ; GET LOCATION
EOJ ;
GETPAT ; GET PATIENT
START ;
EXPND ; -- expand code
INIT3 ;EP
TEXT ;
EXIT ; -- exit code
GETDATE ; GET DATE

External References

Name Field # of Occurrence
^%DT GETDATE+1
^%DTC GETDATE+4
INAC^APCDEA GETPAT+8
^APCDEIN START+11, EN+7
EN^APCDEKL EOJ+2
EN2^APCDEKL EOJ+3
KILL^AUPNPAT EOJ+7
^DIC GETLOC+1, GETPAT+4
YN^DICN GETPAT+6
EN^VALM EN+8
$$FTIME^VALM1 HDR+1
CLEAR^VALM1 EN+9
FULL^VALM1 START+12
^XBFMK EN+11, EOJ+4
$$FMTE^XLFDT HDR+2
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?80-$L(X)\2,X
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!,"No PATIENT selected!"
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!,"No location entered!!"
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !!,"No date entered!!"
  • Line Location: START+10
Function Call: WRITE
  • Prompt: !
  • Line Location: GETPAT+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Routine Call
  • VALM
  • Line Location:
    • EN+8
Routine Call
  • DIC
  • Line Location:
    • GETLOC+1
    • GETPAT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^AUTTLOC - [#9999999.06] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCDSITE - [#9001001.2] GETPAT+3
^APCDTKW - [#9001001] INIT3+5, INIT3+6, INIT3+7
^APCDTKW("ANVI" INIT3+2
^AUPNPAT - [#9000001] HDR+1
^DPT - [#2] EN+6, HDR+1
^TMP("APCDEH" EN+10!, INIT3+1!, INIT3+5*, INIT3+6*, INIT3+7*

Label References

Name Line Occurrences
EN START+12
EOJ START+6, START+8, START+10, START+13
EXIT START+12
GETDATE START+9
GETLOC START+7
GETPAT START+5

Naked Globals

Name Field # of Occurrence
^(0 INIT3+5, INIT3+6, INIT3+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % GETPAT+6*
>> %DT GETDATE+1*
>> %DT("A" GETDATE+1*
APCDANS EXIT+1!, EOJ+5!
APCDC EXIT+1!, EOJ+5!
APCDCNTL EN+10!
APCDCRIT EXIT+1!
APCDCSEL EN+10!
APCDCSEL( INIT3+5, INIT3+6, INIT3+7
APCDCUT EN+10!, INIT3+3*, INIT3+6, INIT3+7, EXIT+1!, EOJ+5!
>> APCDDATE START+10, GETDATE+1*, GETDATE+3*, GETDATE+4
APCDDISP EN+10!, INIT3+1!, INIT3+8!, EOJ+5!
APCDDISP( INIT3+4, INIT3+5*, INIT3+6*, INIT3+7*
APCDHIGH EN+10!, INIT3+1!, INIT3+2*, INIT3+3, EOJ+5!
APCDI EXIT+1!, EOJ+5!
>> APCDLOC START+8, GETLOC+1*, GETLOC+3*
APCDLOOK EXIT+1!
APCDMNE EXIT+1!
APCDMOD EXIT+1!
APCDMODE EXIT+1!
APCDOTHR INIT3+8!
APCDPAT START+5*, START+6, START+12!, GETPAT+2*, GETPAT+7*, GETPAT+8*, EN+5, EN+6, HDR+1, EOJ+5!
APCDSEL EN+10!, INIT3+1!, EXIT+1!, EOJ+5!
APCDSEL( INIT3+2*, INIT3+4, INIT3+5, INIT3+6, INIT3+7
APCDTEXT EXIT+1!
APCDVLK EXIT+1!
APCDVSIT EOJ+5!
APCDX EXIT+1!
APCDY EXIT+1!
APCHIGH EXIT+1!
>> AUPNDAYS GETDATE+4*
>> AUPNDOB GETDATE+4, HDR+1
>> AUPNLK("INAC" GETPAT+3*
C EN+10!, INIT3+4*, INIT3+5*, INIT3+6, INIT3+7, INIT3+9, EOJ+6!
DIC GETLOC+1*, GETPAT+4*!
DIC(0 GETLOC+1*, GETPAT+4*
DISP EXIT+1!
DT HDR+2
DUZ(2 GETPAT+3, HDR+1
I EN+10!, INIT3+4*, INIT3+5, INIT3+6, EOJ+6!
IOF START+1
>> IOINORM HDR+1
>> IORVON HDR+1
J START+2*, START+3!, EN+10!, INIT3+4*, INIT3+6*, INIT3+7
K EN+10!, INIT3+4*, INIT3+7*
U GETPAT+3, HDR+1, INIT3+5, INIT3+6, INIT3+7
VALMCNT INIT3+9*, EOJ+1!
VALMHDR EOJ+1!
VALMHDR(2 HDR+1*
VALMHDR(3 HDR+2*
X START+2*, START+3!, GETDATE+4, GETPAT+8, EN+10!, INIT3+2*, HELP+1*, EOJ+6!
>> X1 GETDATE+4*
>> X2 GETDATE+4*
Y GETLOC+2, GETLOC+3, GETDATE+2, GETDATE+3, GETPAT+5, GETPAT+7, INIT3+2*, EOJ+6!

Marked Items

Name Field # of Occurrence
$T(TEXT+J START+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All