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

Package: Text Integration Utility

Routine: TIUFWRAP


Information

TIUFWRAP ;SPFO/AJB - Evaluate & Clean File #8927 ;04/06/22 12:5

Source Information

Source file <TIUFWRAP.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 HOME^%ZIS  (CLEAN,PREP)^XGF  $$REPLACE^XLFSTR  
Text Integration Utility 3 WRAP^TIUFLD  (BACKUP,EMAIL,GATHER,PREPOUT,PRINT,RESTORE,UPDATE,VIEW)^TIUFWRAP1  ($$FMR,DISPLAY,HELP)^TIUFWRAP2  
VA FileMan 1 ^DIK  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Text Integration Utility 2 TIU ANALYZE/UPDATE FILE 8927  TIUFWRAP1  
Electronic Health Modernization 1 EHM-01734  

Entry Points

Name Comments DBIA/ICR reference
EN ; main entry
EE(IEN,LEVEL,PATH,LOD) ; evaluate entry
FBF(IEN,NODE,LINE) ; fix broken fields/objects
; only evaluates the current line and the next line
; case #1 - missing a single closing bracket at the end of a line
; either missing the bracket or wrapped
CHKOF(DATA) ; check the object/fields in a non-broken line
CHKOBJ(NAME,XREF) ; check if object exists
NXTLINE(IEN,ITEM) ; evaluate next line for suitability to merge
BROKEN(TEXT) ; check for broken field/object
WRAP(DATA,IEN,NODE,LAST) ;
EX80(DATA)
MERGE(DATA) ; merge lines of text criteria
DEL(PARENT,ITEM,CHILD) ;
HASBPTXT(IEN) ; does entry have BOILERPLATE TEXT?
HASITEMS(IEN) ; does entry have ITEMS?
CLEAN(DATA) ;
; remove trailing spaces, replace characters, remove control characters
RTS(X) ; remove trailing spaces
REPLACE(DATA) ; replace characters
CTRL(X)

External References

Name Field # of Occurrence
HOME^%ZIS EN+2
^DIK DEL+4, DEL+6
WRAP^TIUFLD WRAP+4
BACKUP^TIUFWRAP1 EN+3, EN+13
EMAIL^TIUFWRAP1 EN+26
GATHER^TIUFWRAP1 EN+18
PREPOUT^TIUFWRAP1 EN+19, EN+20, EN+21, EN+22, EN+23
PRINT^TIUFWRAP1 EN+25
RESTORE^TIUFWRAP1 EN+14
UPDATE^TIUFWRAP1 EN+15
VIEW^TIUFWRAP1 EN+24
$$FMR^TIUFWRAP2 EN+12, EN+18
DISPLAY^TIUFWRAP2 EN+9
HELP^TIUFWRAP2 EN+16
CLEAN^XGF EN+27
PREP^XGF EN+2
$$REPLACE^XLFSTR REPLACE+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IOCUON
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,"Analyzing File #8927..."
  • Line Location: EN+17
Function Call: WRITE
  • Prompt: !!,"No issues found...",!
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+27
Routine Call
  • %ZIS
  • Line Location:
    • EN+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TIU(8925.1 - [#8925.1] CHKOBJ+2, CHKOBJ+3
^TIU(8927 - [#8927] EE+2, EE+8, EE+12, EE+14!, EE+38, EE+51, EE+52, EE+59!*, FBF+8, FBF+10*
, FBF+15*, FBF+16*, FBF+22, FBF+24*, FBF+32*, FBF+33*, NXTLINE+1, NXTLINE+2, DEL+1, HASBPTXT+1
, HASITEMS+1
^TIU(8927.1 - [#8927.1] FBF+10, CHKOF+12, EX80+4, EX80+8
^TMP($J EN+4, EN+8!

Label References

Name Line Occurrences
$$BROKEN EE+25, EE+38, FBF+14, FBF+28
$$CHKOBJ FBF+24, FBF+29, CHKOF+4
$$CLEAN EE+39, EE+52
$$CTRL CLEAN+4
$$EE EE+16
$$EX80 EE+30, WRAP+3
$$HASBPTXT EE+61
$$HASITEMS EE+61
$$MERGE EE+32, EE+46
$$NXTLINE EE+33, EE+50
$$REPLACE CLEAN+3
$$RTS CLEAN+2
CHKOF EE+29
DEL EE+18
FBF EE+38
WRAP EE+48, EE+54

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DEL+3~
ANS EN+1~, EN+5*, EN+12*, EN+13*, EN+14*, EN+15*, EN+16*, EN+24*, EN+25*, EN+26*
, CHKOBJ+2~, CHKOBJ+3*, CHKOBJ+4
BENT EE+25~*, EE+26, EE+29
BROKEN EN+6~, EN+18, EN+21, EE+27, EE+28
BROKEN("COUNT" EN+21, EE+27*
BU EN+1~, EN+3, EN+10, EN+11, EN+13, EN+15
C EN+1~
CHILD DEL~, DEL+1, DEL+4
CL FBF+7~, FBF+8*, FBF+10, FBF+12*, FBF+14, FBF+15, FBF+21~, FBF+22*, FBF+24, FBF+26*
, FBF+28, FBF+32
CNT EE+7~, EE+8*, EE+9*, EE+10
CONT FBF+4~*, FBF+6, FBF+17*
DA DEL+3~, DEL+4*, DEL+6*
DA(1 DEL+6*
DATA EE+7~, EE+48, EE+54, EE+56, CHKOF~, CHKOF+2, CHKOF+3, CHKOF+4, CHKOF+7, CHKOF+8
, WRAP~, EX80~, EX80+1, EX80+2, EX80+3, EX80+4, MERGE~, MERGE+2, MERGE+3, CLEAN~
, CLEAN+2*, CLEAN+3*, CLEAN+4*, CLEAN+5, REPLACE~, REPLACE+3
DATA(8927 EE+41, EE+43*, EE+53*, EE+57, EE+58*, EE+59, WRAP+2, WRAP+6*
DIK DEL+3~, DEL+4*, DEL+6*
DIR EN+10~*, EN+12
DT EE+58
FIEN EX80+4~*, EX80+5, EX80+8
FLD FBF+4~*, FBF+5, FBF+7, CHKOF+1~, BROKEN+5~*, BROKEN+6, BROKEN+7, EX80+2~, EX80+3*, EX80+4
FNAME FBF+7~*, FBF+10, FBF+11*, CHKOF+8~*, CHKOF+9, CHKOF+12, EX80+4~*, EX80+9
I CTRL+1~*, CTRL+2*, CTRL+3
IEN EE~, EE+2, EE+8, EE+12, EE+14, EE+18, EE+27, EE+28, EE+33, EE+34
, EE+35, EE+38, EE+41, EE+43, EE+48, EE+50, EE+51, EE+52, EE+53, EE+54
, EE+57, EE+58, EE+59, EE+61, FBF~, FBF+8, FBF+10, FBF+15, FBF+16, FBF+22
, FBF+24, FBF+30, FBF+31, FBF+32, FBF+33, CHKOF+5, CHKOF+6, CHKOF+10, CHKOF+11, CHKOF+13
, CHKOF+14, NXTLINE~, NXTLINE+1, NXTLINE+2, WRAP~, WRAP+2, WRAP+6, EX80+6, EX80+7, HASBPTXT~
, HASBPTXT+1, HASITEMS~, HASITEMS+1
>> IOCUON EN+2
ITEM EE+7~, EE+8*, EE+12, EE+14, EE+18, EE+28, EE+33, EE+35, EE+38, EE+50
, EE+51*, EE+52, FBF+31, CHKOF+6, CHKOF+11, CHKOF+14, NXTLINE~, NXTLINE+1, EX80+7, DEL~
, DEL+6
LAST EE+41~*, EE+42*, EE+43, EE+48, EE+53, EE+54, WRAP~, WRAP+2, WRAP+6*
LAST("Start" WRAP+2*
LENGTH EX80+2~*, EX80+9*, EX80+14*, EX80+15
LEVEL EE~, EE+4, EE+5, EE+10*, EE+16, EE+17, EE+24, FBF+30, CHKOF+5, CHKOF+13
, EX80+6
LINE FBF~, FBF+5, FBF+7, FBF+8, FBF+20, FBF+21, FBF+22, NXTLINE+1~*, NXTLINE+2*, NXTLINE+4
, WRAP+1~, WRAP+5*, WRAP+6
LOD EE~, EE+16, EE+44, EE+48
LONG EN+6~, EN+18, EN+19, EE+34, EE+35
LONG("COUNT" EN+19, EE+34*
MAXLEN EX80+10~
MAXLEN( EX80+11*, EX80+12*, EX80+13*
MAXLEN("" EX80+14
NAME CHKOBJ~, CHKOBJ+1, CHKOBJ+2
NL FBF+7~, FBF+8*, FBF+11, FBF+12, FBF+13*, FBF+16, FBF+21~, FBF+22*, FBF+25, FBF+26
, FBF+27*, FBF+33
NODE EE+1~, EE+6*, EE+8, EE+9, EE+12, EE+13, EE+16, EE+20, EE+38, EE+41
, EE+43, EE+48, EE+51, EE+52, EE+53, EE+54, EE+56, FBF~, FBF+8, FBF+10
, FBF+15, FBF+16, FBF+22, FBF+24, FBF+32, FBF+33, WRAP~, WRAP+2, WRAP+6
NODE0 EE+1~, EE+2*, EE+3, EE+5, EE+61, WRAP+1~, WRAP+2*, WRAP+3, WRAP+4, EX80+8~*
, EX80+11, EX80+12, EX80+13
NOFLD EN+6~, EN+18, EN+22, CHKOF+10, CHKOF+11, CHKOF+13, CHKOF+14, EX80+6, EX80+7
NOFLD("COUNT" EN+22, CHKOF+10*, CHKOF+13*, EX80+6*
NOOBJ EN+6~, EN+23, FBF+30, FBF+31, CHKOF+5, CHKOF+6
NOOBJ("COUNT" EN+23, FBF+30*, CHKOF+5*
NUM CHKOF+1~, CHKOF+3*, CHKOF+4, CHKOF+7*, CHKOF+8
OBJ CHKOF+1~
ONAME FBF+21~*, FBF+24, FBF+25*, FBF+29, CHKOF+4~*
ONOK FBF+21~*
OUTPUT EN+1~, EN+4*, EN+17, EN+19, EN+20, EN+21, EN+22, EN+23, EN+28
PARENT DEL~, DEL+5, DEL+6
PATH EE~, EE+4*, EE+5*, EE+16, EE+17*, EE+19, EE+24*, EE+27, EE+34, FBF+30
, CHKOF+5, CHKOF+10, CHKOF+13, EX80+6
POP EN+1~
PROMPT EN+11~*, EN+12
REP WRAP+1~, REPLACE+1~, REPLACE+3
REP( REPLACE+1*
REP("$c" REPLACE+1*
REP("{{" REPLACE+2*
REP("}}" REPLACE+2*
REP2 WRAP+1~
RESULT BROKEN+1~*, BROKEN+3*, BROKEN+7*, BROKEN+8, EX80+2~*, MERGE+1~*, MERGE+4
TEXT BROKEN~, BROKEN+3, BROKEN+6, BROKEN+7
TIUDA CHKOBJ+2~*, CHKOBJ+3
TIUFT WRAP+1~
TIUFT( WRAP+5, WRAP+6
TOTAL EE+57~*, EE+58
TYPE EE+1~, EE+3*, DEL+1~*, DEL+2
U EN+12, EE+3, EE+5, EE+12, EE+17, EE+24, EE+28, EE+35, EE+61, FBF+30
, FBF+31, CHKOF+5, CHKOF+6, CHKOF+11, CHKOF+13, CHKOF+14, EX80+6, EX80+7, EX80+11, EX80+12
, EX80+13, DEL+1
UNLINKED EN+6~, EN+18, EN+20, EE+19
UNLINKED("COUNT" EN+20, EE+19*
>> UPDATE EE+13, EE+18, EE+23, EE+56
VALUE EE+12~*, EE+13, EE+16, EE+18, EE+19, EE+25, EE+29, EE+30, EE+31, EE+32
, EE+38*, EE+39*, EE+43, EE+45, EE+46, EE+52*, EE+53
X EN+1~, EN+7*, EN+8, BROKEN+7~*, WRAP+1~, DEL+3~, RTS~, RTS+1*, RTS+2, CTRL~
, CTRL+1, CTRL+2, CTRL+3*, CTRL+4
XREF CHKOBJ~, CHKOBJ+2
Y EN+1~, DEL+3~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All