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

Package: Asists

Routine: OOPSUTL3


Information

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

Source Information

Source file <OOPSUTL3.m>

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)

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OOPS(2260 - [#2260] GET1^DID,  GET1^DIQ
2260.0125 GET1^DID
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call