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: BYIMIMM1

Package: IHS Immunizations Interface

Routine: BYIMIMM1


Information

BYIMIMM1 ;IHS/CIM/THL - IMMUNIZATION DATA EXCHANGE;

Source Information

Source file <BYIMIMM1.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
IHS Immunizations Interface 4 (INSET,KILL,MATCH,NCNT)^BYIMIMM2  DIRECT^BYIMIMM3  (LOG,LOT)^BYIMIMM4  (ADDLOT,NOPATH,PATH,PAUSE)^BYIMIMM6  
VA Fileman 4 ^DIC  FILE^DICN  ^DIE  ^DIR  
Registration 3 EN^VALM  TERM^VALM0  CLEAR^VALM1  
Immunization Tracking 2 ADDEDIT^BIRPC3  ADDLOT^BIRPC5  
Kernel 1 ($$OPEN,$$STATUS,CLOSE)^%ZISH  
MailMan 1 ^XMB  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Immunizations Interface 3 BYIMIMM2  BYIMIMM4  BYIMRT  

Entry Points

Name Comments DBIA/ICR reference
CONVERT ;CONVERT INACTIVE VACCINE TO ACTIVE EQUIVALENT
NEWIMM ;ADD NEW IMMUNIZATION
HDR ;EP;FOR LIST HEADER
S1 ;FOR AUTOADD TO SET ADD ARRAY
DIRECT ;DIRECT FIND OF PATIENT
FMINIT ;EP;PUT NEW IMMUNIZATIONS INTO TMP STORAGE FOR
DEL ;EP;DEL IMMUNIZATIONS FROM THE STATE REGISTRY LIST
FILE ;ENTER FILE NAME OF IMPORT FILE
NI1 ;NEW IMMUNIZATION
FM ;SET DISPLAY GLOBAL
SELECT ;SELECT CHILD TO ADD
SET ;EP;ID PATIENTS AND SET NEW IMMUNIZATIONS
ADDIM ;EP;PROCESS ADDITIONAL IMPORT FILES
I1 ;EP;FOR AUTO IMPORT MODE
IN(IPATH,FILE) ;EP;TO PROCESS INCOMING FILE
LOCIN(LOC) ;PROCESS LOCATION DATA FOR FACILITY NAME OR CODE
ADDIM1 ;PROCESS EACH ADDIONAL IMPORT SITE
VALM(BYIMVALM) ;EP; -- main entry point for list templates
IMPORT ;EP;IMMUNIZATION IMPORT
PADD ;EP;TO ADD PARAMETER SITE
VISIT ;FIND OR CREATE VISIT
READ(IPATH,FILE)
IMM ;COMPARE INCOMING IMMUNIZATIONS WITH EXISTING IMMUNIZATIONS
PARAM ;EP;TO UPDATE PARAMETERS
BACK
START ;EP;
ADD ;EP;ADD NEW IMMUNIZATIONS FROM THE STATE REGISTRY
ID ;ID PATIENT
DUZ ;SET DUZ FOR VISIT 'CREATED BY USER'
SET1(INHDA) ;EP;TO PROCESS INCOMING HL7 MESSAGE

External References

Name Field # of Occurrence
$$OPEN^%ZISH I1+1, READ+5
$$STATUS^%ZISH READ+14
CLOSE^%ZISH I1+8, READ+15
ADDEDIT^BIRPC3 VISIT+18
ADDLOT^BIRPC5 NI1+34, NI1+36, NI1+37
INSET^BYIMIMM2 READ+14
KILL^BYIMIMM2 IMM+30, NI1+54
MATCH^BYIMIMM2 IN+8, ADDIM1+8
NCNT^BYIMIMM2 I1+20
DIRECT^BYIMIMM3 DIRECT+1
LOG^BYIMIMM4 IN+7, ADDIM1+7
LOT^BYIMIMM4 NI1+38
ADDLOT^BYIMIMM6 VISIT+44
NOPATH^BYIMIMM6 FILE+3
PATH^BYIMIMM6 FILE+2, IMPORT+4, PARAM+10
PAUSE^BYIMIMM6 I1+7, VISIT+41
^DIC ID+23, ID+34, ID+42, PADD+9
FILE^DICN ID+55, DUZ+9
^DIE PARAM+9
^DIR FILE+9, I1+16, SELECT+7
EN^VALM VALM+4
TERM^VALM0 VALM+2
CLEAR^VALM1 ADD+4, VALM+3, VALM+5
^XMB VISIT+34

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: FILE+8
Function Call: WRITE
  • Prompt: "/"
  • Line Location: SET1+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SELECT+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PARAM+6
Function Call: WRITE
  • Prompt: !!,"UPDATE Data Exchange Parameters for ",$P(^DIC(4,DA,0),U)
  • Line Location: PARAM+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PARAM+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PADD+6
Function Call: WRITE
  • Prompt: !!,"ADD Data Exchange Parameter Site"
  • Line Location: PADD+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PADD+8
Routine Call
  • VALM
  • Line Location:
    • VALM+4
Routine Call
  • DIE
  • Line Location:
    • PARAM+9
Routine Call
  • DIC
  • Line Location:
    • ID+23
    • ID+34
    • ID+42
    • PADD+9
Routine Call
  • DIR
  • Line Location:
    • FILE+9
    • I1+16
    • SELECT+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^VA(200 - [#200] Classic Fileman Calls
^BYIMPARA - [#90480] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] ID+59, ID+63
^AUPNVIMM - [#9000010.11] IMM+25
^AUPNVIMM("AC" IMM+24
^AUPNVSIT - [#9000010] IMM+26
^AUTTIML - [#9999999.41] NI1+41, NI1+46*, VISIT+22
^AUTTIMM - [#9999999.14] VISIT+28, FM+5
^AUTTIMM("C" NI1+52, FM+3
^AUTTLOC("C" ID+14
^BISITE - [#9002084.02] LOCIN+7
^BYIMPARA - [#90480] SET+1, ADDIM+4, ADDIM+5
^BYIMPARA("NMNAME" ID+48
^BYIMPARA("RXA" LOCIN+3, LOCIN+4
^BYIMTMP($J READ+11!, READ+16, READ+18!, SET+3, NI1+3, NI1+50!, FMINIT+1!, FM+4*, FM+6*, FM+15*
, FM+16*, HDR+1*, HDR+8*, HDR+15*, VALM+6!
^BYIMXTMP("BYIM" SET+5, IMM+18*, IMM+22*, IMM+29!, NI1+49!, FMINIT+5, FMINIT+7, FMINIT+9, FMINIT+11, FMINIT+13
^DIC(4 - [#4] PARAM+7, PADD+5, LOCIN+5, LOCIN+6, LOCIN+7, LOCIN+8, LOCIN+11, LOCIN+15, LOCIN+16
^DPT - [#2] ID+68, VISIT+27
^INTHU - [#4001] ID+5, IMM+3
^VA(200 - [#200] DUZ+4

Label References

Name Line Occurrences
ADDIM IN+9
ADDIM1 ADDIM+7
BACK FMINIT+16
CONVERT IMM+10, NI1+21
DIRECT ID+45
DUZ VISIT+3
FILE IMPORT+2
FM FMINIT+13
FMINIT SET+6
ID SET1+1
IMM SET1+4
IN I1+21
LOCIN VISIT+4
NEWIMM ADD+5
NI1 NEWIMM+6
PADD PARAM+2
READ IN+5, ADDIM1+5
S1 IN+6, ADDIM1+6
SELECT ADD+2
SET READ+17
SET1 SET+3
VALM START+2
VISIT NI1+43

Naked Globals

Name Field # of Occurrence
^( ID+5, IMM+3, FMINIT+13
^(0 ID+5, NI1+41*, VISIT+27, LOCIN+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%X VISIT+25~
%Y VISIT+25~
A FMINIT+2~, FMINIT+6*, FMINIT+7*, FMINIT+9, FMINIT+11, FMINIT+13, FM+11, FM+16
ADDIMCNT IMPORT+1~, IN+4*, IN+7, VISIT+42*, ADDIM1+4*, ADDIM1+7
>> APCDALVR("APCDAFLG" NI1+39!
>> AUPNLK("ALL" ID+21*, ID+32*
>> AUPNLK("INAC" ID+22*, ID+33*
AUTO IMPORT+1~
AUTOADD I1+3, IN+6, IN+8, IN+10!, SET+1*, ADDIM1+6, ADDIM1+8
AUTOIMP I1+9, IN+3, IN+8, IN+10!, READ+7, ADDIM1+1, ADDIM1+8
B FMINIT+2~, FMINIT+8*, FMINIT+9*, FMINIT+11, FMINIT+13, FM+16
BYIMAS ADDIM+1~, ADDIM+3*, ADDIM+4*, ADDIM+5
>> BYIMCNT SET+7*, FM+29*
BYIMDA PARAM+1~, PADD+11*, ADDIM+2*, ADDIM+4, ADDIM+5
>> BYIMDATA NI1+35*, NI1+36, VISIT+8*, VISIT+9*, VISIT+10*, VISIT+11*, VISIT+12*, VISIT+13*, VISIT+14*, VISIT+15*
, VISIT+16*, VISIT+17*, VISIT+18
BYIMDUZ NI1+40~, NI1+42*, NI1+45, VISIT+1!, VISIT+2*, VISIT+24
BYIMERR IMPORT+1~, NI1+36, NI1+39!, NI1+47, VISIT+7*, VISIT+18, VISIT+20, VISIT+22*, VISIT+23*, VISIT+32
, VISIT+37
BYIMIMM IMPORT+1~, IN+4*, ADDIM1+4*
BYIMJ IMPORT+1~, SET+7, SELECT+1, SELECT+4, S1+2, FMINIT+14*
BYIMPAUS NEWIMM+1!, VISIT+35
BYIMQUIT FILE+1!, FILE+11*, IMPORT+3, I1+2, I1+6*, I1+18*, I1+19, READ+8*, SET1+2!, ID+6*
, ID+47*, ID+66!, ID+67*, ID+68*, ADD+1!, ADD+3!, SELECT+9*, VISIT+21!
BYIMVALM START+1*, START+2, VALM~, VALM+4
BYIMX IMPORT+1~, NI1+3*, NI1+48
BYIMY IMM+1~, IMM+3*, IMM+4, IMM+5, IMM+12, IMM+14, IMM+16, IMM+17, SELECT+10*
BYIMY( S1+2*, NEWIMM+4, NEWIMM+5
C FMINIT+2~, FMINIT+10*, FMINIT+11*, FMINIT+13, FM+3, FM+4, FM+8, FM+16
DA IMPORT+1~, ID+24!, ID+35!, ID+43!, PARAM+1~, PARAM+3, PARAM+7, PARAM+11!, PADD+1!, PADD+10!
, PADD+11*, DUZ+1!, DUZ+10!
DA(1 ID+50*
DATE IMPORT+1~, FM+2*, FM+14
DD PARAM+11!, PADD+1!, PADD+10!, DUZ+1!, DUZ+10!
DEL DEL+1~, DEL+2*, SELECT+2, SELECT+5, NI1+43, NI1+47
>> DFN ID+58*, ID+59, ID+63, ID+68, IMM+18, IMM+22, IMM+24, IMM+29, NI1+18*, VISIT+9
, VISIT+27, VISIT+44
DFNCNT IMPORT+1~, IN+4*, IN+7, SET1+3*, ADDIM1+4*, ADDIM1+7
DIC IMPORT+1~, ID+18*, ID+24!, ID+29*, ID+35!, ID+39*, ID+43!, ID+51*, PARAM+1~, PARAM+11!
, PADD+1!, PADD+2*, PADD+10!, DUZ+1!, DUZ+6*, DUZ+10!
DIC("A" PADD+4*
DIC("B" PADD+5*
DIC("DR" ID+54*, DUZ+8*
DIC("S" ID+20*, ID+31*, ID+41*
DIC(0 ID+19*, ID+30*, ID+40*, ID+52*, PADD+3*, DUZ+7*
DIE IMPORT+1~, PARAM+1~, PARAM+4*, PARAM+11!, PADD+1!, PADD+10!, DUZ+1!, DUZ+10!
DIK IMPORT+1~, PARAM+11!, PADD+1!, PADD+10!, DUZ+1!, DUZ+10!
DINUM ID+24!, ID+35!, ID+43!, PARAM+11!, PADD+1!, PADD+10!, DUZ+1!, DUZ+10!
DIR FILE+10!, I1+17!, SELECT+8!
DIR("A" FILE+5*, FILE+6*, FILE+7*, I1+13*, SELECT+5*
DIR("B" I1+14*
DIR(0 FILE+4*, I1+12*, SELECT+4*
DLAYGO IMPORT+1~, ID+24!, ID+35!, ID+43!, PARAM+11!, PADD+1!, PADD+10!, DUZ+1!, DUZ+10!
DO PARAM+11!, PADD+1!, PADD+10!, DUZ+1!, DUZ+10!
DOB IMPORT+1~, ID+15*, ID+48, ID+54, IMM+18, IMM+22, IMM+29, NI1+27*, FMINIT+4*, FMINIT+5*
, FMINIT+7, FMINIT+9, FMINIT+11, FMINIT+13, FM+10, FM+16
DR IMPORT+1~, ID+24!, ID+35!, ID+43!, PARAM+1~, PARAM+5*, PARAM+11!, PADD+1!, PADD+10!, DUZ+1!
, DUZ+10!
DUZ NI1+42, VISIT+2
DUZ( SET+4*, ID+1*, ID+14*, ID+25*, ID+65*, VISIT+19*
DUZ(2 SET+1, ID+14, ID+50, ID+51, ID+59, ID+64, VISIT+16, PADD+5, ADDIM+2, LOCIN+7
, LOCIN+11
FACILITY IMPORT+1~, ID+10*, ID+14
FILE FILE+12*, I1+1, I1+4, I1+21, IN~, IN+5, IN+7, READ~, READ+5, READ+7
, ID+54, ADDIM1+5, ADDIM1+7
>> FULLNAME ID+13*, ID+48, ID+53
HRN IMPORT+1~, ID+9*, ID+17
I READ+1~, READ+14*
IMM IMPORT+1~, IMM+9*, IMM+11, NI1+20*, NI1+33, NI1+35, NI1+52, VISIT+28, CONVERT+1*, CONVERT+2*
, CONVERT+3*, FM+5*, FM+6, FM+8*, FM+12
IMM( IMM+21
IMM(0 IMM+19
IMMCNT IMPORT+1~, IN+4*, IMM+8*, ADDIM1+4*
INHDA IMPORT+1~, SET+2*, SET+3*, SET1~, ID+5, IMM+3, IMM+18, IMM+22
IO READ+14
IOF PARAM+6, PADD+6
IPATH FILE+3, FILE+6, IMPORT+5, I1+1, I1+5, I1+21, IN~, IN+5, IN+7, READ~
, READ+5, READ+7, ADDIM+6*, ADDIM1+5, ADDIM1+7
IVDA IMPORT+1~, NI1+22*, NI1+38, VISIT+10, VISIT+28, VISIT+44, FM+3*, FM+4, FM+5, FM+16
J READ+1~, READ+4*, ID+2~, ID+4*, ID+5*, ID+8*, IMM+2*, IMM+3*, S1+1~, S1+2*
, FMINIT+2~, FMINIT+3*, FMINIT+14, FMINIT+15, FM+7*, FM+9, FM+15, FM+16
JJ IMPORT+1~, NEWIMM+6*
LOC IMPORT+1~, NI1+23*, NI1+25*, NI1+26*, VISIT+4, VISIT+13, LOCIN~, LOCIN+1*, LOCIN+3, LOCIN+4
, LOCIN+5, LOCIN+6*
>> LOC2 NI1+24*, NI1+25, VISIT+13, LOCIN+6
>> LOCDA VISIT+12, LOCIN+2*, LOCIN+3*, LOCIN+4*, LOCIN+5*, LOCIN+6*, LOCIN+7*, LOCIN+8, LOCIN+17*
LOT IMM+1~, IMM+16*, IMM+18, NI1+28*, NI1+33, NI1+35, NI1+38
>> LOTDA NI1+29*, NI1+36, NI1+41, VISIT+22, VISIT+43, VISIT+44
>> MAN IMM+17*, IMM+18, NI1+31*, NI1+38
>> MM ID+54
MSGCNT IMPORT+1~, IN+4*, READ+2*, ADDIM1+4*
MSHX IMPORT+1~
>> MVX NI1+30*, NI1+33, NI1+35
NAME IMPORT+1~, ID+13*, IMM+18, IMM+22, IMM+29, NI1+17*
NEWIMCNT IMPORT+1~, IN+4*, IN+7, FMINIT+15*, ADDIM1+4*, ADDIM1+7
NEWLOT NI1+1!, NI1+40~, NI1+41*, NI1+46!
NODFNCNT IMPORT+1~, IN+4*, IN+7, ID+56*, ADDIM1+4*, ADDIM1+7
NUM IMPORT+1~, NI1+2*, NI1+3, NI1+50
OLDDUZ SET+4!, ID+1!, ID+60!, VISIT+19!
OLDDUZ( ID+14*, ID+64*
OLDDUZ(2 SET+4, ID+1, ID+25, ID+63, ID+67, VISIT+19, LOCIN+7
>> OLDIMM CONVERT+1*, CONVERT+2*, CONVERT+3*
OPATH READ+1~
P VISIT+5~, VISIT+6*, VISIT+8, VISIT+9, VISIT+10, VISIT+11, VISIT+12, VISIT+13, VISIT+14, VISIT+15
, VISIT+16, VISIT+17
PID IMPORT+1~, ID+3*, ID+5*, ID+6, ID+7, ID+11, ID+15, ID+16, ID+27, ID+37
>> PIDX ID+7*, ID+8
RX READ+12~, READ+13*, READ+14
RXACNT IMPORT+1~, IN+4*, IN+7, READ+3*, ADDIM1+4*, ADDIM1+7
SEX IMPORT+1~, ID+16*, ID+48, ID+54
STATUS IMPORT+1~, READ+14*
T IMPORT+1~, FM+9*, FM+10*, FM+11*, FM+12*, FM+13*, FM+14*, FM+15, FM+29, HDR+2*
, HDR+3*, HDR+4*, HDR+5*, HDR+6*, HDR+7*, HDR+8, HDR+9*, HDR+10*, HDR+11*, HDR+12*
, HDR+13*, HDR+14*, HDR+15
U FILE+11, SET+1, ID+8, ID+12, ID+28, ID+38, IMM+5, IMM+13, IMM+17, IMM+18
, IMM+22, IMM+26, NI1+17, NI1+18, NI1+19, NI1+20, NI1+22, NI1+23, NI1+24, NI1+27
, NI1+28, NI1+30, NI1+31, NI1+32, NI1+41, NI1+46, NI1+49, VISIT+22, VISIT+27, VISIT+28
, VISIT+35, FM+1, FM+5, FM+13, FM+16, PARAM+7, PADD+5, ADDIM+6, LOCIN+6, LOCIN+7
, LOCIN+8, LOCIN+11, LOCIN+16
>> UIF ID+54
VALMBCK IMPORT+1~, BACK*
VALMCC IMPORT+1~, VALM+1*
VALMCNT IMPORT+1~, FMINIT+14*, HDR+1
VDATE IMPORT+1~, NI1+19*, NI1+51, VISIT+11, VISIT+30, VISIT+44
>> VOL IMM+14*, IMM+15*, IMM+18, NI1+32*, VISIT+15
X FILE+11, FILE+12, READ+1~, READ+14, ID+8*, ID+9, ID+10, ID+11*, ID+12*, ID+13
, ID+17*, ID+27*, ID+28*, ID+37*, ID+38*, ID+53*, IMM+1~, IMM+12*, IMM+13*, IMM+18
, IMM+22, IMM+23*, IMM+24*, IMM+25, S1+1~, NI1+3*, NI1+4, NI1+17, NI1+18, NI1+19
, NI1+20, NI1+22, NI1+23, NI1+24, NI1+27, NI1+28, NI1+30, NI1+31, NI1+32, NI1+44*
, NI1+45, NI1+48*, NI1+49, VISIT+24*, VISIT+25~, VISIT+29~, VISIT+30*, VISIT+31, FMINIT+2~, FMINIT+12*
, FMINIT+13*, DUZ+2~, DUZ+3*, DUZ+4, DUZ+13*, ADDIM+5*, ADDIM+6, LOCIN+10~, LOCIN+11*, LOCIN+12
, LOCIN+16
X1 IMPORT+1~
X2 IMPORT+1~
XMB VISIT+25~, VISIT+26*
XMB(1 VISIT+27*, VISIT+38
XMB(2 VISIT+28*, VISIT+39
XMB(3 VISIT+31*, VISIT+40
XMB(4 VISIT+32*
XMDT VISIT+25~
XMDUZ VISIT+25~, VISIT+33*
XX ID+61~, ID+62*, ID+63*, ID+65, NEWIMM+2~, NEWIMM+3*, NEWIMM+4*, NEWIMM+5, FM+1*, FM+2
, FM+16
XXX FMINIT+2~, FMINIT+13*, FM+1, FM+13, FM+16
Y I1+1*, I1+2, I1+18, READ+1~, READ+5*, READ+6, ID+26, ID+36, ID+44, ID+46
, ID+57*, ID+58, IMM+1~, IMM+5*, IMM+6, IMM+7, IMM+9, IMM+11*, IMM+18, IMM+20*
, IMM+21*, IMM+22, IMM+25*, IMM+26, IMM+27*, IMM+28, IMM+29, SELECT+9, SELECT+10, S1+1~
, NI1+52*, NI1+53, FMINIT+2~, PADD+11, DUZ+2~, DUZ+4*, DUZ+5, DUZ+11*, DUZ+12*, DUZ+13
, LOCIN+10~, LOCIN+14*, LOCIN+15*, LOCIN+16
Y1 VISIT+25~
YY IMPORT+1~, NEWIMM+5*, NEWIMM+6
Z SET+4*, ID+1*, ID+14*, ID+25*, ID+64*, ID+65*, IMM+1~, IMM+4*, IMM+7, IMM+18
, IMM+22, IMM+26*, IMM+28, IMM+29, S1+1~, NI1+51*, NI1+53, VISIT+19*, FMINIT+2~, DUZ+2~
, LOCIN+10~, LOCIN+13*, LOCIN+15, LOCIN+16*, LOCIN+17
ZTQUEUED IMPORT+1~, IMPORT+6, I1+3, IN+8, SET1+5, VISIT+35, ADDIM1+2, ADDIM1+3, ADDIM1+8
ZZ IMM+1~, NEWIMM+6*, NI1+2

Marked Items

Name Field # of Occurrence
$T(ADDLOT^BIRPC5 NI1+34, NI1+37
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