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

Package: Text Integration Utility

Routine: TIUFLF6


Information

TIUFLF6 ; SLC/MAM - Library; File 8925.1 Related: ASKSTAT(FILEDA,NODE0,PFILEDA,NEWFLAG,XFLG), AUTOSTAT(FILEDA,NODE0,STAT),DESCSTAT(FILEDA,NEWSTAT) ; 03/16/2007

Source Information

Source file <TIUFLF6.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Text Integration Utility 4 INACTIVE^TIUFHA3  ($$SELSTAT,$$STATWORD)^TIUFLF5  PAUSE^TIUFXHLX  DIRECT^TIUMAP2  
VA Fileman 1 ^DIE  

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Text Integration Utility 9 TIUFD2  TIUFD3  TIUFHA2  TIUFHA3  TIUFHA4  TIUFHA7  TIUFHA8  TIUFLF1  
TIUFLJ1  

Entry Points

Name Comments DBIA/ICR reference
DESCSTAT(FILEDA,NEWSTAT) ; Edits Status of all descendants of FILEDA
ASKSTAT(FILEDA,NODE0,PFILEDA,NEWFLAG,XFLG) ; User edit FILEDA Status. Does AUTOSTAT.
; Requires FILEDA,NODE0
; Requires PFILEDA if FILEDA has an actual/prospective parent.
; Returns NEWFLAG=0 if Status unchanged, = 1^ExternalNewStatus if changed, e.g. 1^ACTIVE
; Returns XFLG=1 if user ^exited or timed out, else as received.
CANEX
DESCX
CANEDIT(FILEDA) ; Function returns 1 if Shared Component can be edited, else 0
; Can be edited if all parent Titles are Inactive. Ignores parents which don't exist or have no Status.
READST
AUTOSTAT(FILEDA,NODE0,STAT) ; Auto edit FILEDA to Status STAT; Auto edit FILEDA descendants
ASKSX

External References

Name Field # of Occurrence
^DIE AUTOSTAT+4, AUTOSTAT+9, AUTOSTAT+19, DESCSTAT+12
INACTIVE^TIUFHA3 READST+5
$$SELSTAT^TIUFLF5 READST
$$STATWORD^TIUFLF5 ASKSTAT+8, CANEDIT+7
PAUSE^TIUFXHLX CANEDIT+5, CANEDIT+7
DIRECT^TIUMAP2 AUTOSTAT+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ?? Enter appropriate Status or '^' to exit",!
  • Line Location: READST+2
Function Call: WRITE
  • Prompt: !!,$C(7),"You MUST first map ",$P(NODE0,U),!
  • Line Location: AUTOSTAT+14
Function Call: WRITE
  • Prompt: $C(7)," Status Unchanged...",!
  • Line Location: AUTOSTAT+16
Function Call: WRITE
  • Prompt: " Entry Activated.",!
  • Line Location: AUTOSTAT+18
Function Call: WRITE
  • Prompt: !!," File Entry "_FILEDA_" has Nonexistent item "_IFILEDA_"; See IRM",!
  • Line Location: DESCSTAT+10
Function Call: WRITE
  • Prompt: " File Entry "_PFILEDA_" from AD XREF is missing from the file: See IRM"
  • Line Location: CANEDIT+5
Function Call: WRITE
  • Prompt: " File Entry "_PFILEDA_" has No Status/Bad Status"
  • Line Location: CANEDIT+7
Routine Call
  • DIE
  • Line Location:
    • AUTOSTAT+4
    • AUTOSTAT+9
    • AUTOSTAT+19
    • DESCSTAT+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925.1 - [#8925.1] AUTOSTAT+13, AUTOSTAT+16, DESCSTAT+7, DESCSTAT+8, DESCSTAT+9, CANEDIT+4, CANEDIT+5, CANEDIT+6

Label References

Name Line Occurrences
$$CANEDIT CANEDIT+9
ASKSX READST+1
AUTOSTAT READST+6
CANEX CANEDIT+4
DESCSTAT AUTOSTAT+7, AUTOSTAT+10, AUTOSTAT+21, DESCSTAT+13
READST READST+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CONTINUE ASKSTAT+5~
DA AUTOSTAT+1~, AUTOSTAT+2*, AUTOSTAT+13, AUTOSTAT+15, AUTOSTAT+16, DESCSTAT+5~, DESCSTAT+12*
DEFLT ASKSTAT+6~, ASKSTAT+8*, READST
DIE AUTOSTAT+1~, AUTOSTAT+4*, AUTOSTAT+9*, AUTOSTAT+19*, DESCSTAT+5~, DESCSTAT+6*
DIR ASKSTAT+5~
DR AUTOSTAT+1~, AUTOSTAT+4*, AUTOSTAT+9*, AUTOSTAT+19*, DESCSTAT+12*
>> DTOUT READST+1, ASKSX, CANEDIT+4, CANEX
DUOUT READST!, READST+1, ASKSX
EDITANS CANEDIT+2~, CANEDIT+3*, CANEDIT+4, CANEDIT+8*, CANEDIT+9*, CANEX*, CANEX+1
FILEDA ASKSTAT~, READST, READST+5, READST+6, AUTOSTAT~, AUTOSTAT+2, AUTOSTAT+7, AUTOSTAT+10, AUTOSTAT+21, DESCSTAT~
, DESCSTAT+7, DESCSTAT+8, DESCSTAT+10, CANEDIT~, CANEDIT+4
IFILEDA DESCSTAT+5~, DESCSTAT+8*, DESCSTAT+9, DESCSTAT+10, DESCSTAT+12, DESCSTAT+13
INODE0 DESCSTAT+5~, DESCSTAT+9*, DESCSTAT+10, DESCSTAT+11
NEWFLAG ASKSTAT~, ASKSTAT+7*, READST+3*, READST+5, READST+6
NEWSTAT ASKSTAT+5~, READST+3*, READST+4*, READST+5, READST+6, DESCSTAT~, DESCSTAT+13
NODE0 ASKSTAT~, ASKSTAT+8, READST+3, READST+5, READST+6, AUTOSTAT~, AUTOSTAT+5, AUTOSTAT+13, AUTOSTAT+14, AUTOSTAT+21
PFILEDA ASKSTAT~, READST, CANEDIT+2~, CANEDIT+3*, CANEDIT+4*, CANEDIT+5, CANEDIT+6, CANEDIT+7, CANEDIT+9
PNODE0 CANEDIT+2~, CANEDIT+6*, CANEDIT+7
PSTATUS CANEDIT+2~, CANEDIT+7*, CANEDIT+8
PTYPE CANEDIT+2~, CANEDIT+6*, CANEDIT+7, CANEDIT+8, CANEDIT+9
STAT AUTOSTAT~, AUTOSTAT+3, AUTOSTAT+8, AUTOSTAT+11, AUTOSTAT+21
STATUS ASKSTAT+6~, READST*, READST+2, READST+3, DESCSTAT+5~
TIUFPFDA ASKSTAT+5~
TIUFSTAT ASKSTAT+5~
TIUI DESCSTAT+5~, DESCSTAT+6*, DESCSTAT+7*, DESCSTAT+8
TIUJ ASKSTAT+5~
TIUOUT AUTOSTAT+12~, AUTOSTAT+13, AUTOSTAT+17*
U ASKSTAT+8, READST+3, READST+4, READST+5, AUTOSTAT+5, AUTOSTAT+13, AUTOSTAT+14, AUTOSTAT+21, DESCSTAT+11, CANEDIT+6
, CANEDIT+7
>> VALMBCK AUTOSTAT+17*
X ASKSTAT+5~, AUTOSTAT+1~, DESCSTAT+5~
XFLG ASKSTAT~, ASKSX*
XQORM ASKSTAT+5~
Y ASKSTAT+5~, AUTOSTAT+1~, DESCSTAT+5~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All