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
Print Page as PDF
Routine: TIUFIX

Package: Text Integration Utility

Routine: TIUFIX


Information

TIUFIX ; SLC/JER,MAM - Resolve Upload Filing Errors Library ;10/19/06 14:31

Source Information

Source file <TIUFIX.m>

Entry Points

Name Comments DBIA/ICR reference
TITLDFLT(TRANTITL,TIUTYPE,BADTYPES) ; Return default title
; Call with: [TRANTITL] - transcribed title
; [TIUTYPE] - type of docmt being uploaded
; [BADTYPES] - ^-delimited string of types default
; should NOT be (optional)
; Returns: Title - transcribed title if TRANTITL is a
; unique TITLE of type TIUTYPE and
; not of a type in list BADTYPES.
; Null Otherwise
ISTYPE(TITLDA,TYPELIST) ; Is TITLDA in list TYPELIST?
; Requires TITLDA
; Requires TYPELIST of form typeien^typeien^typeien etc., or null
ISTYPEX
GETTITLE(SUCCESS,TIUTYPE,TIUFLDS,TITLDA,BADTYPES,ASK) ; Get title from user
; SUCCESS - Passed back
; TIUTYPE - Type of docmt being uploaded
; TIUFLDS - Array of transcribed data, as set in LOADHDR^TIUFIX2
; TITLDA - Gotten from user and passed back
; BADTYPES - ^-delimited list of types title CANNOT be (optional)
; ASK - Flag to ask user if they want to change
; type to progress note (optional)
ASKCHNG(ONEORTWO,TIUTYPE) ; Ask user if they want to change doc type
ASKX

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," Please enter a ",$$PNAME^TIULC1(+TIUTYPE)," title"
  • Line Location: GETTITLE+13
Function Call: WRITE
  • Prompt: "."
  • Line Location: GETTITLE+14
Function Call: WRITE
  • Prompt: ", or enter '^' to exit",!,"or to change document to a Progress Note."
  • Line Location: GETTITLE+15
Function Call: WRITE
  • Prompt: !,"Title is Required.",!
  • Line Location: GETTITLE+21
Function Call: WRITE
  • Prompt: !," OK, please enter a ",TYPENM," title."
  • Line Location: GETTITLE+28
Info |  Source |  Entry Points |  Interaction Calls