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 |  Local Variables  | All
Print Page as PDF
Routine: OOPSUTL3

Package: Asists

Routine: OOPSUTL3


Information

OOPSUTL3 ;HINES/WAA-Utilities Routines ;3/24/98

Source Information

Source file <OOPSUTL3.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 3 $$GET1^DID  $$GET1^DIQ  ^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
Asists 6 OOPSDOL  OOPSDOL1  OOPSDOL2  OOPSDOLX  OOPSSUP1  OOPSUTL5  

Entry Points

Name Comments DBIA/ICR reference
CHECK(IEN,FORM) ; Checks to see if there was data enter for a form
PSDTCHK(DATE,NOYR,FLD) ;
; this functionality returns a valid date (the one passed in) if
; the current date (DT) minus the date passed in (DATE) is less than
; the value in NOYR. Specific checking also occurs if date pasted in
; is the DOB (field 6).
NMCHK(NA) ; Checks format for name fields
NMERR ; Error message to print if error on name check and doing input
WIT() ; Check if Witness name exists that other witness fields have data
REG(IEN,FIELD) ; Regular work schedule
TI ;TIME INPUT TRANS FORM
A
DNE
ERR
CNV ; Convert Start/Stop to minutes
; X=start_"^"_stop Output: Y=start(min)_"^"_stop(min)
MIL ; Convert from AM/PM to 2400
; X=time Y: 0=Mid=0,1=Mid=2400 Output: Y=time in 2400
HLP ; Time Help
DC(OPDT) ; Convert Date to YYYYMMDD
HM(TIME) ;Convert Regular Hrs. From Time and Regular Hrs To Time
; to HHMM (HOUR AND MINUTE)

External References

Name Field # of Occurrence
$$GET1^DID PSDTCHK+16, PSDTCHK+18, WIT+16
$$GET1^DIQ CHECK+7, PSDTCHK+17, PSDTCHK+18, WIT+12
^DIR REG+37

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,$$GET1^DID(2260,FLD,"","LABEL")_" cannot be more than "_NOYR_" years in the past.",!
  • Line Location: PSDTCHK+16
Function Call: WRITE
  • Prompt: !!?5,"DOB cannot be after "_$$GET1^DID(2260,4,"","LABEL"),!
  • Line Location: PSDTCHK+18
Function Call: WRITE
  • Prompt: !,"Enter the person's name, using the format LASTNAME,FIRSTNAME."
  • Line Location: NMERR+1
Function Call: WRITE
  • Prompt: !,"Suffixes such as Sr, Jr, III can only be entered as a FIRSTNAME."
  • Line Location: NMERR+2
Function Call: WRITE
  • Prompt: !,"There must be a LAST NAME and FIRST NAME separated by a comma."
  • Line Location: NMERR+3
Function Call: WRITE
  • Prompt: !,"Spaces in the last name are not allowed and the only "
  • Line Location: NMERR+4
Function Call: WRITE
  • Prompt: !,"punctuation allowed is a hyphen (-) or comma (,).",!
  • Line Location: NMERR+5
Function Call: WRITE
  • Prompt: !," Witness Data is incomplete for the following Witnesses, enter missing data."
  • Line Location: WIT+14
Function Call: WRITE
  • Prompt: !?7,I," is missing the"
  • Line Location: WIT+15
Function Call: WRITE
  • Prompt: !?9,$$GET1^DID(2260.0125,J-1,"","LABEL")
  • Line Location: WIT+16
Function Call: WRITE
  • Prompt: !," Date of Witness Signature cannot be prior to DATE/TIME OF OCCURRENCE."
  • Line Location: WIT+18
Function Call: WRITE
  • Prompt: !," Address or City contains invalid characters:",!?7,"(~,`,@,#,$,%,*,_,|,\,},{,[,],>,or <). Please Edit"
  • Line Location: WIT+19
Function Call: WRITE
  • Prompt: !," 1) SUNDAY"
  • Line Location: REG+10
Function Call: WRITE
  • Prompt: !," 2) MONDAY"
  • Line Location: REG+11
Function Call: WRITE
  • Prompt: !," 3) TUESDAY"
  • Line Location: REG+12
Function Call: WRITE
  • Prompt: !," 4) WEDNESDAY"
  • Line Location: REG+13
Function Call: WRITE
  • Prompt: !," 5) THURSDAY"
  • Line Location: REG+14
Function Call: WRITE
  • Prompt: !," 6) FRIDAY"
  • Line Location: REG+15
Function Call: WRITE
  • Prompt: !," 7) SATURDAY"
  • Line Location: REG+16
Function Call: WRITE
  • Prompt: !
  • Line Location: REG+20
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: REG+22
Function Call: WRITE
  • Prompt: !," 1) SUNDAY"
  • Line Location: REG+23
Function Call: WRITE
  • Prompt: !," 2) MONDAY"
  • Line Location: REG+24
Function Call: WRITE
  • Prompt: !," 3) TUESDAY"
  • Line Location: REG+25
Function Call: WRITE
  • Prompt: !," 4) WEDNESDAY"
  • Line Location: REG+26
Function Call: WRITE
  • Prompt: !," 5) THURSDAY"
  • Line Location: REG+27
Function Call: WRITE
  • Prompt: !," 6) FRIDAY"
  • Line Location: REG+28
Function Call: WRITE
  • Prompt: !," 7) SATURDAY"
  • Line Location: REG+29
Function Call: WRITE
  • Prompt: !
  • Line Location: REG+30
Function Call: WRITE
  • Prompt: !?5,"Time may be entered as 8A or 8a, 8:00A, 8:15A, 8:15AM or military"
  • Line Location: HLP+1
Function Call: WRITE
  • Prompt: !?5,"time: 0800, 1300; or MID or 12M for midnight; NOON or 12N for noon."
  • Line Location: HLP+2
Function Call: WRITE
  • Prompt: !?5,"Time must be in quarter hours; e.g., 8A or 8:15A or 8:30A or 8:45A.",!
  • Line Location: HLP+3
Routine Call
  • DIR
  • Line Location:
    • REG+37

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OOPS(2260 - [#2260] GET1^DID,  GET1^DIQ
2260.0125 GET1^DID

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OOPS(2260 - [#2260] WIT+4, WIT+6, WIT+7, WIT+8, REG+4, REG+5, REG+40*, REG+41*

Label References

Name Line Occurrences
A TI+8
DNE A+1
ERR TI+4, TI+5, TI+6, TI+8, TI+9, TI+10, A, A+3
MIL CNV+2, CNV+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS CHECK+1~, CHECK+2*, CHECK+6, CHECK+7*, CHECK+9, REG+2~, REG+3*, REG+39*, REG+40, REG+41
ANSS REG+2~, REG+3*, REG+4*, REG+5*, REG+6, REG+9
ARR WIT+2~, WIT+13
ARR( WIT+9*, WIT+15, WIT+16
CNX CNV+2*, CNV+3, CNV+4!
>> COPDT DC+4*, DC+5*, DC+6
>> DA PSDTCHK+14
DATE PSDTCHK~, PSDTCHK+13, PSDTCHK+15, PSDTCHK+18
DAY REG+8~, REG+9*, REG+10, REG+11, REG+12, REG+13, REG+14, REG+15, REG+16
DIR REG+1~
DIR("?" REG+33*, REG+34*, REG+35*, REG+36*
DIR("A" REG+32*
DIR(0 REG+31*
DT PSDTCHK+15
FIELD CHECK+1~, CHECK+6*, CHECK+7, REG~, REG+4, REG+5, REG+21, REG+40, REG+41
FLD PSDTCHK~, PSDTCHK+16, PSDTCHK+17
FORM CHECK~, CHECK+3, CHECK+5
I CHECK+1~, CHECK+6*, WIT+2~, WIT+7*, WIT+8, WIT+15*, WIT+16, REG+8~, REG+9*
IEN CHECK~, CHECK+7, PSDTCHK+14*, PSDTCHK+17, PSDTCHK+18, WIT+4, WIT+6, WIT+7, WIT+8, WIT+12
, REG~, REG+4, REG+5, REG+40, REG+41
J WIT+2~, WIT+9*, WIT+10*, WIT+16*
LAST WIT+2~, WIT+6*, WIT+7
LINE REG+2~, REG+21*, REG+22
LIST CHECK+1~, CHECK+3*, CHECK+5*, CHECK+6
LN NMCHK+6~, NMCHK+10*
NA NMCHK~, NMCHK+8, NMCHK+9, NMCHK+10, NMCHK+11
NOYR PSDTCHK~, PSDTCHK+15, PSDTCHK+16
OPDT DC~, DC+5
>> OTIME HM+6*, HM+7*, HM+9*, HM+10*, HM+11
STR WIT+2~, WIT+8*, WIT+9, WIT+10, WIT+11, WIT+12, WIT+18
TIME HM~, HM+6, HM+7, HM+8, HM+9
U WIT+6, WIT+9, WIT+10, WIT+11, WIT+12, WIT+18, WIT+20, REG+4, REG+5, REG+40
, REG+41
VAL PSDTCHK+12~, PSDTCHK+13*, PSDTCHK+15*, PSDTCHK+17, PSDTCHK+18*, PSDTCHK+19
VALID NMCHK+6~, NMCHK+7*, NMCHK+8*, NMCHK+9*, NMCHK+10*, NMCHK+11*, NMCHK+12, WIT+2~, WIT+3*, WIT+5
, WIT+9*, WIT+12*, WIT+13, WIT+17, WIT+20
VCHAR WIT+2~, WIT+3*, WIT+10*, WIT+19, WIT+20
WIT WIT+2~, WIT+4*, WIT+5, WIT+7
X TI+1*, TI+2*, TI+3*, TI+4*, TI+5, TI+6, TI+7*, TI+8, TI+9*, TI+10*
, A, A+1*, A+2, A+4*, ERR!, CNV+2*, CNV+3*, MIL+2, MIL+3
X1 TI+4*, TI+5*, TI+7*, TI+9, TI+10, A+1*, A+2*, A+3, A+4, DNE!
, ERR!
Y REG+1~, REG+39, CNV+2*, CNV+3*, CNV+4*, MIL+2*, MIL+3*, MIL+4*
Y(0 REG+38
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 |  Local Variables  | All