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

Package: IHS Generic Interface System

Routine: INMPORT


Information

INMPORT ; cmi/flag/maw - IN Import GIS Package ;

Source Information

Source file <INMPORT.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 FILE^DICN  ^DIE  ^DIK  
IHS Support HL7 Interfaces 1 (CHARUP,COMPILE)^BHLU  
IHS VA Utilities 1 EN^XBVK  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Data Warehouse Export System 1 BDW10P5  
IHS Support HL7 Interfaces 1 BHLU  

Entry Points

Name Comments DBIA/ICR reference
DIE
CHKM(M01,MDT)
CHKMS(MS01,GN,GS,GR,GOF,GFL,GP,GM,GPS,GU)
FD(MDA)
CHKSOM(MS,MSEG,OMC)
MD(MDA) ;-- setup the message
CHKMT(MSG,MTT)
MSG ;-- Import the fields from the INXPORT global
ADDT(MSG,TT)
ADDTT ;-- add all transactions in namespace first
SFADD(SN,S01,S02,S03)
CHKOM(MSG,OMC)
EOJ ;-- kill variables and quit
CHKDS(MSG,DSC)
NS ;-- parse the INXPORT global get package name
CHKMC(MSG,MCL)
ADDBP ;-- add all transactions in namespace first
MSADD(MSGI,MSGN,AGN,AGS,AGR,AGOF,AGFL,AGP,AGM,AGPS,AGU)
UPDF(FL01,FL02,FL03,FL3,FL5)
CHKS(S01,S02)
ADD(NMS,SIT)
MADD(MA01,MADT)
SEGF(SIEN,SFIEN,SF01,SF02,SF03)
ADDD ;-- add all destinations in namespace first
STCK(NS,ST) ;-- check to see if the site already exists if not add it
CHKF(F01,F02,F03,F3,F5)
SD(MDA)
FSUB(FDA,FS01,FS02)
MAIN ;PEP - this is the main routine driver
ADD01 ;
FSUBADD(FIEN,FSL01,FSL02)

External References

Name Field # of Occurrence
CHARUP^BHLU MD+5
COMPILE^BHLU MD+39
FILE^DICN NS+10, NS+16, ADD+4, CHKF+5, CHKS+5, MSADD+7, FSUBADD+5, SFADD+5, MADD+4, CHKOM+5
, CHKMC+5, CHKDS+5, ADDT+4, CHKSOM+6, ADDD+13, ADDTT+10, ADDBP+10
^DIE DIE+1
^DIK CHKMS+7
EN^XBVK EOJ+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Global ^INXPORT is missing, please restore and rerun"
  • Line Location: MAIN+2
Routine Call
  • DIE
  • Line Location:
    • DIE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^INRHT - [#4000] Classic Fileman Calls
^INTHPC - [#4004] Classic Fileman Calls
^INRHD - [#4005] Classic Fileman Calls
^INRHNS - [#4007] Classic Fileman Calls
^INTHL7S - [#4010] Classic Fileman Calls
^INTHL7M - [#4011] Classic Fileman Calls
^INTHL7F - [#4012] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(4007 NS+15, ADD+3
^DD(4010 SFADD+3
^DD(4011 CHKMS+12, MSADD+6, CHKOM+4, CHKMC+4, CHKDS+4, ADDT+3
^DD(4011.01 CHKSOM+4
^DD(4012 FSUB+9, FSUBADD+3
^INRHD - [#4005] ADDD+20
^INRHD("B" ADDD+10
^INRHNS - [#4007] STCK+1, STCK+2
^INRHNS("B" NS+7, NS+17
^INRHT - [#4000] ADDTT+15, ADDTT+20*
^INRHT("B" CHKMT+2, ADDD+6, ADDTT+7
^INTHL7F - [#4012] FSUB+3, FSUB+5, FSUB+7
^INTHL7F("B" SD+10, CHKF+2, UPDF+2, FSUB+2, FSUB+13
^INTHL7M - [#4011] CHKMS+6!, CHKOM+1!, CHKMC+1!, CHKDS+1!, CHKMT+4, CHKMT+5, CHKSOM+1!
^INTHL7M("B" CHKM+2, CHKM+3
^INTHL7M("SEG" CHKMS+3
^INTHL7S - [#4010] SEGF+2, SEGF+3, SEGF+6
^INTHL7S("B" CHKS+2, CHKMS+2
^INTHPC("B" ADDBP+7
^INTLH7M( MD+34!
^INXPORT( NS+3, NS+5
^INXPORT("" MAIN+1, NS+1

Label References

Name Line Occurrences
$$ADD STCK+3
$$ADDT CHKMT+4
$$CHKDS MD+20
$$CHKF FD+9
$$CHKM MD+4
$$CHKMC MD+16
$$CHKMS MD+33
$$CHKMT MD+8
$$CHKOM MD+12
$$CHKS SD+5
$$CHKSOM MD+37
$$FSUB FD+16
$$FSUBADD FSUB+3, FSUB+14
$$MADD CHKM+6
$$MSADD CHKMS+14
$$SEGF SD+14
$$SFADD SEGF+2, SEGF+4
$$STCK NS+18
$$UPDF CHKF+2
ADD01 MAIN+5
ADDBP MSG+3, ADD01+4
ADDD MSG+2, ADD01+3
ADDTT MSG+1, ADD01+2
DIE CHKM+5, CHKMS+13, UPDF+5, FSUB+11, SEGF+8, ADDD+19, ADDTT+18, ADDBP+15
EOJ MAIN+7
FD MSG+6
MD MSG+9
MSG MAIN+6
NS MAIN+4
SD MSG+7

Naked Globals

Name Field # of Occurrence
^(0 ADDD+20*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGFL MSADD~, MSADD+3
AGM MSADD~, MSADD+4
AGN MSADD~
AGOF MSADD~, MSADD+3
AGP MSADD~, MSADD+4
AGPS MSADD~, MSADD+4
AGR MSADD~, MSADD+3
AGS MSADD~, MSADD+3
AGU MSADD~, MSADD+5
DA CHKM+4*, CHKMS+5*, CHKMS+9*, UPDF+3*, FSUB+10*, SEGF+5*, CHKSOM+3*, ADDD+16*, ADDTT+13*, ADDBP+13*
, DIE+2!
DA(1 NS+12*, NS+15, CHKMS+5*, CHKMS+9*, MSADD+2*, FSUB+10*, FSUBADD+2*, SEGF+5*, SFADD+2*, CHKOM+3*
, CHKMC+3*, CHKDS+3*, ADDT+2*, CHKSOM+3*
DD NS+8!, NS+13!
DIC NS+9*, NS+13!, NS+15*, ADD+2*, ADD+5!, CHKF+3*, CHKS+3*, MSADD+2*, FSUBADD+2*, SFADD+2*
, MADD+2*, CHKOM+3*, CHKMC+3*, CHKDS+3*, ADDT+2*, CHKSOM+3*, ADDD+12*, ADDTT+9*, ADDBP+9*, DIE+2!
DIC("DR" CHKF+4*, CHKS+4*, MSADD+3*, MSADD+4*, MSADD+5*, FSUBADD+4*, SFADD+4*, MADD+3*
DIC("P" NS+15*, ADD+3*, CHKMS+12*, MSADD+6*, FSUB+9*, FSUBADD+3*, SFADD+3*, CHKOM+4*, CHKMC+4*, CHKDS+4*
, ADDT+3*, CHKSOM+4*
DIC(0 NS+9*, NS+14*, ADD+2*, CHKF+3*, CHKS+3*, MSADD+2*, FSUBADD+3*, SFADD+2*, MADD+2*, CHKOM+3*
, CHKMC+3*, CHKDS+3*, ADDT+2*, CHKSOM+3*, ADDD+12*, ADDTT+9*, ADDBP+9*
DIE CHKM+4*, CHKMS+9*, UPDF+3*, FSUB+8*, FSUB+12!, SEGF+5*, ADDD+17*, ADDTT+16*, ADDBP+13*, DIE+2!
>> DIK CHKMS+5*
DINUM DIE+2!
DO NS+8!, NS+13!
DR CHKM+4*, CHKMS+10*, CHKMS+11*, UPDF+4*, FSUB+10*, SEGF+7*, ADDD+18*, ADDTT+17*, ADDBP+14*, DIE+2!
DSC CHKDS~, CHKDS+3
F01 CHKF~, CHKF+2, CHKF+3
F02 CHKF~, CHKF+2, CHKF+4
F03 CHKF~, CHKF+2, CHKF+4
F3 CHKF~, CHKF+2, CHKF+4
F5 CHKF~, CHKF+2, CHKF+4
FDA FSUB~, FSUB+3, FSUB+5, FSUB+7, FSUB+8, FSUB+10, FSUB+14
FIEN FSUBADD~, FSUBADD+2
FL01 UPDF~, UPDF+2
FL02 UPDF~, UPDF+4
FL03 UPDF~, UPDF+4
FL3 UPDF~, UPDF+4
FL5 UPDF~, UPDF+4
>> FLDI CHKF+6*, CHKF+7
FS01 FSUB~, FSUB+2, FSUB+13
FS02 FSUB~, FSUB+3, FSUB+7, FSUB+10, FSUB+14
>> FSIEN FSUB+14*, FSUB+15
FSL01 FSUBADD~, FSUBADD+2
FSL02 FSUBADD~, FSUBADD+4
GFL CHKMS~, CHKMS+10, CHKMS+14
GM CHKMS~, CHKMS+11, CHKMS+14
GN CHKMS~, CHKMS+2, CHKMS+14
GOF CHKMS~, CHKMS+10, CHKMS+14
GP CHKMS~, CHKMS+11, CHKMS+14
GPS CHKMS~, CHKMS+11, CHKMS+14
GR CHKMS~, CHKMS+10, CHKMS+14
GS CHKMS~, CHKMS+10, CHKMS+14
GU CHKMS~, CHKMS+11, CHKMS+14
>> INAD01 ADDD+4*, ADDD+10, ADDD+12, ADDTT+4*, ADDTT+7, ADDTT+9, ADDBP+4*, ADDBP+7, ADDBP+9
>> INAD02 ADDD+5*, ADDD+6*, ADDD+8, ADDD+20
>> INADA ADDD+1*, ADDD+2*, ADDD+3, ADDTT+1*, ADDTT+2*, ADDTT+3, ADDBP+1*, ADDBP+2*, ADDBP+3
INADD01 ADD01+1*, ADD01+5!, ADDD+15, ADDTT+12, ADDBP+12
>> INADDR ADDD+7*, ADDD+8*, ADDD+18, ADDTT+5*, ADDTT+17, ADDBP+5*, ADDBP+14
>> INADDT ADDD+3*, ADDD+4, ADDD+5, ADDD+7, ADDTT+3*, ADDTT+4, ADDTT+5, ADDBP+3*, ADDBP+4, ADDBP+5
>> INDESC MD+19*, MD+20
>> INDIEN ADDD+10*, ADDD+11, ADDD+14*, ADDD+16, ADDD+20, ADDTT+7*, ADDTT+8, ADDTT+11*, ADDTT+13, ADDTT+15
, ADDTT+20, ADDBP+7*, ADDBP+8, ADDBP+11*, ADDBP+13
>> INF01 FD+4*, FD+9
>> INF02 FD+5*, FD+9
>> INF03 FD+6*, FD+9
>> INF3 FD+7*, FD+9
>> INF5 FD+8*, FD+9
>> INFDA FD+2*, FD+3, FD+8, FD+11, FD+12, FD+13
>> INFDEF FD+3*, FD+4, FD+5, FD+6, FD+7
>> INFIEN UPDF+2*, UPDF+3, UPDF+6
>> INFS FD+12*, FD+13, FSUB+5*, FSUB+6, FSUB+7, FSUB+8, FSUB+10
>> INFS01 FD+14*, FD+16
>> INFS02 FD+15*, FD+16
>> INFSB FD+16*
>> INFSD FD+13*, FD+14, FD+15
>> INFSIEN FSUB+2*, FSUB+3, FSUB+5, FSUB+13*, FSUB+14
>> INIEN STCK+1, STCK+2*, STCK+3, STCK+4
>> INLKST MD+3*, MD+4
>> INM01 MD+2*, MD+4
>> INMADS MD+20*
>> INMCCHK MD+16*
>> INMCL MD+14*, MD+15
>> INMCLE MD+15*, MD+16
>> INMDA MSG+4*, MSG+5*, MSG+6, MSG+7, MSG+8, MSG+9
>> INMDS MD+18*, MD+19
>> INMDT MD+1*, MD+2, MD+4
>> INMOM MD+10*, MD+11
>> INMPRE NS+19*, MSG+5, MSG+8, FD+2, FD+3, FD+8, FD+11, FD+12, FD+13, FD+17
, SD+1, SD+2, SD+7, SD+8, SD+15, MD+1, MD+3, MD+6, MD+7, MD+9
, MD+10, MD+11, MD+13, MD+14, MD+15, MD+17, MD+18, MD+19, MD+21, MD+22
, MD+23, MD+35, MD+36, MD+38, ADDD+2, ADDD+3, ADDTT+2, ADDTT+3, ADDBP+2, ADDBP+3
>> INMSG MD+22*, MD+23, MD+35, MD+36
>> INMSGD MD+23*, MD+24, MD+25, MD+26, MD+27, MD+28, MD+29, MD+30, MD+31, MD+32
>> INMSGFL MD+28*, MD+33
>> INMSGM MD+30*, MD+33
>> INMSGN MD+24*, MD+33
>> INMSGO MD+35*, MD+36
>> INMSGOD MD+36*, MD+37
>> INMSGOF MD+27*, MD+33
>> INMSGOMC MD+37*
>> INMSGP MD+29*, MD+33
>> INMSGPS MD+31*, MD+33
>> INMSGR MD+26*, MD+33
>> INMSGS MD+25*, MD+33
>> INMSGU MD+32*, MD+33
>> INMSY MD+33*, MD+34, MD+37
>> INMT NS+1*, NS+2, NS+3, NS+5
INMTCH FSUB+4!
>> INMTT MD+6*, MD+7
>> INMTTE MD+7*, MD+8
>> INNDA STCK+1*, STCK+2
>> INNS NS+11*, NS+12, NS+17*, NS+18
>> INOCHK MD+12*
>> INOME MD+11*, MD+12
>> INOUT MSG+8*
>> INPKG NS+5*, NS+6*, NS+7, NS+9, NS+17
>> INS01 SD+3*, SD+5
>> INS02 SD+4*, SD+5
>> INSDA SD+1*, SD+2, SD+7, SD+8
>> INSF01 SD+9*, SD+10, SD+14
>> INSF02 SD+12*, SD+14
>> INSF03 SD+13*, SD+14
>> INSFDA SD+7*, SD+8
>> INSFDT SD+8*, SD+9, SD+12, SD+13
>> INSFIEN SD+10*, SD+11, SD+14
>> INSFLD SD+14*
>> INSGDT SD+2*, SD+3, SD+4
>> INST NS+3*, NS+4, NS+5, NS+15, NS+18
>> INSTOK NS+18*
>> INTCHK MD+8*
INTP5 ADDTT+14~, ADDTT+15*, ADDTT+19
>> INY FD+9*, FD+10, FD+16, SD+5*, SD+6, SD+14, MD+4*, MD+5, MD+8, MD+12
, MD+16, MD+20, MD+33, MD+34, MD+37, MD+39, CHKOM+1, CHKMC+1, CHKDS+1
>> KFM MAIN+3*, ADD+1, CHKF+1, CHKS+1, CHKM+1, CHKMS+1, MSADD+1, UPDF+1, FSUB+1, FSUBADD+1
, SEGF+1, SFADD+1, MADD+1, CHKOM+2, CHKMC+2, CHKDS+2, CHKMT+1, ADDT+1, CHKSOM+2, ADDD+9
, ADDTT+6, ADDBP+6
M01 CHKM~, CHKM+2, CHKM+3, CHKM+6
MA01 MADD~, MADD+2
MADT MADD~, MADD+3
MCL CHKMC~, CHKMC+3
MDA FD~, FD+2, FD+3, FD+8, FD+11, FD+12, FD+13, FD+17, SD~, SD+1
, SD+2, SD+7, SD+8, SD+15, MD~, MD+1, MD+3, MD+6, MD+7, MD+9
, MD+10, MD+11, MD+13, MD+14, MD+15, MD+17, MD+18, MD+19, MD+21, MD+22
, MD+23, MD+35, MD+36, MD+38
MDT CHKM~, CHKM+4, CHKM+6
>> MIEN CHKM+2, CHKM+3*, CHKM+4
MS CHKSOM~, CHKSOM+1, CHKSOM+3
MS01 CHKMS~, CHKMS+3, CHKMS+5, CHKMS+6, CHKMS+9, CHKMS+14
MSEG CHKSOM~, CHKSOM+1, CHKSOM+3
MSG CHKOM~, CHKOM+3, CHKMC~, CHKMC+3, CHKDS~, CHKDS+3, CHKMT~, CHKMT+4, CHKMT+5, ADDT~
, ADDT+2
MSGI MSADD~, MSADD+2
>> MSGIEN CHKMS+3*, CHKMS+4, CHKMS+5, CHKMS+6, CHKMS+9
MSGN MSADD~, MSADD+2
>> MTIEN CHKMT+2*, CHKMT+3, CHKMT+4, CHKMT+5
MTT CHKMT~, CHKMT+2
NMS ADD~, ADD+2
NS STCK~, STCK+1, STCK+2, STCK+3
OMC CHKOM~, CHKOM+3, CHKSOM~, CHKSOM+5
S01 CHKS~, CHKS+2, CHKS+3, SFADD~, SFADD+2
S02 CHKS~, CHKS+4, SFADD~, SFADD+4
S03 SFADD~, SFADD+4
SF01 SEGF~
SF02 SEGF~, SEGF+2, SEGF+4, SEGF+6, SEGF+7
SF03 SEGF~, SEGF+2, SEGF+4, SEGF+7
SFIEN SEGF~, SEGF+2, SEGF+3, SEGF+4
>> SFLIEN SEGF+3*, SEGF+4, SEGF+5, SEGF+6, SEGF+9
>> SGIEN CHKMS+2*, CHKMS+3, CHKMS+14
SIEN SEGF~, SEGF+2, SEGF+3, SEGF+4, SEGF+5, SEGF+6
SIT ADD~, ADD+3
SN SFADD~, SFADD+2
ST STCK~, STCK+2, STCK+3
TT ADDT~, ADDT+2
U NS+15, FD+4, FD+5, FD+6, FD+7, FD+14, FD+15, SD+3, SD+4, SD+9
, SD+12, SD+13, MD+24, MD+25, MD+26, MD+27, MD+28, MD+29, MD+30, MD+31
, MD+32, ADD+3, CHKMS+12, MSADD+6, FSUB+7, FSUB+9, FSUBADD+3, SEGF+6, SFADD+3, CHKOM+4
, CHKMC+4, CHKDS+4, ADDT+3, CHKSOM+4, ADDD+20, ADDTT+15, ADDTT+20
>> X NS+9*, NS+15*, ADD+3*, CHKF+3*, CHKS+3*, MSADD+2*, FSUBADD+2*, SFADD+2*, MADD+2*, CHKOM+3*
, CHKMC+3*, CHKDS+3*, ADDT+2*, CHKSOM+5*, ADDD+12*, ADDTT+9*, ADDBP+9*
Y NS+11, ADD+6, CHKF+6, CHKS+6, MSADD+8, FSUBADD+6, SFADD+6, MADD+5, CHKOM+6, CHKMC+6
, CHKDS+6, ADDT+5, CHKSOM+7, ADDD+14, ADDTT+11, ADDBP+11, DIE!, DIE+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