Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ISIJUTL9

Package: Vendor - ISI

Routine: ISIJUTL9


Information

ISIJUTL9 ; ISI/JHC - ISI Rad subroutines ; 10/17/2022

Source Information

Source file <ISIJUTL9.m>

Entry Points

Name Comments DBIA/ICR reference
ERR ;
MGRREV2(CLIENT) ; Return 1/0 for Manager Revision-2 is enabled
; Input CLIENT optional:
; "CLIENT" indicates Client-side Tab changes only concern
; Else, concern is Server-side processes disabled/enabled
UJOCHECK(OUT) ;
; Check to see if UJO National Patient ID (#2,400000000) exists.
; Used to verify this is an EHS/EHSI system
LSTSTATU(LSTID,HDATE) ; Exam list statistics update
; LSTID = ien of Exam list requested by user
; HDATE = $H of date to be filed; default is today
WEEKOF(H) ; Calculate a "week-of" date for input $H value
LSTSTATD ; Exam list statistics dump
LISTDEFS ; dump out exam list definitions
;
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"LIST DEFINITIONS:",!
  • Line Location: LISTDEFS+2
Function Call: WRITE
  • Prompt: !,$J(LSTNUM,4)," "
  • Line Location: LISTDEFS+7
Function Call: WRITE
  • Prompt: " * * * No report defined for List # * * *",!
  • Line Location: LISTDEFS+8
Function Call: WRITE
  • Prompt: " ",U," ",$P(X,U,I)
  • Line Location: LISTDEFS+10
Function Call: WRITE
  • Prompt: !,?6,X
  • Line Location: LISTDEFS+11
Function Call: WRITE
  • Prompt: !
  • Line Location: LISTDEFS+12
Function Call: WRITE
  • Prompt: !!,"<END>",!
  • Line Location: LISTDEFS+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] VFIELD^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call