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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: TIUPNCV8

Package: Text Integration Utility

Routine: TIUPNCV8


Information

TIUPNCV8 ;SLC/DJP - PNs ==> TIU cnv rtns ;10/5/98 15:25

Source Information

Source file <TIUPNCV8.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 4 ^DIC  ^DIE  ^DIK  EN^DIQ1  
Text Integration Utility 3 SEND^TIUALRT  SETFIELD^TIUPNCV1  (ERRORLOG,TITLE)^TIUPNCV3  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Text Integration Utility 1 TIUPNCV4  

Entry Points

Name Comments DBIA/ICR reference
RTNODE ;Sets 0 Node for TIU record
COPY ;Writes data from ^GMR(121,GMRPIFN --> ^TIU(8925,TIUIFN
COSET ;Sets ^TIU(8925 co-signature fields if required
CLEANREC ;Cleans partition after entry of record
DRIVER ;Entry point
SIGSET ;Sets ^TIU(8925 signature fields
TIUFLDS ;Sets TIU variables with PN data
; .01 FILE ENTRY DATE
; .02 PATIENT
; 1201 ENTRY DATE/TIME
; 1202 AUTHOR/DICTATOR - 2 AUTHOR
; 1204 EXPECTED SIGNER - 2 AUTHOR
; 1205 HOSPITAL LOCATION - 9 LOCATION
; 1301 REFERENCE DATE - .03 DATE/TIME OF PROGRESS NOTE
; 1302 ENTERED BY - .05 TRANSCRIBER
; 1501 SIGNATURE DATE/TIME - 4 DATE/TIME SIGNED
; 1502 SIGNED BY - 3 ELECTRONIC SIGNATURE (AUTHOR)
; 1506 COSIGNATURE NEEDED - 5 COSIGNATURE REQUIRED
; 1507 COSIGNATURE DATE/TIME - 7 DATE/TIME COSIGNED
; 1508 COSIGNED BY - 6 COSIGNER
; 1512 MARKED SIGNED ON CHART BY - 4.1 SIGNATURE IN CHART
; 1513 MARKED COSIGNED ON CHART BY - 7.1 COSIGNATURE IN CHART
CLEANUP ;Kills variables and scratch files
TEXT ;Copies text
WIPEOUT ;Clears ^TIU(8925 if record is found to be incomplete
MAIN ;Main loop for each record

External References

Name Field # of Occurrence
^DIC RTNODE+2
^DIE COPY+1, COPY+2, COPY+4, COPY+5, SIGSET+2, COSET+2
^DIK WIPEOUT+1
EN^DIQ1 MAIN+3
SEND^TIUALRT MAIN+24
SETFIELD^TIUPNCV1 MAIN+17
ERRORLOG^TIUPNCV3 MAIN+6, MAIN+9
TITLE^TIUPNCV3 MAIN+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8925 - [#8925] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] MAIN+12
^GMR(121 MAIN+7, MAIN+26*, TIUFLDS+32, TEXT+4
^TIU(8925 - [#8925] TEXT+2*, TEXT+4*
^TMP("TIUBRK" CLEANREC+2!
^TMP("TIUHOLD" TEXT+1, TEXT+2, TEXT+3!
^TMP("TIUIFN" DRIVER+5*, CLEANUP+2!, WIPEOUT+2!, RTNODE+3*
^TMP("TIUMERGE" TEXT+3!

Label References

Name Line Occurrences
CLEANREC MAIN+13, MAIN+15, MAIN+16, MAIN+27, WIPEOUT+5
COPY MAIN+20
COSET MAIN+22
MAIN DRIVER+6
RTNODE MAIN+16
SIGSET MAIN+22
TEXT MAIN+21
TIUFLDS MAIN+10
WIPEOUT MAIN+17, MAIN+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ATH CLEANREC+1!
BADREC MAIN+6!, MAIN+9!, MAIN+15, MAIN+16, MAIN+17, MAIN+20, CLEANREC+1!
C1 CLEANREC+1!
C2 CLEANREC+1!
C3 CLEANREC+1!
>> DA MAIN+1*, MAIN+20*, WIPEOUT+1*
DIC MAIN+1!*, RTNODE+1*
DIC(0 RTNODE+1*
>> DIE MAIN+20*
DIK WIPEOUT+1*!
>> DIQ MAIN+1*
>> DIQ(0 MAIN+2*
>> DLAYGO RTNODE+1*
>> DR MAIN+2*, COPY+1*, COPY+2*, COPY+3*, COPY+5*, SIGSET+1*, COSET+1*
ESIG CLEANREC+1!
GMRPCTR DRIVER+3*, CLEANUP+1!
GMRPFLD CLEANUP+1!, TEXT+4
GMRPIFN DRIVER+5, CLEANUP+1!, MAIN+1, MAIN+4, MAIN+5, MAIN+7, MAIN+8, MAIN+26, CLEANREC+2, WIPEOUT+2
, TIUFLDS+16, TIUFLDS+17, TIUFLDS+18, TIUFLDS+19, TIUFLDS+20, TIUFLDS+21, TIUFLDS+22, TIUFLDS+24, TIUFLDS+25, TIUFLDS+26
, TIUFLDS+27, TIUFLDS+28, TIUFLDS+29, TIUFLDS+30, TIUFLDS+31, TIUFLDS+32, RTNODE+3, TEXT+1, TEXT+2, TEXT+3
, TEXT+4
GMRPST DRIVER+4*, CLEANUP+1!
NEWNODE DRIVER+5, CLEANUP+1!, MAIN+16
P1 CLEANREC+1!
P2 CLEANREC+1!
P3 CLEANREC+1!
P4 CLEANREC+1!
P5 CLEANREC+1!
PN MAIN+6!, MAIN+9!, CLEANREC+1!
PN(121 MAIN+4, MAIN+7, MAIN+8, TIUFLDS+16, TIUFLDS+17, TIUFLDS+18, TIUFLDS+19, TIUFLDS+20, TIUFLDS+21, TIUFLDS+22
, TIUFLDS+24, TIUFLDS+25, TIUFLDS+26, TIUFLDS+27, TIUFLDS+28, TIUFLDS+29, TIUFLDS+30, TIUFLDS+31, TIUFLDS+32
PNT CLEANREC+1!
PROBLEM MAIN+5*, MAIN+6!, MAIN+8*, MAIN+9!
REDO DRIVER+5, CLEANUP+1!
TIU CLEANREC+1!
TIU( MAIN+12, TIUFLDS+17*, TIUFLDS+18*, RTNODE+1, COPY+1
TIU("BAD" RTNODE+2*
TIU("COSCHART" TIUFLDS+30*
TIU("INDY" MAIN+25
TIU("MHCONV" TIUFLDS+20*
TIU("PARENT" TIUFLDS+32*, COPY+2
TIU("SIGCHART" TIUFLDS+26*
TIU("SPECDT" TIUFLDS+33*
TIU("SSN" MAIN+12*
TIU("SSN4" MAIN+12*, MAIN+13
TIU("TITLE" TIUFLDS+21*
TIU(1201 TIUFLDS+16*, TIUFLDS+33, COPY+3
TIU(1202 TIUFLDS+22*, COPY+3
TIU(1204 TIUFLDS+22*, COPY+3
TIU(1205 TIUFLDS+31*, COPY+3
TIU(1208 COPY+1
TIU(1211 TIUFLDS+31*, COPY+3
TIU(1301 TIUFLDS+18*, COPY+3
TIU(1302 TIUFLDS+19*, COPY+3
TIU(1303 TIUFLDS+23*, COPY+3
TIU(1501 TIUFLDS+25*, SIGSET+1
TIU(1502 TIUFLDS+24*, SIGSET+1
TIU(1505 MAIN+22, SIGSET+1
TIU(1506 TIUFLDS+27*, COPY+1, COSET+1
TIU(1507 TIUFLDS+29*, COSET+1
TIU(1508 TIUFLDS+28*, COSET+1
TIU(1511 MAIN+22, COSET+1
TIU(1512 TIUFLDS+26*, SIGSET+1
TIU(1513 TIUFLDS+30*, COSET+1
TIUCTR DRIVER+3*, CLEANUP+1!, MAIN+25*
TIUD CLEANREC+1!
>> TIUFPRIV DRIVER+1*
>> TIUIFN DRIVER+5*, MAIN+20, MAIN+24, MAIN+26, WIPEOUT+1, RTNODE+3*, TEXT+2, TEXT+4
TIUNEWTY COPY+5!
TIUNM CLEANREC+1!
TIUT CLEANREC+2!
TMSG CLEANREC+2!
TYP CLEANREC+2!
U DRIVER+2*, MAIN+12
>> X RTNODE+1*
>> Y RTNODE+2, RTNODE+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All