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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: INHES1

Package: IHS Generic Interface System

Routine: INHES1


Information

INHES1 ;Utilities; 1 Feb 96 08:44

Source Information

Source file <INHES1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS Generic Interface System 3 $$INERSRCH^INHERR1  CODETBL^INHERR3  $$INMSPAT^INHMS1  
VA Fileman 2 DD^%DT  Y^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Generic Interface System 1 INHES  

Entry Points

Name Comments DBIA/ICR reference
CRIHDR(INSRCH) ; Display the criteria header
; Reuse code from the INHERR
LIST(INSRCH,DWLRF,INL) ; Build the error array
;
; Module Name: LIST ( Build the list of matching errors )
MSGTEST(INEIEN,INLIST,INSRCH,INFNDCT) ; Add matching error to array
;
; Description: MSGTEST (Interface Error Match Criteria Test). Tests
; the error for matches to values passed in INSRCH
; array and save the IEN to the INLIST array.

External References

Name Field # of Occurrence
DD^%DT CRIHDR+28, CRIHDR+30
Y^DIQ CRIHDR+13, CRIHDR+15, CRIHDR+17, CRIHDR+34, CRIHDR+40
$$INERSRCH^INHERR1 MSGTEST+22
CODETBL^INHERR3 CRIHDR+19, CRIHDR+24, CRIHDR+36
$$INMSPAT^INHMS1 MSGTEST+30

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DESTINATION",?30," : ",Y
  • Line Location: CRIHDR+13
Function Call: WRITE
  • Prompt: !,"ORIGINAL TRANSACTION TYPE",?30," : ",Y
  • Line Location: CRIHDR+15
Function Call: WRITE
  • Prompt: !,"ERROR LOCATION",?30," : ",Y
  • Line Location: CRIHDR+17
Function Call: WRITE
  • Prompt: !,"ERROR RESOLUTION STATUS",?30," : ",ERSTAT(INSRCH("INERSTAT"))
  • Line Location: CRIHDR+19
Function Call: WRITE
  • Prompt: ?34,$G(INSRCH("INTEXT",INT)),!
  • Line Location: CRIHDR+23
Function Call: WRITE
  • Prompt: !,"MESSAGE START DATE",?30," : ",Y
  • Line Location: CRIHDR+28
Function Call: WRITE
  • Prompt: !,"MESSAGE END DATE",?30," : ",Y
  • Line Location: CRIHDR+30
Function Call: WRITE
  • Prompt: !,"MESSAGE ID",?30," : ",$G(INSRCH("INID"))
  • Line Location: CRIHDR+32
Function Call: WRITE
  • Prompt: !,"DIRECTION",?30," : ",Y
  • Line Location: CRIHDR+34
Function Call: WRITE
  • Prompt: !,"STATUS",?30," : ",STAT(INSRCH("INSTAT"))
  • Line Location: CRIHDR+36
Function Call: WRITE
  • Prompt: !,"SOURCE",?30," : ",$G(INSRCH("INSOURCE"))
  • Line Location: CRIHDR+38
Function Call: WRITE
  • Prompt: !,"PATIENT",?30," : ",Y
  • Line Location: CRIHDR+40
Function Call: WRITE
  • Prompt: !,"EXTRACT TEXT LENGTH",?30," : ",INSRCH("TEXTLEN")
  • Line Location: CRIHDR+41
Function Call: WRITE
  • Prompt: !?5,"NOTE : ACTUAL TEXT LENGTH MUST NOT EXCEED 120"
  • Condition for execution: INSRCH("TEXTLEN")>120
  • Line Location: CRIHDR+41
Function Call: WRITE
  • Prompt: !
  • Line Location: CRIHDR+42

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(4001.1 CRIHDR+13, CRIHDR+15, CRIHDR+17, CRIHDR+34, CRIHDR+40
^INTHER - [#4003] MSGTEST+15
^INTHER("B" LIST+22, LIST+24
^INTHU - [#4001] MSGTEST+16

Label References

Name Line Occurrences
MSGTEST LIST+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C CRIHDR+13*, CRIHDR+15*, CRIHDR+17*, CRIHDR+34*, CRIHDR+40*
DWLRF LIST~, LIST+24
>> ERSTAT( CRIHDR+19
IND LIST+15~, LIST+19*, LIST+22*, LIST+24
INEIEN MSGTEST~, MSGTEST+15, MSGTEST+22, MSGTEST+35
INFNDCT LIST+15~, LIST+17*, LIST+24, LIST+26, MSGTEST~, MSGTEST+33, MSGTEST+35*
INL LIST~
INLIST MSGTEST~, MSGTEST+33*, MSGTEST+35
INM LIST+15~, LIST+24*
INMAXSZ MSGTEST+14~, MSGTEST+15*, MSGTEST+33
INMIEN MSGTEST+14~, MSGTEST+16*, MSGTEST+30
>> INRVSRCH LIST+20*, LIST+22, LIST+24
INSRCH LIST~, LIST+24, MSGTEST~, MSGTEST+22, CRIHDR~
INSRCH("FOUND" LIST+26*
INSRCH("INDEST" MSGTEST+18, CRIHDR+13
INSRCH("INDIR" MSGTEST+27, CRIHDR+34
INSRCH("INEND" LIST+19, LIST+22
INSRCH("INERLOC" MSGTEST+20, CRIHDR+17
INSRCH("INERSTAT" MSGTEST+21, CRIHDR+19
INSRCH("INID" MSGTEST+26, CRIHDR+32
INSRCH("INMSGEND" MSGTEST+25, CRIHDR+30
INSRCH("INMSGSTART" MSGTEST+24, MSGTEST+25, CRIHDR+28
INSRCH("INORDER" LIST+18*, LIST+19, LIST+20
INSRCH("INORIG" MSGTEST+19, CRIHDR+15
INSRCH("INPAT" MSGTEST+30, CRIHDR+40
INSRCH("INSOURCE" MSGTEST+29, CRIHDR+38
INSRCH("INSTART" LIST+19, LIST+22
INSRCH("INSTAT" MSGTEST+28, CRIHDR+36
INSRCH("INTEXT" MSGTEST+22, CRIHDR+20, CRIHDR+22, CRIHDR+23
INSRCH("INTYPE" MSGTEST+22, CRIHDR+25
INSRCH("TEXTLEN" CRIHDR+41
>> INT CRIHDR+22*, CRIHDR+23
INTEMPX MSGTEST+14~, MSGTEST+15*, MSGTEST+16, MSGTEST+18, MSGTEST+19, MSGTEST+20, MSGTEST+21
INTEMPY MSGTEST+14~, MSGTEST+16*, MSGTEST+18, MSGTEST+19, MSGTEST+24, MSGTEST+25, MSGTEST+26, MSGTEST+27, MSGTEST+28, MSGTEST+29
, MSGTEST+33~*!
>> MTYPE( CRIHDR+25
>> STAT( CRIHDR+36
U MSGTEST+16, MSGTEST+18, MSGTEST+19, MSGTEST+20, MSGTEST+21, MSGTEST+24, MSGTEST+25, MSGTEST+26, MSGTEST+27, MSGTEST+28
, MSGTEST+29, MSGTEST+33, CRIHDR+13, CRIHDR+15, CRIHDR+17, CRIHDR+34, CRIHDR+40
>> Y CRIHDR+13*, CRIHDR+15*, CRIHDR+17*, CRIHDR+28*, CRIHDR+30*, CRIHDR+34*, CRIHDR+40*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All