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

Package: Income Verification Match

Routine: IVM20P1


Information

IVM20P1 ;ALB/CPM - IVM V2.0 POST INIT, SET HL7 PARAMETERS ; 24-JUN-94

Source Information

Source file <IVM20P1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 DD^%DT  NOW^%DTC  FILE^DICN  IX1^DIK  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Income Verification Match 1 IVM20P  

Entry Points

Name Comments DBIA/ICR reference
HL770Q
HL7 ; Set up all HL7 parameters
BULL ; Send notification to the IVM Center once the facility has installed v2.0.
HL7713 ; Add HL7 segments
IEN(IVMSEG) ; get ien for segment from hl7 segment file
HL771Q
SEG ; list of segments for HL7 SEGMENT file
HL7713Q
HL771 ; Update HL7 DHCP application
HL770 ; Add HL7 non-DHCP app entry

External References

Name Field # of Occurrence
DD^%DT BULL+13
NOW^%DTC BULL+13
FILE^DICN HL7713+6, HL771+5, HL770+4
IX1^DIK HL7713+7, HL771+29, HL770+6
$$SITE^VASITE HL770+5, BULL+9
^XMD BULL+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,">>> Adding 'Z' segments to HL7 SEGMENT NAME file (#771.3)..."
  • Line Location: HL7713+1
Function Call: WRITE
  • Prompt: !," >> ",$P(IVMTXT,"^",1)," (",$P(IVMTXT,"^",2),") segment added"
  • Line Location: HL7713+8
Function Call: WRITE
  • Prompt: !?3,"All segments already exist...none added"
  • Line Location: HL7713+9
Function Call: WRITE
  • Prompt: !!,">>> Adding HL7 NON-DHCP APPLICATION entry for IVM CENTER..."
  • Line Location: HL770+2
Function Call: WRITE
  • Prompt: !!,">>> Sending a 'completed installation' notice to the IVM Center... "
  • Line Location: BULL+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^HL(770 - [#770] Classic Fileman Calls
^HL(771 - [#771] Classic Fileman Calls
^HL(771.3 - [#771.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(301.5 HL7+1, BULL+1
^HL(770 - [#770] HL770+1, HL770+5*
^HL(771 - [#771] HL771+1, HL771+6*, HL771+7*, HL771+8*, HL771+9*, HL771+10*, HL771+11*, HL771+12*, HL771+13*, HL771+14*
, HL771+15*, HL771+16*, HL771+17*, HL771+18*, HL771+19*, HL771+20*, HL771+21*, HL771+22*, HL771+23*, HL771+24*
, HL771+25*, HL771+26*, HL771+27*, HL771+28*
^HL(771.2 - [#771.2] HL771+9, HL771+10, HL771+11
^HL(771.3 - [#771.3] HL7713+4, HL7713+7*, IEN+1

Label References

Name Line Occurrences
$$IEN HL771+13, HL771+14, HL771+15, HL771+16, HL771+17, HL771+18, HL771+19, HL771+20, HL771+21, HL771+22
, HL771+23, HL771+24, HL771+25, HL771+26, HL771+27, HL771+28
HL770 HL7+2
HL770Q HL770+1, HL770+4
HL771 HL7+2
HL7713 HL7+2
HL771Q HL771+3

Naked Globals

Name Field # of Occurrence
^("F" HL771+13*, HL771+14*, HL771+15*, HL771+16*, HL771+17*, HL771+18*, HL771+19*, HL771+20*, HL771+21*, HL771+22*
, HL771+23*, HL771+24*, HL771+25*, HL771+26*, HL771+27*, HL771+28*
^("FS" HL771+7*
^("R" HL771+9*, HL771+10*, HL771+11*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% BULL+13, BULL+16!
DA HL7713+6*, HL7713+7, HL7713Q!, HL771+1*, HL771+2, HL771+3, HL771+5*, HL771+6, HL771+7, HL771+8
, HL771+9, HL771+10, HL771+11, HL771+12, HL771+13, HL771+14, HL771+15, HL771+16, HL771+17, HL771+18
, HL771+19, HL771+20, HL771+21, HL771+22, HL771+23, HL771+24, HL771+25, HL771+26, HL771+27, HL771+28
, HL771Q!, HL770+4*, HL770+5, HL770Q!
DD HL7713+6!, HL771+5!, HL770+4!
DIC HL7713+5*, HL7713Q!, HL771+4*, HL771Q!, HL770+3*, HL770+6, HL770Q!
DIC(0 HL7713+5*, HL771+4*, HL770+3*
DIFROM BULL+3~
DIK HL7713+5*, HL7713Q!, HL771+29*, HL771Q!, HL770+6*, HL770Q!
DINUM HL7713+6!
DLAYGO HL7713+5*, HL7713Q!, HL771+4*, HL771Q!, HL770+3*, HL770Q!
DO HL7713+6!, HL771+5!, HL770+4!
DUZ BULL+7
IVMAPP HL7+3!
IVMDIEN HL7+3!, HL771+1*, HL771+5*, HL770+5
IVMFLG HL7713+2*, HL7713+8*, HL7713+9, HL7713Q!
IVMI HL7713+3*, HL7713Q!
IVMMIEN HL7+3!, HL770+5
>> IVMPROD BULL+2
IVMPRODL HL7+3!
IVMSEG HL7+3!, IEN~, IEN+1
IVMTEXT BULL+16!
IVMTEXT(1 BULL+10*
IVMTEXT(2 BULL+11*
IVMTEXT(3 BULL+14*
IVMTXT HL7713+3*, HL7713+4, HL7713+7, HL7713+8, HL7713Q!
IVMX BULL+9*, BULL+10, BULL+11, BULL+16!
X HL7713+4*, HL771+4*, HL771Q!, HL770+1*, HL770+3*, HL770Q!
XMDUZ BULL+6*, BULL+16!
XMSUB BULL+5*, BULL+16!
XMTEXT BULL+8*, BULL+16!
XMY BULL+16!
XMY( BULL+7*
XMY("WEATHERLY@IVM.DOMAIN.EXT" BULL+7*
Y HL7713+6, HL771+5, HL771Q!, HL770+4, HL770Q!, BULL+13*, BULL+14

Marked Items

Name Field # of Occurrence
$T(SEG+IVMI HL7713+3
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