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

Package: Text Integration Utility

Routine: TIUTPBN


Information

TIUTPBN ; SLC/AJB - Trans Pharm Care Note ; July 29, 2003 [3/16/04 1:37pm]

Source Information

Source file <TIUTPBN.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 4 ^DIC  UPDATE^DIE  ^DIK  ^DIR  
Kernel 1 $$FMTE^XLFDT  
Outpatient Pharmacy 1 OCL^PSOORRL  

Entry Points

Name Comments DBIA/ICR reference
PRE ;
EN ;
GETCLASS ;
CHKTITLE(FILE,NAME) ;
MKOBJ(NAME,METHOD) ;
BOILTXT ;
ADD(TXT) ;
MKOBJS() ;
EXIT
ADDSTR(STR1,STR2,MAX) ;
AOPMEDS(DFN,TARGET) ;
GETBOIL ;

External References

Name Field # of Occurrence
^DIC CHKTITLE+4, GETCLASS+4
UPDATE^DIE EN+27, EN+36, EN+46, MKOBJ+9
^DIK PRE+5
^DIR EXIT+3
OCL^PSOORRL AOPMEDS+3
$$FMTE^XLFDT AOPMEDS+32

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IOCUON,@IOF
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !!,"The Health Summary Object did not install correctly."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"Installation cannot continue."
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,"Installation Error: Class owner cannot be defined.",!
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!,"Installation Aborted by User."
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !!,"Installation Error: Invalid Selection.",!
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !,"A DOCUMENT CLASS must be entered or '^' to abort."
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !!,"The following error message was returned:",!!
  • Line Location: EN+29
Function Call: WRITE
  • Prompt: MSG("DIERR",1,"TEXT",MSG),!
  • Line Location: EN+30
Function Call: WRITE
  • Prompt: !!,"Creation of TRANSITIONAL PHARMACY BENEFIT NOTE title successful...",!
  • Line Location: EN+31
Function Call: WRITE
  • Prompt: !!,"The following error message was returned:",!!
  • Line Location: EN+38
Function Call: WRITE
  • Prompt: MSG("DIERR",1,"TEXT",MSG),!
  • Line Location: EN+39
Function Call: WRITE
  • Prompt: !,"Addition of "_$P(^TIU(8925.1,TIUPRNT,0),U)_" as parent successful...",!
  • Line Location: EN+40
Function Call: WRITE
  • Prompt: !!,"The following error message was returned:",!!
  • Line Location: EN+48
Function Call: WRITE
  • Prompt: MSG("DIERR",1,"TEXT",MSG),!
  • Line Location: EN+49
Function Call: WRITE
  • Prompt: !,"Boilerplate text and objects added successfully.",!
  • Line Location: EN+50
Function Call: WRITE
  • Prompt: !,"Update finished.",!
  • Line Location: EN+51
Function Call: WRITE
  • Prompt: !,"*** The TRANSITIONAL PHARMACY BENEFIT NOTE title must be"
  • Line Location: EN+52
Function Call: WRITE
  • Prompt: !,"*** activated before use.",!
  • Line Location: EN+53
Function Call: WRITE
  • Prompt: !
  • Line Location: GETCLASS+4
Function Call: WRITE
  • Prompt: !!,"Installation Error: TIU Object creation failed.",!
  • Line Location: MKOBJS+4
Function Call: WRITE
  • Prompt: !!,"Installation Error: TIU Object creation failed.",!
  • Line Location: MKOBJS+6
Function Call: WRITE
  • Prompt: !!,"Installation Error: TIU Object creation failed.",!
  • Line Location: MKOBJS+8
Function Call: WRITE
  • Prompt: !!,"TIU Object "_NAME_" creation failed. The following error message was returned:",!!
  • Line Location: MKOBJ+11
Function Call: WRITE
  • Prompt: MSG("DIERR",1,"TEXT",MSG),!
  • Line Location: MKOBJ+12
Function Call: WRITE
  • Prompt: !!,"Creation of TIU Object "_NAME_" successful..."
  • Line Location: MKOBJ+13
Routine Call
  • DIE
  • Line Location:
    • EN+27
    • EN+36
    • EN+46
    • MKOBJ+9
Routine Call
  • DIC
  • Line Location:
    • CHKTITLE+4
    • GETCLASS+4
Routine Call
  • DIR
  • Line Location:
    • EXIT+3

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("EON" EN+1
^TIU(8925.1 - [#8925.1] EN+40, PRE+3
^TMP("PS" AOPMEDS+6, AOPMEDS+7, AOPMEDS+14, AOPMEDS+15, AOPMEDS+17, AOPMEDS+36!

Label References

Name Line Occurrences
$$CHKTITLE EN+4, EN+8, EN+10, EN+23, MKOBJS+2, MKOBJ+5
$$MKOBJ MKOBJS+3, MKOBJS+5, MKOBJS+7
$$MKOBJS EN+17
@( PRE+7
ADD ADDSTR+3, ADDSTR+4, ADDSTR+7, ADDSTR+11
ADDSTR AOPMEDS+22, AOPMEDS+29, AOPMEDS+30, AOPMEDS+31, AOPMEDS+32, AOPMEDS+35
EXIT EN+4, EN+10, EN+16
GETBOIL EN+42
GETCLASS EN+12
PRE EN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT ADDSTR+1~, ADDSTR+2*, ADDSTR+9*, ADDSTR+10, ADDSTR+11
DA PRE+1~, PRE+3*, PRE+5
DFN AOPMEDS~, AOPMEDS+3
DIC CHKTITLE+1~, CHKTITLE+2*, GETCLASS+1~, GETCLASS+3*
DIC("A" GETCLASS+2*
DIC("S" GETCLASS+3*
DIC(0 CHKTITLE+2*, GETCLASS+3*
DIK PRE+1~, PRE+4*
DIR EXIT+1~
DIR(0 EXIT+2*
DONE ADDSTR+1~, ADDSTR+2*, ADDSTR+5, ADDSTR+7*, ADDSTR+8, ADDSTR+11*
DRUG AOPMEDS+1~, AOPMEDS+19*, AOPMEDS+20*, AOPMEDS+21, AOPMEDS+28, AOPMEDS+29, AOPMEDS+30, AOPMEDS+32
>> DUOUT EN+11, EN+13
EMPTY AOPMEDS+1~, AOPMEDS+2*, AOPMEDS+12*, AOPMEDS+34
FDA EN+2~, MKOBJ+1~
FDA( EN+18*, EN+19*, EN+20*, EN+21*, EN+22*, EN+23*, EN+24*, EN+25*, EN+26*, EN+34*
, EN+35*, EN+45*, MKOBJ+2*, MKOBJ+3*, MKOBJ+4*, MKOBJ+5*, MKOBJ+6*, MKOBJ+7*, MKOBJ+8*
FDAIEN EN+2~, EN+43!, MKOBJ+1~
FDAIEN( EN+44*
FDAIEN(1 EN+33, EN+34
FILE CHKTITLE~, CHKTITLE+2
INDEX AOPMEDS+1~, AOPMEDS+5*, AOPMEDS+6*, AOPMEDS+7, AOPMEDS+13, AOPMEDS+14, AOPMEDS+15, AOPMEDS+17, AOPMEDS+19*, AOPMEDS+20*
, AOPMEDS+21, AOPMEDS+28, AOPMEDS+29, AOPMEDS+30, AOPMEDS+32
>> IOCUON EN+1
IOF EN+1
LINE GETBOIL+1~, GETBOIL+2*
LINETXT GETBOIL+1~, GETBOIL+2*
MAX ADDSTR~, ADDSTR+4, ADDSTR+7, ADDSTR+11
METHOD MKOBJ~, MKOBJ+7
MSG EN+2~, EN+28, EN+30*, EN+37, EN+39*, EN+47, EN+49*, MKOBJ+1~, MKOBJ+10, MKOBJ+12*
MSG("DIERR" EN+30, EN+39, EN+49, MKOBJ+12
NAME CHKTITLE~, CHKTITLE+3, MKOBJ~, MKOBJ+2, MKOBJ+3, MKOBJ+11, MKOBJ+13, PRE+1~, PRE+2*, PRE+3
, PRE+6*, PRE+7
NEXTLINE ADD+1*, ADD+2, AOPMEDS+1~, AOPMEDS+2*
NODE AOPMEDS+1~, AOPMEDS+7*, AOPMEDS+8, AOPMEDS+9, AOPMEDS+10*, AOPMEDS+13, AOPMEDS+14, AOPMEDS+17, AOPMEDS+21*, AOPMEDS+25
, AOPMEDS+29, AOPMEDS+31, AOPMEDS+32
NVAMED AOPMEDS+1~, AOPMEDS+25*, AOPMEDS+26*, AOPMEDS+27
NVASTR AOPMEDS+1~, AOPMEDS+24*, AOPMEDS+27*, AOPMEDS+29
POP EN+2~
SIG AOPMEDS+23~*, AOPMEDS+28*, AOPMEDS+29, AOPMEDS+30
STR1 ADDSTR~, ADDSTR+3, ADDSTR+4*, ADDSTR+7, ADDSTR+10, ADDSTR+11
STR2 ADDSTR~, ADDSTR+3, ADDSTR+4, ADDSTR+7, ADDSTR+11
TARGET ADD+2, AOPMEDS~, AOPMEDS+37
TIUDA EN+2~, EN+33*, EN+41*, EN+44, EN+45
TIUFPRIV EN+2~, EN+7*
TIUHSO MKOBJS+1~, MKOBJS+2*, MKOBJS+5
TIUIEN EN+2~, EN+8*, EN+9*, EN+11, EN+18, EN+19, EN+20, EN+21, EN+22, EN+23
, EN+24, EN+25, EN+26, EN+32, EN+41
TIUPRNT EN+2~, EN+11, EN+14, EN+16, EN+34, EN+35, EN+40, GETCLASS+5*
TIUSIG AOPMEDS+16~*, AOPMEDS+17*
TIUSTAT AOPMEDS+1~, AOPMEDS+10*, AOPMEDS+11
TIUSTATS AOPMEDS+1~, AOPMEDS+4*, AOPMEDS+11
TIUTMP EN+2~
TIUTMP( GETBOIL+2*
TMP ADDSTR+1~, ADDSTR+2*, ADDSTR+4*, ADDSTR+11*, AOPMEDS+1~
TMP( AOPMEDS+13*, AOPMEDS+14*, AOPMEDS+17*, AOPMEDS+20, AOPMEDS+21, AOPMEDS+28, AOPMEDS+29, AOPMEDS+30, AOPMEDS+32
TMPSTR ADDSTR+6~*, ADDSTR+10*, ADDSTR+11*
TXT ADD~, ADD+2
U EN+40, AOPMEDS+8, AOPMEDS+9, AOPMEDS+10, AOPMEDS+13, AOPMEDS+14, AOPMEDS+17, AOPMEDS+25, AOPMEDS+29, AOPMEDS+31
, AOPMEDS+32
X EXIT+1~, CHKTITLE+1~, CHKTITLE+3*, GETCLASS+1~, PRE+1~
>> XPDABORT EN+13*, EN+37*
Y EXIT+1~, CHKTITLE+1~, CHKTITLE+5, GETCLASS+1~, GETCLASS+5, PRE+1~

Marked Items

Name Field # of Occurrence
$T(BOILTXT+LINE GETBOIL+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All