TIUPUTPN ; SLC/JER - PN Look-up Method ;01-Aug-2011 12:04;MGH
Source file <TIUPUTPN.m>
| Package | Total | Call Graph | 
|---|---|---|
| Text Integration Utility | 10 | SENDADD^TIUALRT  $$CLASS^TIUCNSLT  AUDIT^TIUEDI1  $$GETRECNW^TIUEDI3  ($$CHKSUM,$$IDATE,$$NOW)^TIULC  ($$DIVISION,$$DOCCLASS,$$PNAME,$$WHOCOSIG,$$WHOSIGNS,DOCPRM)^TIULC1  $$REQCOSIG^TIULP  $$ISA^TIULX RELEASE^TIUT MAIN^TIUVSIT | 
| IHS Mods To Text Integration Utilities | 3 | VNOTE^BTIUPCC ^BTIUPUTP ($$IPAT,$$IVST)^BTIUU1 | 
| Kernel | 2 | ($$FMADD,$$NOW)^XLFDT $$STRIP^XLFSTR | 
| VA Fileman | 2 | ^DIC (,FILE)^DIE | 
| Package | Total | Caller Graph | 
|---|---|---|
| Text Integration Utility | 2 | TIUHL7P3 TIURE | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DELTEXT(DA) | ; Delete existing text in preparation for replacement | |
| LOOKUPX | ||
| CANEDIT(DA) | ; Check whether or not document is released | |
| WHATYPX | ||
| WHATITX | ||
| WHATYPE(X) | ; Identify document type ; Receives: X=Document Definition Name ; Returns: Y=Document Definition IFN | |
| FOLLOWUP(TIUDA) | ; Post-filing code for PROGRESS NOTES | |
| LOOKUP | ; Look-up code used by router/filer ; Required: TIUSSN, TIUVDT | |
| WHATITLE(X) | ; Identify document title ; Receives: X=Document Definition Name ; Returns: Y=Document Definition IFN | |
| ILOC(LOCATION) | ; Get pointer to file 44 | |
| STUFREC(DA,PARENT) | ; Stuff fixed field data | |
| MAKEADD() | ; Create an addendum record | 
| Name | Field # of Occurrence | 
|---|---|
| VNOTE^BTIUPCC | FOLLOWUP+11 | 
| ^BTIUPUTP | LOOKUP+26 | 
| $$IPAT^BTIUU1 | FOLLOWUP+11 | 
| $$IVST^BTIUU1 | FOLLOWUP+11 | 
| ^DIC | ILOC+2, MAKEADD+4, WHATYPE+6, WHATITLE+6 | 
| ^DIE | MAKEADD+6, DELTEXT+2 | 
| FILE^DIE | STUFREC+27, FOLLOWUP+6, FOLLOWUP+10 | 
| SENDADD^TIUALRT | LOOKUP+48 | 
| $$CLASS^TIUCNSLT | LOOKUP+19 | 
| AUDIT^TIUEDI1 | FOLLOWUP+13 | 
| $$GETRECNW^TIUEDI3 | LOOKUP+34 | 
| $$CHKSUM^TIULC | FOLLOWUP+13 | 
| $$IDATE^TIULC | LOOKUP+14, LOOKUP+31, STUFREC+23 | 
| $$NOW^TIULC | STUFREC+8, STUFREC+20 | 
| $$DIVISION^TIULC1 | LOOKUP+13 | 
| $$DOCCLASS^TIULC1 | MAKEADD+6 | 
| $$PNAME^TIULC1 | LOOKUP+32 | 
| $$WHOCOSIG^TIULC1 | FOLLOWUP+5 | 
| $$WHOSIGNS^TIULC1 | FOLLOWUP+3 | 
| DOCPRM^TIULC1 | LOOKUP+20 | 
| $$REQCOSIG^TIULP | FOLLOWUP+9 | 
| $$ISA^TIULX | LOOKUP+19 | 
| RELEASE^TIUT | FOLLOWUP+12 | 
| MAIN^TIUVSIT | FOLLOWUP+21 | 
| $$FMADD^XLFDT | LOOKUP+14, FOLLOWUP+18 | 
| $$NOW^XLFDT | STUFREC+25 | 
| $$STRIP^XLFSTR | LOOKUP+7 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^TIU(8925 - [#8925] | LOOKUP+41, LOOKUP+44, CANEDIT+1, STUFREC+13, STUFREC+14, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19, FOLLOWUP+4 , FOLLOWUP+7, FOLLOWUP+9, FOLLOWUP+16 | 
| Name | Line Occurrences | 
|---|---|
| $$CANEDIT | LOOKUP+43 | 
| $$ILOC | LOOKUP+10 | 
| $$MAKEADD | LOOKUP+41, LOOKUP+45 | 
| $$WHATITLE | LOOKUP+16, MAKEADD+2 | 
| DELTEXT | LOOKUP+44 | 
| LOOKUPX | LOOKUP+5, LOOKUP+8, LOOKUP+27, LOOKUP+30, LOOKUP+31, LOOKUP+35 | 
| STUFREC | LOOKUP+47 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(12 | FOLLOWUP+4, FOLLOWUP+7, FOLLOWUP+9, FOLLOWUP+16 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| BTIUVSIT | LOOKUP+26~ | 
| DA | LOOKUP+2~, CANEDIT~, CANEDIT+1, MAKEADD+1~, MAKEADD+5*, MAKEADD+6, MAKEADD+8, STUFREC~, STUFREC+2, DELTEXT~ | 
| DFN | LOOKUP+2~, LOOKUP+30, LOOKUP+34, STUFREC+4, FOLLOWUP+1~, FOLLOWUP+17*, FOLLOWUP+20, FOLLOWUP+21 | 
| DIC | ILOC+1~, ILOC+2*, MAKEADD+1~, MAKEADD+3*, MAKEADD+6, WHATYPE+3~, WHATYPE+4*, WHATITLE+3~, WHATITLE+4* | 
| DIC("S" | WHATYPE+5*, WHATYPE+6!, WHATITLE+5*, WHATITLE+6! | 
| DIC(0 | ILOC+2*, MAKEADD+3*, WHATYPE+4*, WHATITLE+4* | 
| DIE | MAKEADD+1~, MAKEADD+6*, DELTEXT+1~, DELTEXT+2* | 
| DLAYGO | MAKEADD+1~, MAKEADD+3* | 
| DR | MAKEADD+1~, MAKEADD+6*, DELTEXT+1~, DELTEXT+2* | 
| FDA | STUFREC+1~, FOLLOWUP+1~ | 
| FDARR | STUFREC+1~, STUFREC+2*, STUFREC+4, STUFREC+5, STUFREC+6, STUFREC+7, STUFREC+8, STUFREC+9, STUFREC+11, STUFREC+13 , STUFREC+14, STUFREC+15, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19, STUFREC+20, STUFREC+21, STUFREC+22, STUFREC+23 , STUFREC+24, STUFREC+25, STUFREC+26, FOLLOWUP+1~, FOLLOWUP+2*, FOLLOWUP+3, FOLLOWUP+5, FOLLOWUP+10 | 
| FLAGS | STUFREC+1~, STUFREC+2*, STUFREC+27, FOLLOWUP+1~, FOLLOWUP+2*, FOLLOWUP+6, FOLLOWUP+10 | 
| IENS | STUFREC+1~, STUFREC+2*, FOLLOWUP+1~, FOLLOWUP+2* | 
| LOCATION | ILOC~, ILOC+2 | 
| PARENT | STUFREC~, STUFREC+3, STUFREC+12, STUFREC+13, STUFREC+14, STUFREC+15, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19 | 
| TIU | LOOKUP+2~, LOOKUP+30, LOOKUP+34, FOLLOWUP+1~, FOLLOWUP+21 | 
| TIU("EDT" | LOOKUP+31, STUFREC+6 | 
| TIU("INST" | STUFREC+22 | 
| TIU("LDT" | STUFREC+7 | 
| TIU("LOC" | STUFREC+9, STUFREC+21 | 
| TIU("SVC" | STUFREC+11 | 
| TIU("VISIT" | LOOKUP+27, STUFREC+4 | 
| TIU("VLOC" | STUFREC+9 | 
| TIU("VSTR" | STUFREC+25, FOLLOWUP+14, FOLLOWUP+22 | 
| TIUATYP | MAKEADD+1~, MAKEADD+2*, MAKEADD+3, MAKEADD+6 | 
| TIUD0 | FOLLOWUP+15~, FOLLOWUP+16*, FOLLOWUP+17 | 
| TIUD12 | FOLLOWUP+15~, FOLLOWUP+16*, FOLLOWUP+18, FOLLOWUP+19 | 
| TIUDA | FOLLOWUP~, FOLLOWUP+2, FOLLOWUP+3, FOLLOWUP+4, FOLLOWUP+5, FOLLOWUP+7, FOLLOWUP+9, FOLLOWUP+11, FOLLOWUP+12, FOLLOWUP+13 , FOLLOWUP+16 | 
| TIUDAD | LOOKUP+2~, LOOKUP+41*, LOOKUP+45*, LOOKUP+47, LOOKUP+48 | 
| >> TIUDDT | STUFREC+23 | 
| TIUDPRM | LOOKUP+3~, LOOKUP+20, LOOKUP+34, FOLLOWUP+8! | 
| TIUEDIT | LOOKUP+2~, LOOKUP+43*, LOOKUP+44, LOOKUP+45 | 
| TIUEDT | LOOKUP+2~, LOOKUP+14*, LOOKUP+15, FOLLOWUP+15~, FOLLOWUP+17*, FOLLOWUP+18, FOLLOWUP+20, FOLLOWUP+21 | 
| TIUFPRIV | MAKEADD+1~*, WHATYPE+3~*, WHATITLE+3~* | 
| >> TIUHDR( | LOOKUP+49!, LOOKUP+50!, MAKEADD+7! | 
| >> TIUHDR(1301 | LOOKUP+49! | 
| TIUHLOC | FOLLOWUP+15~, FOLLOWUP+18*, FOLLOWUP+19 | 
| >> TIUINST | LOOKUP+13* | 
| TIULDT | LOOKUP+2~, LOOKUP+14*, FOLLOWUP+15~, FOLLOWUP+18*, FOLLOWUP+20, FOLLOWUP+21 | 
| >> TIULOC | LOOKUP+10*, LOOKUP+12*, LOOKUP+13 | 
| TIUMSG | STUFREC+1~, FOLLOWUP+1~ | 
| TIUNEW | LOOKUP+2~, LOOKUP+34, LOOKUP+38 | 
| >> TIUSSN | LOOKUP+5, LOOKUP+6*, LOOKUP+7*, LOOKUP+8 | 
| >> TIUTITLE | LOOKUP+16 | 
| >> TIUTYP(1 | LOOKUP+32*, LOOKUP+34 | 
| TIUTYPE | LOOKUP+2~, LOOKUP+16*, LOOKUP+17, LOOKUP+19, LOOKUP+20, LOOKUP+32 | 
| >> TIUVDT | LOOKUP+5, LOOKUP+14, LOOKUP+31 | 
| TIUVLOC | FOLLOWUP+15~, FOLLOWUP+19*, FOLLOWUP+20, FOLLOWUP+21 | 
| TIUXCRP | LOOKUP+2~ | 
| U | LOOKUP+32, CANEDIT+1, STUFREC+4, STUFREC+6, STUFREC+7, STUFREC+9, STUFREC+11, STUFREC+13, STUFREC+14, STUFREC+16 , STUFREC+17, STUFREC+18, STUFREC+19, STUFREC+21, STUFREC+22, FOLLOWUP+4, FOLLOWUP+7, FOLLOWUP+9, FOLLOWUP+17, FOLLOWUP+18 , FOLLOWUP+19 | 
| X | ILOC+1~, ILOC+2*, MAKEADD+1~, MAKEADD+3*, DELTEXT+1~, WHATYPE~, WHATITLE~ | 
| Y | LOOKUP+5*, LOOKUP+8*, LOOKUP+15*, LOOKUP+17*, LOOKUP+19*, LOOKUP+27*, LOOKUP+30*, LOOKUP+31*, LOOKUP+34*, LOOKUP+35 , LOOKUP+41*, LOOKUP+43, LOOKUP+44, LOOKUP+45*, LOOKUP+46, LOOKUP+47, LOOKUP+48, ILOC+1~, ILOC+3, MAKEADD+1~ , MAKEADD+5, DELTEXT+1~, WHATYPE+3~, WHATYPX, WHATITLE+3~, WHATITX |