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

Package: Health Level Seven

Routine: HLOUSR3


Information

HLOUSR3 ;ALB/CJM/RBN -ListManager Screen for viewing messages(continued);12 JUN 1997 10:00 am ;03/26/2012

Source Information

Source file <HLOUSR3.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Health Level Seven 6 ($$PROCNOW,$$RESEND)^HLOAPI3  ($$GETMSG,GETMSG)^HLOMSG  SYSPARMS^HLOSITE  DISPLAY^HLOUSR1  ($$ASKBEGIN,$$ASKEND,$$ASKYESNO)^HLOUSR2  ($$SETPURGE,SETPURGE)^HLOUSR7  
Kernel 3 ($$FMADD,$$FMTE,$$NOW)^XLFDT  $$LJ^XLFSTR  OWNSKEY^XUSRB  
List Manager 3 EN^VALM  (CLEAR,FULL,PAUSE)^VALM1  (CLEAN,CNTRL)^VALM10  
VA FileMan 2 WAIT^DICD  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Health Level Seven 5 HLO MESSAGE REPROCESS  HLO MESSAGE RESEND  HLO MESSAGE SEARCH  HLO SET PURGE  HLO SINGLE MESSAGE DISPLAY  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; Main entry point.
SEARCH ; Find a message.
END ; Return to List Manager.
ADDTO(DIR,TIME,APP,MSG,EVENT,IEN) ; Add message to queue.
LJ(STRING,LEN) ;
I() ;
ASK(PARMS) ; Ask for parameter values.
ASKMAX() ; Ask for the maximum number of messages.
ASKAPP() ; Ask for application name.
ASKMSG() ;
ASKEVENT() ; Ask for event.
ASKDIR() ; Ask message direction
HDR ; Set the List Manager header
HLP ;
EXIT ; Clean up and exit back to List Manager
SETPURGE ; Set a message up for purging.
SCREEN() ; Screen for message purge status.
RESEND ; If outbound message has been sent, resends it.
REPROC ; If inbound message has been processed, reprocesses it.
MSGPREP ; Enable or disable menu options

External References

Name Field # of Occurrence
WAIT^DICD EN+4
^DIR ASKMAX+7, ASKAPP+6, ASKMSG+6, ASKEVENT+6, ASKDIR+6, SETPURGE+8
$$PROCNOW^HLOAPI3 REPROC+16
$$RESEND^HLOAPI3 RESEND+16
$$GETMSG^HLOMSG SETPURGE+4, SCREEN+6, RESEND+12, RESEND+23, REPROC+12
GETMSG^HLOMSG MSGPREP+2
SYSPARMS^HLOSITE RESEND+20, REPROC+20
DISPLAY^HLOUSR1 SETPURGE+9, RESEND+24
$$ASKBEGIN^HLOUSR2 ASK+3
$$ASKEND^HLOUSR2 ASK+5
$$ASKYESNO^HLOUSR2 RESEND+15, RESEND+19, REPROC+15, REPROC+19
$$SETPURGE^HLOUSR7 RESEND+22, REPROC+22
SETPURGE^HLOUSR7 SETPURGE+9
EN^VALM EN+5
CLEAR^VALM1 EXIT+2
FULL^VALM1 EN+2, REPROC+2
PAUSE^VALM1 SETPURGE+5, RESEND+4, RESEND+9, RESEND+13, RESEND+14, RESEND+17, REPROC+5, REPROC+9, REPROC+13, REPROC+14
, REPROC+16
CLEAN^VALM10 EXIT+1
CNTRL^VALM10 ADDTO+10
$$FMADD^XLFDT SETPURGE+6, RESEND+21, REPROC+18, REPROC+21
$$FMTE^XLFDT ADDTO+11
$$NOW^XLFDT RESEND+21, REPROC+21
$$LJ^XLFSTR LJ+1
OWNSKEY^XUSRB RESEND+2, REPROC+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Can not set purge yet!"
  • Line Location: SETPURGE+5
Function Call: WRITE
  • Prompt: !,"**** You are not authorized to use this option ****"
  • Line Location: RESEND+4
Function Call: WRITE
  • Prompt: !,"Sorry that option is not available for this message."
  • Line Location: RESEND+9
Function Call: WRITE
  • Prompt: !,"Message is not an outbound message"
  • Line Location: RESEND+13
Function Call: WRITE
  • Prompt: !,"Message has not been sent!"
  • Line Location: RESEND+14
Function Call: WRITE
  • Prompt: ERROR
  • Line Location: RESEND+17
Function Call: WRITE
  • Prompt: !,"The message has been copied to MsgID ",MSGIEN," which will be displayed next"
  • Line Location: RESEND+18
Function Call: WRITE
  • Prompt: !,"**** You are not authorized to use this option ****"
  • Line Location: REPROC+5
Function Call: WRITE
  • Prompt: !,"Sorry that option is not available for this message."
  • Line Location: REPROC+9
Function Call: WRITE
  • Prompt: !,"Message is not an inbound message"
  • Line Location: REPROC+13
Function Call: WRITE
  • Prompt: !,"Message has not been processed"
  • Line Location: REPROC+14
Function Call: WRITE
  • Prompt: ERROR
  • Line Location: REPROC+16
Function Call: WRITE
  • Prompt: !,"Done! The message has been reprocessed by the application."
  • Line Location: REPROC+17
Routine Call
  • DIR
  • Line Location:
    • ASKMAX+7
    • ASKAPP+6
    • ASKMSG+6
    • ASKEVENT+6
    • ASKDIR+6
    • SETPURGE+8
Routine Call
  • VALM
  • Line Location:
    • EN+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLB - [#778] ADDTO+2, ADDTO+3
^HLB("SEARCH" SEARCH+8, SEARCH+10, SEARCH+11, SEARCH+13, SEARCH+14, SEARCH+16, SEARCH+17, SEARCH+20

Label References

Name Line Occurrences
$$ASK EN+3
$$ASKAPP ASK+7
$$ASKDIR ASK+13
$$ASKEVENT ASK+11
$$ASKMAX ASK+18
$$ASKMSG ASK+9
$$I ADDTO+9, ADDTO+11, ADDTO+12
$$LJ ADDTO+9, ADDTO+11
ADDTO SEARCH+20
EXIT SEARCH+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APP SEARCH+1~, SEARCH+10, SEARCH+11, ADDTO~, ADDTO+9
CONF RESEND+1~, RESEND+2, REPROC+1~, REPROC+3
CONF(0 RESEND+3, REPROC+4
DIR SEARCH+1~, SEARCH+8, SEARCH+10, SEARCH+11, SEARCH+13, SEARCH+14, SEARCH+16, SEARCH+17, SEARCH+20, ADDTO~
, ADDTO+6, ADDTO+7, ASKMAX+1~, ASKAPP+1~, ASKMSG+1~, ASKEVENT+1~, ASKDIR+1~, SETPURGE+1~, RESEND+6~, REPROC+7~
DIR("?" ASKMAX+5*, ASKMAX+6*, ASKAPP+4*, ASKAPP+5*, ASKMSG+4*, ASKMSG+5*, ASKEVENT+4*, ASKEVENT+5*, ASKDIR+4*, ASKDIR+5*
DIR("A" ASKMAX+3*, ASKAPP+3*, ASKMSG+3*, ASKEVENT+3*, ASKDIR+3*, SETPURGE+7*
DIR("B" ASKMAX+4*
DIR(0 ASKMAX+2*, ASKAPP+2*, ASKMSG+2*, ASKEVENT+2*, ASKDIR+2*, SETPURGE+6*, REPROC+18*
DT SETPURGE+6, REPROC+18
>> DTOUT ASKMAX+8, ASKAPP+7, ASKMSG+7, ASKEVENT+7, ASKDIR+7
>> DUOUT ASKMAX+8, ASKAPP+7, ASKMSG+7, ASKEVENT+7, ASKDIR+7
DUZ RESEND+2, REPROC+3
END SEARCH+1~, SEARCH+8
ERR MSGPREP+1~
ERROR RESEND+6~, RESEND+16, RESEND+17, REPROC+7~, REPROC+16
EVENT SEARCH+1~, SEARCH+16, SEARCH+17, ADDTO~, ADDTO+9
FDA MSGPREP+1~
FLG RESEND+6~, RESEND+22*, RESEND+23*, REPROC+22*
FS ADDTO+1~, ADDTO+4*, ADDTO+5, ADDTO+6, ADDTO+7
HDR ADDTO+1~, ADDTO+3*, ADDTO+4, ADDTO+6, ADDTO+7
>> HLOPURDT RESEND+21*, RESEND+22, REPROC+21*, REPROC+22
HLPARMS EN+1~, EN+3, SEARCH+5!
HLPARMS( SEARCH+4
I SEARCH+1~, SEARCH+3*, SEARCH+4*, SEARCH+6*
IEN SEARCH+18~, SEARCH+19*, SEARCH+20*, ADDTO~, ADDTO+2, ADDTO+3
>> IOINHI ADDTO+10
>> IOINORM ADDTO+10
LEN LJ~, LJ+1
LOC ADDTO+1~, ADDTO+6*, ADDTO+7*, ADDTO+8*, ADDTO+11
>> MAX SEARCH+8, SEARCH+11, SEARCH+14, SEARCH+17, SEARCH+20
MSG SEARCH+1~, SEARCH+13, SEARCH+14, ADDTO~, ADDTO+9, SETPURGE+1~, SETPURGE+4, SCREEN+4~, SCREEN+6, RESEND+6~
, RESEND+12, RESEND+23, REPROC+7~, REPROC+12, MSGPREP+1~, MSGPREP+2
MSG("DIRECTION" RESEND+13, REPROC+13, MSGPREP+5, MSGPREP+7
MSG("DT/TM" RESEND+14, MSGPREP+3
MSG("ID" RESEND+15, REPROC+15
MSG("STATUS" SETPURGE+5, SCREEN+7, RESEND+14, REPROC+14
MSGID ADDTO+1~, ADDTO+2*, ADDTO+9
>> MSGIEN SETPURGE+3, SETPURGE+4, SETPURGE+9, SCREEN+5, SCREEN+6, RESEND+7, RESEND+11, RESEND+12, RESEND+16*, RESEND+18
, RESEND+23, REPROC+11, REPROC+12, REPROC+16, REPROC+22, MSGPREP+2
OLDIEN RESEND+6~, RESEND+7*, RESEND+22
OPT1DIS RESEND+8!, MSGPREP+4*, MSGPREP+8*
OPT2DIS REPROC+8!, MSGPREP+4*, MSGPREP+6*
PARMS ASK~
PARMS( ASK+2*
PARMS("APP" ASK+7*, ASK+8
PARMS("DIR" ASK+13*, ASK+14, ASK+16*
PARMS("END" ASK+5*, ASK+6
PARMS("EVENT" ASK+11*, ASK+12
PARMS("MAX" ASK+18*, ASK+19
PARMS("MSG" ASK+9*, ASK+10
PARMS("START" ASK+3*, ASK+4, ASK+5
SAPP SEARCH+9~*, SEARCH+10*, SEARCH+11*, SEARCH+13, SEARCH+14, SEARCH+16, SEARCH+17, SEARCH+20
SEVENT SEARCH+15~*, SEARCH+16*, SEARCH+17*, SEARCH+20
SMSG SEARCH+12~*, SEARCH+13*, SEARCH+14*, SEARCH+16, SEARCH+17, SEARCH+20
START SEARCH+1~, SEARCH+7
STRING LJ~, LJ+1
SUB ASK+1~, ASK+2*
SYS RESEND+6~, RESEND+20
SYS("ERROR PU RGE" , RESEND+21
SYSPARM REPROC+7~, REPROC+20
SYSPARM("ERRO R PURGE" , REPROC+21
TIME SEARCH+1~, SEARCH+7*, SEARCH+8*, SEARCH+10, SEARCH+11, SEARCH+13, SEARCH+14, SEARCH+16, SEARCH+17, SEARCH+20
, ADDTO~, ADDTO+11
TRUE SCREEN+1~, SCREEN+2*, SCREEN+3, SCREEN+5*, SCREEN+6*, SCREEN+7*, SCREEN+8, SCREEN+9
>> VALMAR ADDTO+9, ADDTO+11, ADDTO+12
>> VALMBCK EN+3*, END+1*, EXIT+3*, SETPURGE+2*, SCREEN+8*, RESEND+10*, REPROC+10*, MSGPREP+9*
>> VALMCNT SEARCH+6*, SEARCH+8, SEARCH+11, SEARCH+14, SEARCH+17, SEARCH+20, ADDTO+10, I+1*, I+2
>> VALMHDR(1 HDR+1*
>> X ASKMAX+9, ASKAPP+8, ASKMSG+8, ASKEVENT+8, ASKDIR+8, SCREEN+3
>> Y SETPURGE+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All