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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: TIUPNCV5

Package: Text Integration Utility

Routine: TIUPNCV5


Information

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

Source Information

Source file <TIUPNCV5.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Text Integration Utility 1 TIUPNCV4  

Entry Points

Name Comments DBIA/ICR reference
CANRUN ; If Progress Note Conversion is currently running or the
; Discharge Summary conversion is running, you CANNOT restart or
; begin to run the Progress Note Conversion
HELP6 ;Help text for MAIL prompt
INTRO ;Introduction text
MAIL ;Mail Prompt
MOREWK ;Must run GMRP*2.5*44 before installing & implementing TIU
PNIEN ;GMRPN IEN Prompt

External References

Name Field # of Occurrence
^DIR INTRO+22, MAIL+5, PNIEN+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: INTRO+1
Function Call: WRITE
  • Prompt: !!?16,"**** PROGRESS NOTE CONVERSION ****"
  • Line Location: INTRO+1
Function Call: WRITE
  • Prompt: !!?5,"This option will copy the data from the Generic Progress Note"
  • Line Location: INTRO+4
Function Call: WRITE
  • Prompt: !?5,"package (File #121) into the Text Integration Utility (TIU)"
  • Line Location: INTRO+5
Function Call: WRITE
  • Prompt: !?5,"package (File #8925). Entries missing required data fields"
  • Line Location: INTRO+6
Function Call: WRITE
  • Prompt: !?5,"are ignored during processing but annotated on an error list."
  • Line Location: INTRO+7
Function Call: WRITE
  • Prompt: !!?5,"The Generic Progress Note (^GMR 121) global will NOT be"
  • Line Location: INTRO+9
Function Call: WRITE
  • Prompt: !?5,"automatically deleted during this process. It is recommended"
  • Line Location: INTRO+10
Function Call: WRITE
  • Prompt: !?5,"that the file be archived and purged as soon as possible after"
  • Line Location: INTRO+11
Function Call: WRITE
  • Prompt: !?5,"the conversion has been verified as complete."
  • Line Location: INTRO+12
Function Call: WRITE
  • Prompt: !!?5,"A mail message documenting all discrepancies encountered during"
  • Line Location: INTRO+14
Function Call: WRITE
  • Prompt: !?5,"processing will be sent to you upon completion or halt of the"
  • Line Location: INTRO+15
Function Call: WRITE
  • Prompt: " conversion.",!
  • Line Location: INTRO+16
Function Call: WRITE
  • Prompt: !?5,"During conversion, a cross-reference is set in the"
  • Line Location: INTRO+17
Function Call: WRITE
  • Prompt: !?5,"GENERIC PROGRESS NOTE file (#121)- which contains"
  • Line Location: INTRO+18
Function Call: WRITE
  • Prompt: !?5,"the IEN of the progress note and the corresponding"
  • Line Location: INTRO+19
Function Call: WRITE
  • Prompt: !?5,"IEN in the TIU DOCUMENT file (#8925).",!
  • Line Location: INTRO+20
Function Call: WRITE
  • Prompt: !?5,"FORMAT: ^GMR(121,""CNV"",IEN)=TIU IEN",!!
  • Line Location: INTRO+21
Function Call: WRITE
  • Prompt: !!?5,"You MUST install and implement the patch, GMRP*2.5*44, prior"
  • Line Location: MOREWK+3
Function Call: WRITE
  • Prompt: !?5,"to converting data from the Generic Progress Note files to the"
  • Line Location: MOREWK+4
Function Call: WRITE
  • Prompt: !?5,"Text Integration Utility files. This is a MUST DO action.",!
  • Line Location: MOREWK+5
Function Call: WRITE
  • Prompt: !?5,"Additional information concerning this patch may be found in the"
  • Line Location: MOREWK+6
Function Call: WRITE
  • Prompt: !?5,"TIU Implementation Guide."
  • Line Location: MOREWK+7
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIL+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PNIEN+4
Function Call: WRITE
  • Prompt: !!?5,"At the completion of the conversion a bulletin will sent"
  • Line Location: HELP6+1
Function Call: WRITE
  • Prompt: !?5,"to this individual indicating completion status."
  • Line Location: HELP6+2
Function Call: WRITE
  • Prompt: !!?5,"Progress Note Conversion now running.",!
  • Line Location: CANRUN+8
Function Call: WRITE
  • Prompt: !?5,"DO NOT RUN CONVERSION",!
  • Line Location: CANRUN+9
Function Call: WRITE
  • Prompt: !!?5,"Discharge Summary Conversion now running.",!
  • Line Location: CANRUN+14
Function Call: WRITE
  • Prompt: !?5,"Do not run Progress Note Conversion concurrently.",!
  • Line Location: CANRUN+15
Routine Call
  • DIR
  • Line Location:
    • INTRO+22
    • MAIL+5
    • PNIEN+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(121 PNIEN+3
^GMR(121.99 INTRO+2
^GMR(128 CANRUN+12
^TIU(8925.97 - [#8925.97] CANRUN+3, CANRUN+4, CANRUN+5
^VA(200 - [#200] MAIL+1

Label References

Name Line Occurrences
CANRUN INTRO+3
MAIL INTRO+25
MOREWK INTRO+2
PNIEN INTRO+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR INTRO+1!, INTRO+23!, MOREWK+2!, MAIL+2!, MAIL+5!, PNIEN+4!, PNIEN+6!
DIR("?" MAIL+4*, PNIEN+6*
DIR("A" MAIL+3*, PNIEN+5*
DIR("B" MAIL+4*, PNIEN+6*
DIR(0 INTRO+22*, MAIL+2*, PNIEN+4*
>> DIRUT INTRO+22, MAIL+5, PNIEN+7
GMRPDA PNIEN+1~, PNIEN+2*, PNIEN+3*, PNIEN+6
IOF INTRO+1
>> TIU("DUZ" MAIL+1
>> TIU("QUIT" INTRO+3, INTRO+22*, INTRO+24, INTRO+25, MOREWK+1*, MAIL+5*, PNIEN+7*, CANRUN+7*, CANRUN+13*
TIU2 CANRUN+3*, CANRUN+6, CANRUN+10!
TIU3 CANRUN+5*, CANRUN+6, CANRUN+10!
TIU5 CANRUN+4*, CANRUN+6, CANRUN+10!
>> TIUMAIL MAIL+1*, MAIL+4
>> TIUPNIEN PNIEN+8*
>> TIUUSER MAIL+6*
U INTRO+2, MAIL+1, MAIL+6, CANRUN+3, CANRUN+4, CANRUN+5
>> Y MAIL+5, MAIL+6, PNIEN+7, PNIEN+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All