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

Package: Text Integration Utility

Routine: TIUPNCV3


Information

TIUPNCV3 ;SLC/DJP ;PNs ==> TIU cnv rtns ;5-7-97

Source Information

Source file <TIUPNCV3.m>

Entry Points

Name Comments DBIA/ICR reference
ERRORLOG ;Captures information on records that are NOT converted.
TITLE ;Defines variables required for Document Definition look-up
; PNT=^GMR(121.2,TIU("TITLE")),0)
; (1)=TITLE * (2)=TYPE * (3) TYPE NARRATIVE
; (4)=INACTIVE * (5) TIU TITLE IEN
TITLESET ;Sets pointers for Document Definition
; .01 DOCUMENT TYPE * .04 PARENT DOCUMENT TYPE
; 1506 COSIGNATURE REQUIRED * 1701 SUBJECT (description)
STATUS(TIUSTAT) ;Returns DOCUMENT STATUS pointer
DXLS(TIUDX) ;Resolves variable DXLS ptr from Final Discharge Note
BEDSEC(TIUBS) ;Resolves D/C Bedsection ptr from the Final Discharge Note
ROLLEM ;Rolls back ^GMR(121 entries in ^TIU(8925
HELP10 ;Help text for ROLLBACK prompt

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ROLLEM+1
Function Call: WRITE
  • Prompt: !!?16,"****** ROLL BACK ******"
  • Line Location: ROLLEM+1
Function Call: WRITE
  • Prompt: !!?5,"This option will delete all progress notes entered"
  • Line Location: ROLLEM+2
Function Call: WRITE
  • Prompt: !?5,"into ^TIU(8925 from the GMRPN/TIU Conversion. The"
  • Line Location: ROLLEM+3
Function Call: WRITE
  • Prompt: !?5,"option uses ^DIK to roll back the file. Run time is"
  • Line Location: ROLLEM+4
Function Call: WRITE
  • Prompt: !?5,"dependent upon the number of entries made during the"
  • Line Location: ROLLEM+5
Function Call: WRITE
  • Prompt: !?5,"conversion."
  • Line Location: ROLLEM+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: ROLLEM+7
Function Call: WRITE
  • Prompt: !!?5,"BEGINNING ROLL BACK...",!
  • Line Location: ROLLEM+9
Function Call: WRITE
  • Prompt: !!,"ROLLBACK COMPLETED",!
  • Line Location: ROLLEM+14
Function Call: WRITE
  • Prompt: !!?5,"Press <ret> to continue with roll back of Progress Notes"
  • Line Location: HELP10+1
Function Call: WRITE
  • Prompt: !?5,"entered during the conversion. The rollback will begin and"
  • Line Location: HELP10+2
Function Call: WRITE
  • Prompt: !?5,"based on rollback fields in ^TIU(8925.97, TIU Conversions."
  • Line Location: HELP10+3
Function Call: WRITE
  • Prompt: !!?5,"Enter NO or ""^"" to stop this option."
  • Line Location: HELP10+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8925 - [#8925] Classic Fileman Calls
^TIU(8925.6 - [#8925.6] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call