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

Package: Patient Care Component

Routine: APCDLIM


Information

APCDLIM ; IHS/CMI/LAB - LIST IMMUNIZATION DATA ;

Source Information

Source file <APCDLIM.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA Fileman 5 ^%DT  EN^DDIOL  ^DIC  FILE^DICN  ^DIE  
Kernel 2 ($$FMDIFF,$$NOW)^XLFDT  $$REPEAT^XLFSTR  
Patient Care Component 2 $$BI^APCHS11C  GETSITEV^APCHSUTL  
IHS Patient 1 $$DOB^AUPNPAT  
Immunization Tracking 1 IMMHX^BIRPC  

Entry Points

Name Comments DBIA/ICR reference
DISP ;
IMMBI ;IHS/CMI/LAB - new subroutine for new imm package
HX ;
IMMUN ; ******************** IMMUNIZATIONS * 9000010.11 *******
PAD(D,L,C) ;EP
CREATE(APCDV,APCDP) ;
IMMDTYP
IMM ;
IMMDSP2
IMMDSP
GETIMM ;EP - called from APCD IM (ADD) template
AGE(DFN,D,F) ;(DFN) Given DFN, return Age. ; AUPN*93.2*3
IMMGSET
HSIMM ;EP - called from xbnew
DATE ;
GETSITE ;
DISP2 ;

External References

Name Field # of Occurrence
^%DT HX+16
$$BI^APCHS11C IMMUN+1
GETSITEV^APCHSUTL IMMDSP2+2
$$DOB^AUPNPAT AGE+3, AGE+7
IMMHX^BIRPC HX+5
EN^DDIOL HX+9
^DIC CREATE+2
FILE^DICN CREATE+6
^DIE CREATE+8
$$FMDIFF^XLFDT AGE+7
$$NOW^XLFDT CREATE+8
$$REPEAT^XLFSTR PAD+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10,"Immunization Record",!
  • Line Location: APCDLIM+3
Function Call: WRITE
  • Prompt: !,APCDLIM("IMM NAME")
  • Line Location: IMM+1
Function Call: WRITE
  • Prompt: ?(APCDLIM("IMM NAME LNTH")+4),$P(^AUPNVIMM(APCDLIM("DFN"),0),U,4),?17,APCDLIM("PRINT DATE")," ",APCDLIM("SITE"),!
  • Line Location: DISP2+3
Function Call: WRITE
  • Prompt: ?(APCDSITL+1),$P(^AUPNVIMM(APCDSDFN,0),U,4),?20,APCDSDAT,?28,$$AGE(APCDTP,$P(+^AUPNVSIT(APCHSVDF,0),"."),"P"),?37,APCDSITE,?65,APCDSIR,!
  • Line Location: IMMDSP2+8
Function Call: WRITE
  • Prompt: !?3,"IMMUNIZATION HISTORY:",!
  • Line Location: HX+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HX+15
Function Call: WRITE
  • Prompt: ?22,"Reaction: ",$P(APCDY,APCDV,6),!
  • Line Location: HX+20
Function Call: WRITE
  • Prompt: !!,APCDX," Immunization entry failed."
  • Line Location: GETIMM+2
Routine Call
  • DIE
  • Line Location:
    • CREATE+8
Routine Call
  • DIC
  • Line Location:
    • CREATE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVIMM - [#9000010.11] Classic Fileman Calls
^AUTTIMM - [#9999999.14] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVIMM - [#9000010.11] DISP2+2, DISP2+3, IMMDSP2+1, IMMDSP2+8
^AUPNVIMM("AA" APCDLIM+4, DATE+1, DISP+1, IMMUN+3, IMMUN+6, IMMDTYP, IMMDSP
^AUPNVSIT - [#9000010] GETSITE+1, GETSITE+3, IMMDSP2+8
^AUTTIMM - [#9999999.14] IMM+1, IMMDTYP
^DD(9000010.11 IMMGSET
^DIC(4 - [#4] GETSITE+2
^DPT - [#2] AGE+2

Label References

Name Line Occurrences
$$AGE IMMDSP2+8, HX+19
$$CREATE GETIMM+1
DATE IMM+1
DISP DATE+1
DISP2 DISP+1
GETSITE DISP2+2
IMM APCDLIM+4
IMMBI IMMUN+1
IMMDSP IMMDTYP
IMMDSP2 IMMDSP
IMMDTYP IMMUN+6
IMMGSET IMMDSP2+3, IMMDSP2+4

Naked Globals

Name Field # of Occurrence
^(21 GETSITE+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% AGE+6~, AGE+7*, AGE+8, AGE+11*, AGE+13
%1 AGE+11~*
%DT HX+16!*
>> APCD31 IMMBI+1*, HX+8, HX+10
APCDBIDE HX+3~, HX+5, HX+23!
APCDBIDE( HX+3*
>> APCDBIER HX+8*, HX+9
APCDI HX+11~, HX+13*
APCDIMM IMMBI+1*, HX+5, HX+8, HX+10*, HX+13, HX+23!
APCDLIM APCDLIM+5!
APCDLIM("DATE" DATE+1*, DISP+1, DISP2+1
APCDLIM("DFN" DISP+1*, DISP2+2, DISP2+3
APCDLIM("IMM NAME LNTH" , IMM+1*, DISP2+3, NAME" , IMM+1*
APCDLIM("IMM" APCDLIM+4*, IMM+1, DATE+1, DISP+1
APCDLIM("PRIN T DATE" , DISP2+1*, DISP2+3
APCDLIM("SITE" DISP2+3, GETSITE+1*, GETSITE+2*, GETSITE+3*, GETSITE+4*
APCDLIM("VISIT" DISP2+2*, GETSITE+1, GETSITE+3
APCDP CREATE~, CREATE+5
>> APCDPAT APCDLIM+4, DATE+1, DISP+1, GETIMM+1
>> APCDSDAT IMMDSP2*, IMMDSP2+8
APCDSDFN IMMUN+5~, IMMDSP*, IMMDSP2+1, IMMDSP2+8
APCDSDG HX+16~*, HX+19
APCDSIC IMMUN+5~, IMMDSP2+4*, IMMDSP2+5, IMMDSP2+6
APCDSIR IMMUN+5~, IMMDSP2+3*, IMMDSP2+5*, IMMDSP2+6*, IMMDSP2+8
APCDSITE IMMUN+5~, IMMDSP2+2*, IMMDSP2+8
APCDSITL IMMUN+5~, IMMDTYP*, IMMDSP2+8
APCDSITP IMMUN+5~, IMMUN+6*, IMMDTYP, IMMDSP
APCDSITX IMMUN+5~, IMMDTYP*
APCDSIVD IMMUN+5~, IMMDTYP*, IMMDSP, IMMDSP2
APCDSN IMMUN+5~, IMMDSP2+1*, IMMDSP2+2, IMMDSP2+3, IMMDSP2+4
APCDSP IMMUN+5~, IMMDSP2+3, IMMDSP2+4, IMMGSET+2*
APCDSQ IMMUN+5~, IMMUN+6*, IMMDTYP*, IMMDSP*, IMMGSET+2*
>> APCDSQIT HX+13
>> APCDTP IMMUN+3, IMMUN+6, IMMDTYP, IMMDSP, IMMDSP2+8, HX+5, HX+19
APCDV HX+11~, HX+12*, HX+14, HX+15, HX+16, HX+19, HX+20, HX+23!, CREATE~, CREATE+5
>> APCDVSIT GETIMM+1
APCDX HX+11~, GETIMM+1*, GETIMM+2, GETIMM+3!
APCDY HX+11~, HX+13*, HX+14, HX+15, HX+16, HX+19, HX+20, HX+23!
APCDZ HX+11~, HX+12*, HX+15*, HX+23!
APCHSITE IMMUN+8!
APCHSNAB IMMUN+8!
APCHSNFL IMMUN+8!
APCHSNSH IMMUN+5~, IMMUN+8!, IMMDSP2+2
APCHSP IMMUN+8!
APCHSVDF IMMUN+5~, IMMUN+8!, IMMDSP2+2*, IMMDSP2+8
APCHSVSC IMMUN+8!
C PAD~, PAD+11*, PAD+12
D AGE~, AGE+4*, AGE+7, PAD~, PAD+9, PAD+10, PAD+12
>> DA CREATE+8*
DFN AGE~, AGE+1, AGE+2, AGE+3, AGE+7
DIADD CREATE+5*, CREATE+6!
DIC CREATE+1!, CREATE+2*, CREATE+4!, CREATE+5*, CREATE+6!
DIC("DR" CREATE+5*
DIC("S" CREATE+2*
DIC(0 CREATE+2*, CREATE+5*
>> DIE CREATE+8*
DLAYGO CREATE+5*, CREATE+6!
DR CREATE+6!, CREATE+8*
DT AGE+4
F AGE~, AGE+5*, AGE+8
I HX+3~*
L PAD~, PAD+10*, PAD+12
U IMM+1, DISP2+2, DISP2+3, GETSITE+1, GETSITE+2, GETSITE+3, IMMDTYP, IMMDSP2+2, IMMDSP2+3, IMMDSP2+4
, IMMDSP2+8, IMMGSET, HX+13
X IMMDSP2+3*, IMMDSP2+4*, IMMGSET+1, IMMGSET+2, HX+16~*, CREATE+5*
Y DISP2+1*!, IMMDSP2*, IMMDSP2+3*, IMMDSP2+4*, IMMGSET*, IMMGSET+1*, IMMGSET+2, HX+16, GETIMM+3!, CREATE+3
, CREATE+5, CREATE+7, CREATE+8
Info |  Source |  Call 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