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 |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: TIUPUTPF

Package: Text Integration Utility

Routine: TIUPUTPF


Information

TIUPUTPF ; SLC/JER - PRF Look-up Method - ;04-Jun-2012 16:22;DU

Source Information

Source file <TIUPUTPF.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
Text Integration Utility 11 SENDADD^TIUALRT  AUDIT^TIUEDI1  ($$EXIST,$$GETRECNW)^TIUEDI3  ($$CHKSUM,$$IDATE,$$NOW)^TIULC  ($$DIVISION,$$DOCCLASS,$$PNAME,$$WHOCOSIG,$$WHOSIGNS,DOCPRM)^TIULC1  MAIN^TIUMOVE  ($$LINK,$$SELECT)^TIUPRF1  ($$AVAILACT,$$ISPFTTL)^TIUPRFL  
ENQ^TIUPXAP1  RELEASE^TIUT  MAIN^TIUVSIT  
Kernel 2 ($$FMADD,$$NOW)^XLFDT  $$STRIP^XLFSTR  
VA Fileman 2 ^DIC  (,FILE)^DIE  
Registration 1 $$GETHTIU^DGPFAPI1  

Entry Points

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
STUFREC(DA,PARENT) ; Stuff fixed field data
ONEACTX ;
WHATITX
WHATYPE(X) ; Identify document type
; Receives: X=Document Definition Name
; Returns: Y=Document Definition IFN
FOLLOWUP(TIUDA) ; Post-filing code for PRF
LOOKUP ; Look-up code used by router/filer
; Required: TIUSSN, TIUVDT
; -- Selected flag action is set in LOOKUP & in GETCHECK^TIUPFFIX;
; Action is used in post-file code to link note.
; Kill it before setting it:
WHATITLE(X) ; Identify document title
; Receives: X=Document Definition Name
; Returns: Y=Document Definition IFN
ONEACT(DFN,TIUTYPE) ; If there is exactly one Assigment History Action
; available for pat DFN & Title TIUTYPE, return ASSGNIEN^ACTIEN;
; else return 0
ILOC(LOCATION) ; Get pointer to file 44
MAKEADD() ; Create an addendum record

External References

Name Field # of Occurrence
$$GETHTIU^DGPFAPI1 ONEACT+8
^DIC ILOC+2, MAKEADD+4, WHATYPE+6, WHATITLE+6
^DIE MAKEADD+6, DELTEXT+2
FILE^DIE STUFREC+27, FOLLOWUP+6, FOLLOWUP+8
SENDADD^TIUALRT LOOKUP+49
AUDIT^TIUEDI1 FOLLOWUP+10
$$EXIST^TIUEDI3 LOOKUP+30
$$GETRECNW^TIUEDI3 LOOKUP+39
$$CHKSUM^TIULC FOLLOWUP+10
$$IDATE^TIULC LOOKUP+18, LOOKUP+29, STUFREC+23
$$NOW^TIULC STUFREC+8, STUFREC+20
$$DIVISION^TIULC1 LOOKUP+17
$$DOCCLASS^TIULC1 MAKEADD+6
$$PNAME^TIULC1 LOOKUP+38
$$WHOCOSIG^TIULC1 FOLLOWUP+5
$$WHOSIGNS^TIULC1 FOLLOWUP+3
DOCPRM^TIULC1 LOOKUP+24
MAIN^TIUMOVE LOOKUP+26
$$LINK^TIUPRF1 FOLLOWUP+13
$$SELECT^TIUPRF1 LOOKUP+33
$$AVAILACT^TIUPRFL ONEACT+11
$$ISPFTTL^TIUPRFL LOOKUP+23
ENQ^TIUPXAP1 FOLLOWUP+24
RELEASE^TIUT FOLLOWUP+9
MAIN^TIUVSIT LOOKUP+27, FOLLOWUP+22
$$FMADD^XLFDT LOOKUP+18, FOLLOWUP+19
$$NOW^XLFDT STUFREC+25
$$STRIP^XLFSTR LOOKUP+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] LOOKUP+16, LOOKUP+25
^TIU(8925 - [#8925] LOOKUP+45, CANEDIT+1, STUFREC+13, STUFREC+14, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19, FOLLOWUP+4, FOLLOWUP+7
, FOLLOWUP+12, FOLLOWUP+17
^TMP("TIUPRF" LOOKUP+35!
^TMP("TIUPRFH" ONEACTX+1!
^TMP("TIUPRFUP" LOOKUP+5!, LOOKUP+36*, LOOKUP+37, FOLLOWUP+11, FOLLOWUP+13, FOLLOWUP+14!

Label References

Name Line Occurrences
$$CANEDIT LOOKUP+44
$$ILOC LOOKUP+15
$$MAKEADD LOOKUP+46
$$ONEACT LOOKUP+35
$$WHATITLE LOOKUP+20, MAKEADD+2
DELTEXT LOOKUP+45
LOOKUPX LOOKUP+10, LOOKUP+13, LOOKUP+16, LOOKUP+28, LOOKUP+29, LOOKUP+37, LOOKUP+40
ONEACTX ONEACT+9
STUFREC LOOKUP+48

Naked Globals

Name Field # of Occurrence
^(12 FOLLOWUP+4, FOLLOWUP+7, FOLLOWUP+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAYNM ONEACT+6~, ONEACT+7*, ONEACT+8, ONEACT+10, ONEACT+11
DA LOOKUP+6~, CANEDIT~, CANEDIT+1, MAKEADD+1~, MAKEADD+5*, MAKEADD+6, MAKEADD+8, STUFREC~, STUFREC+2, DELTEXT~
DFN LOOKUP+6~, LOOKUP+26, LOOKUP+27, LOOKUP+28, LOOKUP+30, LOOKUP+33, LOOKUP+35, LOOKUP+39, ONEACT~, ONEACT+8
, STUFREC+4, FOLLOWUP+1~, FOLLOWUP+18*, FOLLOWUP+21, FOLLOWUP+22
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*
DUZ LOOKUP+30
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+8
FLAGS STUFREC+1~, STUFREC+2*, STUFREC+27, FOLLOWUP+1~, FOLLOWUP+2*, FOLLOWUP+6, FOLLOWUP+8
IENS STUFREC+1~, STUFREC+2*, FOLLOWUP+1~, FOLLOWUP+2*
LOCATION ILOC~, ILOC+2
ONEIEN ONEACT+6~, ONEACT+11
PARENT STUFREC~, STUFREC+3, STUFREC+12, STUFREC+13, STUFREC+14, STUFREC+15, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19
>> PRFILERR LOOKUP+33, LOOKUP+35
RESULT ONEACT+6~, ONEACT+7*, ONEACT+11*, ONEACTX+2
TIU LOOKUP+6~, LOOKUP+26, LOOKUP+27, LOOKUP+28, LOOKUP+39, FOLLOWUP+1~, FOLLOWUP+22
TIU("EDT" LOOKUP+29, STUFREC+6
TIU("INST" STUFREC+22
TIU("LDT" STUFREC+7
TIU("LOC" STUFREC+9, STUFREC+21
TIU("SVC" STUFREC+11
TIU("VISIT" STUFREC+4
TIU("VLOC" STUFREC+9
TIU("VSTR" LOOKUP+30, STUFREC+25, FOLLOWUP+15, FOLLOWUP+23
TIUASACT LOOKUP+7~, LOOKUP+33*, LOOKUP+35*, LOOKUP+36
TIUASSGN ONEACT+6~, ONEACT+10*, ONEACT+11
TIUATYP MAKEADD+1~, MAKEADD+2*, MAKEADD+3, MAKEADD+6
TIUD0 FOLLOWUP+16~, FOLLOWUP+17*, FOLLOWUP+18
TIUD12 FOLLOWUP+16~, FOLLOWUP+17*, FOLLOWUP+19, FOLLOWUP+20
TIUDA FOLLOWUP~, FOLLOWUP+2, FOLLOWUP+3, FOLLOWUP+4, FOLLOWUP+5, FOLLOWUP+7, FOLLOWUP+9, FOLLOWUP+10, FOLLOWUP+12, FOLLOWUP+13
, FOLLOWUP+17
TIUDAD LOOKUP+6~, LOOKUP+46*, LOOKUP+48, LOOKUP+49
>> TIUDDT STUFREC+23
TIUDFN FOLLOWUP+12~*, FOLLOWUP+13
TIUDG ONEACT+6~, ONEACT+8*, ONEACT+9
TIUDPRM LOOKUP+7~, LOOKUP+24, LOOKUP+39
TIUEDIT LOOKUP+6~, LOOKUP+44*, LOOKUP+45, LOOKUP+46
TIUEDT LOOKUP+6~, LOOKUP+18*, LOOKUP+19, LOOKUP+26, LOOKUP+27, FOLLOWUP+16~, FOLLOWUP+18*, FOLLOWUP+19, FOLLOWUP+21, FOLLOWUP+22
TIUEXIST LOOKUP+7~, LOOKUP+8*, LOOKUP+30*, LOOKUP+37
TIUFPRIV MAKEADD+1~*, WHATYPE+3~*, WHATITLE+3~*
>> TIUHDR( LOOKUP+50!, MAKEADD+7!
>> TIUHDR(1301 LOOKUP+50!
TIUHLOC FOLLOWUP+16~, FOLLOWUP+19*, FOLLOWUP+20
>> TIUINST LOOKUP+17*
TIULDT LOOKUP+6~, LOOKUP+18*, LOOKUP+26, LOOKUP+27, FOLLOWUP+16~, FOLLOWUP+19*, FOLLOWUP+21, FOLLOWUP+22
>> TIULOC LOOKUP+15*, LOOKUP+16, LOOKUP+17, LOOKUP+25, LOOKUP+26, LOOKUP+27
TIUMSG STUFREC+1~, FOLLOWUP+1~
TIUNEW LOOKUP+7~, LOOKUP+39, LOOKUP+43
>> TIUSSN LOOKUP+10, LOOKUP+11*, LOOKUP+12*, LOOKUP+13, LOOKUP+26, LOOKUP+27
TIUTEMP FOLLOWUP+1~, FOLLOWUP+13*
>> TIUTITLE LOOKUP+20
>> TIUTYP(1 LOOKUP+38*, LOOKUP+39
TIUTYPE LOOKUP+6~, LOOKUP+20*, LOOKUP+21, LOOKUP+23, LOOKUP+24, LOOKUP+30, LOOKUP+33, LOOKUP+35, LOOKUP+38, ONEACT~
, ONEACT+8
>> TIUVDT LOOKUP+10, LOOKUP+18, LOOKUP+29
TIUVLOC FOLLOWUP+16~, FOLLOWUP+20*, FOLLOWUP+21, FOLLOWUP+22
TIUXCRP LOOKUP+6~
U LOOKUP+25, LOOKUP+38, ONEACT+11, 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+12
, FOLLOWUP+13, FOLLOWUP+18, FOLLOWUP+19, FOLLOWUP+20
X ILOC+1~, ILOC+2*, MAKEADD+1~, MAKEADD+3*, DELTEXT+1~, WHATYPE~, WHATITLE~
Y LOOKUP+10*, LOOKUP+13*, LOOKUP+16*, LOOKUP+19*, LOOKUP+21*, LOOKUP+23*, LOOKUP+28*, LOOKUP+29*, LOOKUP+37*, LOOKUP+39*
, LOOKUP+40, LOOKUP+44, LOOKUP+45, LOOKUP+46*, LOOKUP+47, LOOKUP+48, LOOKUP+49, ILOC+1~, ILOC+3, MAKEADD+1~
, MAKEADD+5, DELTEXT+1~, WHATYPE+3~, WHATYPX, WHATITLE+3~, WHATITX
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All