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 |  All
Print Page as PDF
Routine: APCDEGP1

Package: Patient Care Component

Routine: APCDEGP1


Information

APCDEGP1 ; IHS/CMI/LAB - GROUP FORM DATA ENTRY ;

Source Information

Source file <APCDEGP1.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Patient Care Component 8 ^APCDALV  ^APCDALVR  ^APCDEA3  CHECK^APCDEGP0  EDITCHKS^APCDEGP2  ^APCDEQX  ^APCDEWHA  CHKEHR2^APCDVCHK  
IHS VA Utilities 1 ^XBFMK  
Kernel 1 ^%ZTLOAD  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component 1 APCDEGP  

Entry Points

Name Comments DBIA/ICR reference
GENVISIT ;
GETMNE ; GET MNEMONIC
MNEPROC ; PROCESS MNEMONICS UNTIL DONE
POV ;
PROV ;
GETMNEK ; KILL GETMNE SPECIFIC VARIABLES
SETPOV ;
XIT1
START ;
GENPOV ;
XIT ;
TSKMN ;for queueing when need to queue (call from setprov,setpov)
ERROR ;
SETEDUC ;
GENPRV ;
EDUC ;
SETPROV ;
GENEDUC ;

External References

Name Field # of Occurrence
^%ZTLOAD TSKMN+2
^APCDALV GENVISIT+11
^APCDALVR SETPOV+5, SETPROV+3, SETEDUC+12
^APCDEA3 GETMNE+6
CHECK^APCDEGP0 GETMNE+3
EDITCHKS^APCDEGP2 START+3
^APCDEQX GETMNE+7
^APCDEWHA START+11
CHKEHR2^APCDVCHK MNEPROC+2
^DIC XIT+5, GETMNE+2
^XBFMK XIT+4, XIT+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!,"adding visit to group file entry failed. Notify supervisor."
  • Line Location: XIT+6
Function Call: WRITE
  • Prompt: !,"Creating PCC Visit",!
  • Line Location: GENVISIT+8
Function Call: WRITE
  • Prompt: !,$C(7),"No Visit Selected",!
  • Line Location: GENVISIT+12
Function Call: WRITE
  • Prompt: !,$C(7),"Error encountered when creating visit!,"
  • Line Location: GENVISIT+13
Function Call: WRITE
  • Prompt: !,"Creating POV Record"
  • Line Location: GENPOV+1
Function Call: WRITE
  • Prompt: !,"Creating Provider Record"
  • Line Location: GENPRV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: GETMNE+1
Function Call: WRITE
  • Prompt: !!,"Switching to Modify Mode for ONE Mnemonic ONLY!"
  • Line Location: GETMNE+8
Function Call: WRITE
  • Prompt: !!,"Switching back to ENTER Mode!"
  • Line Location: GETMNE+8
Function Call: WRITE
  • Prompt: !,$C(7),"Template Missing - Notify Site Manager",!
  • Line Location: ERROR+1
Function Call: WRITE
  • Prompt: !,$C(7),"Error in V File Creation!"
  • Line Location: ERROR+2
Function Call: WRITE
  • Prompt: !,"Creating Patient Education Record"
  • Line Location: GENEDUC+1
Routine Call
  • DIC
  • Line Location:
    • XIT+5
    • GETMNE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^APCDTKW - [#9001001] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVPED - [#9000010.16] GENEDUC+2
^AUPNVPED("AD" GENEDUC+2
^AUPNVPOV - [#9000010.07] GENPOV+3
^AUPNVPOV("AD" GENPOV+3
^AUPNVPRV - [#9000010.06] GENPRV+2
^AUPNVPRV("AD" GENPRV+2
^DD(9001002.3 XIT+5
^TMP("APCDEGP" POV+1, SETPOV+2, SETPOV+3, PROV+1, SETPROV+1, SETPROV+2, EDUC+1, SETEDUC+1, SETEDUC+6, SETEDUC+7
, SETEDUC+10, SETEDUC+11

Label References

Name Line Occurrences
EDUC GENEDUC+3
ERROR SETPOV+6, SETPROV+4, SETEDUC+13
GENEDUC START+10
GENPOV START+8
GENPRV START+9
GENVISIT START+5
GETMNE MNEPROC+2, GETMNE+8
GETMNEK MNEPROC+3
MNEPROC START+13
POV GENPOV+4
PROV GENPRV+3
SETEDUC EDUC+1
SETPOV POV+1
SETPROV PROV+1
XIT1 START+4, START+6

Naked Globals

Name Field # of Occurrence
^("APCDTPOV" SETPOV+3
^("APCDTPRV" SETPROV+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCDALVR START+2!, START+12!, XIT1!, SETEDUC+2!
APCDALVR("APCDAFLG" GENVISIT+12!, GENVISIT+13!, SETPOV+1!, SETPOV+6, SETPROV+4, ERROR+1, ERROR+2, SETEDUC+13
APCDALVR("APCDATMP" GENPOV+2*, PROV+1*, SETEDUC+5*
APCDALVR("APCDCAT" GENVISIT+2*
APCDALVR("APCDCLN" GENVISIT+6*
APCDALVR("APCDDATE" GENVISIT+5*
APCDALVR("APCDLOC" GENVISIT+1*
APCDALVR("APCDNOK" GENVISIT+9*
APCDALVR("APCDPAT" GENVISIT+4*, GENVISIT+10*, SETEDUC+3*
APCDALVR("APCDTACC" SETPOV+1!, SETPOV+4*
APCDALVR("APCDTFR" SETPOV+3*
APCDALVR("APCDTIG" SETEDUC+9*
APCDALVR("APCDTLOU" SETEDUC+8*
APCDALVR("APCDTMIN" SETEDUC+10*
APCDALVR("APCDTNQ" SETPOV+3*
APCDALVR("APCDTOBJ" SETEDUC+11*
APCDALVR("APCDTPOV" SETPOV+3*
APCDALVR("APCDTPRO" SETPROV+2*, SETEDUC+7*
APCDALVR("APCDTPS" SETPROV+2*
APCDALVR("APCDTTOP" SETEDUC+6*
APCDALVR("APCDTYPE" GENVISIT+3*
APCDALVR("APCDVSIT" SETEDUC+4*
>> APCDCAT GENVISIT+2
>> APCDCLIN GENVISIT+6
>> APCDDATE GENVISIT+5
>> APCDEFLG START+4
APCDEG1 XIT1!, GENPOV+3*, GENPRV+2*, GENEDUC+2*
APCDEG2 XIT1!, GENPOV+3*, GENPRV+2*, GENEDUC+2*
>> APCDEGP("FORMS" XIT+2*
>> APCDEGP("VISIT" START+7*, XIT+2, XIT+5, XIT1!
APCDEGPR XIT1!, GENPOV+3!*, GENPRV+2!*, GENEDUC+2!*
APCDEGPR( GENPOV+3*, SETPOV+2, GENPRV+2*, SETPROV+1, GENEDUC+2*, SETEDUC+1
APCDEGX XIT1!, POV+1*, SETPOV+2, SETPOV+3, GETMNEK+1!, PROV+1*, SETPROV+1, SETPROV+2, EDUC+1*, SETEDUC+1
, SETEDUC+6, SETEDUC+7, SETEDUC+10, SETEDUC+11
APCDEGY XIT1!, TSKMN+1*
APCDEQX MNEPROC+2, GETMNE+7, GETMNEK+1!
>> APCDFID XIT+5
>> APCDLOC GENVISIT+1
>> APCDMNE GETMNE+4*
>> APCDMNE("NAME" GETMNE+4*
APCDMOD GETMNE+5!, GETMNE+8!
>> APCDMODE GETMNE+8*
APCDMPQ MNEPROC+1*, MNEPROC+2, MNEPROC+4!, GETMNE+7*
APCDNOXV GENVISIT+11*!
>> APCDPAT GENVISIT+4, GENVISIT+10, SETEDUC+3
APCDTACC XIT1!, SETPOV+4
>> APCDTYPE GENVISIT+3
APCDVDSP START+11*!
APCDVLK GETMNE+8*!
APCDVSIT START+6, START+7, START+11, GENVISIT+12!, GENVISIT+13!, GENPOV+3, GENPRV+2, GETMNE+8, GETMNEK+1!, GENEDUC+2
, SETEDUC+4
AUPNTALK START+12!
>> DA(1 XIT+5*
DIADD XIT+4!, XIT+7!
>> DIC XIT+5*, GETMNE+2*
>> DIC("A" GETMNE+2*!
>> DIC("P" XIT+5*
>> DIC("S" GETMNE+2*!
>> DIC(0 XIT+5*, GETMNE+2*
DLAYGO XIT+4!, XIT+7!
DT TSKMN+2
DUZ SETPOV+4
U XIT+5, GENPOV+3, SETPOV+2, SETPOV+3, GENPRV+2, GETMNE+4, SETPROV+1, SETPROV+2, GENEDUC+2, SETEDUC+1
, SETEDUC+6, SETEDUC+7, SETEDUC+10, SETEDUC+11
>> X XIT+5*
Y XIT+6, XIT1!, GETMNE+3, GETMNE+4
ZTDESC TSKMN+2*, TSKMN+3!
ZTDTH TSKMN+2*, TSKMN+3!
ZTIO TSKMN+2*, TSKMN+3!
ZTRTN TSKMN+2*, TSKMN+3!
ZTSAVE TSKMN+1!, TSKMN+3!
ZTSAVE( TSKMN+1*
ZTSK TSKMN+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 |  All