Routine: TIUPNCV5

Package	Total	Call Graph
VA Fileman	1	^DIR

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 GMRP2.544 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, GMRP2.544, 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

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

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

Customize PDF page

Package: Text Integration Utility

Routine: TIUPNCV5

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: