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 |  Local Variables |  All
Print Page as PDF
Routine: ADGPCAC0

Package: IHS Changes To ADT

Routine: ADGPCAC0


Information

ADGPCAC0 ; IHS/ADC/PDW/ENM - ADT/PCC DATA ENTRY ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ADGPCAC0.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 4 ^%DTC  ^DIC  ^DIE  ^DIR  
IHS Changes To ADT 2 (APCDCHK,APCDEA3)^ADGCALLS  ^ADGPCAC1  
Registration 2 ASK^DGPMEX  ENEX^DGPMV20  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Changes To ADT 1 ADGPCAC  

Entry Points

Name Comments DBIA/ICR reference
VC ; -- visit check
VH() ; -- v hospitalization ien
Q ; -- cleanup
MOD() ;
LOCKOUT(DATE) ;EP -- called to check lock out date
; -- returns 1 if admission is locked
; -- called by DGPMEX,DGPMV21
FUN ; -- function
PCC ; -- set mnemonic and call PCC data entry rtn
CA() ; -- corresponding admission
SF ; -- select function

External References

Name Field # of Occurrence
^%DTC LOCKOUT+4
APCDCHK^ADGCALLS VC+1
APCDEA3^ADGCALLS PCC+5
^ADGPCAC1 ADGPCAC0+3, FUN+11
ASK^DGPMEX FUN+10
ENEX^DGPMV20 FUN+10
^DIC PCC+4
^DIE FUN+6
^DIR SF+6, FUN+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: SF+1
Function Call: WRITE
  • Prompt: !,"No admissions on file",!
  • Line Location: FUN+2
Function Call: WRITE
  • Prompt: !,*7,"SOMEONE ELSE IS UPDATING THIS HOSPITALIZATION"
  • Line Location: FUN+4
Function Call: WRITE
  • Prompt: "; TRY AGAIN LATER"
  • Line Location: FUN+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FUN+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: FUN+12
Routine Call
  • DIE
  • Line Location:
    • FUN+6
Routine Call
  • DIC
  • Line Location:
    • PCC+4
Routine Call
  • DIR
  • Line Location:
    • SF+6
    • FUN+16

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVINP - [#9000010.02] FUN+3, FUN+7
^AUPNVINP("AD" VH+1
^AUPNVSIT - [#9000010] CA+1
^DG(43 - [#43] LOCKOUT+5
^DGPM - [#405] FUN+8
^DGPM("AMV1" CA+1
^DGPM("APTT1" FUN+2
^DISV( FUN+10*

Label References

Name Line Occurrences
$$CA FUN+8
$$MOD FUN+14, FUN+15
$$VH FUN+3, FUN+6, FUN+7
FUN PCC+4, PCC+6
SF SF+6, FUN+1, FUN+3, FUN+11, FUN+17
VC SF+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCDCAT ADGPCAC0+4*
>> APCDLOC ADGPCAC0+5*
>> APCDMNE PCC+5*
>> APCDMNE("NAME" PCC+5*
>> APCDMODE FUN+16*, FUN+17
>> APCDPAT ADGPCAC0+4*, FUN+9, FUN+10*
>> APCDTYPE ADGPCAC0+4*
>> APCDVLK ADGPCAC0+5*
>> APCDVSIT ADGPCAC0+4*, VC+1*
>> DA FUN+6*
DATE LOCKOUT~, LOCKOUT+4
>> DFN ADGPCAC0+4, FUN+2, FUN+10*, CA+1
DGF SF+6*, FUN+1, FUN+11, FUN+13, PCC+2, PCC+3, Q+1!, MOD+1
DGPMAN FUN+8~*
DGPMCA FUN+8~*, FUN+10
DGPMEX FUN+8~
>> DGVI ADGPCAC0+4, ADGPCAC0+5, VC+1, VH+1, CA+1
DGZDFN FUN+9*, FUN+10!
DIC FUN+6!, PCC+1*, PCC+4!, Q+1!
DIC("A" PCC+2*
DIC("S" PCC+4*
DIC(0 PCC+1*, PCC+2*
DIE FUN+6!*
DIR SF+1!, FUN+12!
DIR("A" SF+1*, SF+2*, SF+3*, SF+4*, SF+5*, FUN+12*, FUN+13*, FUN+14*, FUN+15*
DIR(0 SF+1*, FUN+12*
>> DIRUT SF+6
>> DR FUN+6*
DT LOCKOUT+4
DUZ FUN+10
DUZ(2 ADGPCAC0+5
IOF FUN+11
U PCC+5, LOCKOUT+5
X PCC+3*, Q+1!, LOCKOUT+3~, LOCKOUT+5
X1 LOCKOUT+3~, LOCKOUT+4*
X2 LOCKOUT+3~, LOCKOUT+4*
Y SF+6, FUN+16, PCC+4, PCC+5, Q+1!
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 |  Local Variables |  All