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

Package: Imaging

Routine: MAGGSIU1


Information

MAGGSIU1 ;WOIFO/GEK/NST - Utilities for Image Add/Modify ; 04 Mar 2010 4:04 PM

Source Information

Source file <MAGGSIU1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 ^DIK  CLEAN^DILF  $$GET1^DIQ  
Text Integration Utility 2 ISCNSLT^TIUCNSLT  ISCP^TIUCP  
Imaging 1 DATA^MAGGNTI  

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
Imaging 3 MAGGSIA  MAGGSIA1  MAGGTIA  

Entry Points

Name Comments DBIA/ICR reference
MAKENAME(MAGGFDA) ; get info from the MAGGFDA array
; For all Images the Name (.01) is first 18 characters of patient name
; concatenated with SSN.
; If No patient name is sent, well make the name from the short desc.
; We were making name of :
; $E(PATENT NAME,1,10)' '$E(DESC CATEG,1,9)' 'MM/DD/YY (DOC DATE)
MAKECLAS ; Patch 8: This call will attempt to compute an Image CLASS ^ (#41) CLASS [2P]
; from the TYPE Field (#42) TYPE [3P]
; Call assumes the FM FDA Array MAGGFDA exists.
MAKEPKG ;Patch 8 This call will attempt to compute the field (#40) PACKAGE INDEX [1S] from Patent Data File.
; Call assumes the FM FDA Array MAGGFDA exists.
MAKEPROC ; Patch 8: This call will attempt to compute PROCEDURE field ^ (#6) PROCEDURE [8F]
; from Fields: (#41) CLASS [2P] or PACKAGE field (#40) PACKAGE [1S]
; Call assumes the FM FDA Array MAGGFDA exists.
; We are here because TYPE INDEX, CLASS INDEX and PACKAGE INDEX exist but PROCEDURE doesn't
; Calling RTN expects MAGERR to exist if error. ;
MAKEORIG ; Patch 8: This call will default the Origin field #45 to "VA"
; We are here because TYPE exists in the Array but Origin doesn't
KILLENT(MAGGDA) ; Delete the entry just created, because of Post processing Error
RTRNERR(ETXT,MAGGXE) ; There was error from UPDATE^DIE quit with error text
PHOTODA() ;Return the DA from File IMAGE INDEX FOR TYPES that is the PhotoID entry.

External References

Name Field # of Occurrence
^DIK KILLENT+2
CLEAN^DILF KILLENT+1
$$GET1^DIQ MAKEPROC+11
DATA^MAGGNTI MAKEPKG+14
ISCNSLT^TIUCNSLT MAKEPKG+16
ISCP^TIUCP MAKEPKG+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MAG(2005 - [#2005] Classic Fileman Calls
^MAG(2005.82 - [#2005.82] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] MAKENAME+15
^MAG(2005.03 - [#2005.03] MAKEPKG+12
^MAG(2005.83 - [#2005.83] MAKECLAS+10, MAKECLAS+11, MAKEPROC+9, MAKEPROC+10, PHOTODA+1

Label References

Name Line Occurrences
$$PHOTODA MAKEPKG+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLS MAKECLAS+5~, MAKECLAS+10*, MAKECLAS+11, MAKECLAS+12, MAKEPROC+5~, MAKEPROC+9*, MAKEPROC+10, MAKEPROC+11
DA KILLENT+2*, KILLENT+3!
DIC KILLENT+3!
DIK KILLENT+2*, KILLENT+3!
ETXT RTRNERR~, RTRNERR+1*
>> MAGERR MAKECLAS+11*, MAKEPROC+10*
MAGGDA KILLENT~, KILLENT+2
MAGGFDA MAKENAME~
MAGGFDA(2005 MAKENAME+10, MAKENAME+12, MAKENAME+13, MAKECLAS+6, MAKECLAS+12*, MAKEPKG+3, MAKEPKG+4, MAKEPKG+6*, MAKEPKG+9*, MAKEPKG+11*
, MAKEPKG+13, MAKEPKG+15*, MAKEPKG+16*, MAKEPKG+17*, MAKEPROC+6*, MAKEPROC+7, MAKEPROC+11*, MAKEORIG+2*
MAGGXE RTRNERR~
MAGGXE("DIERR" RTRNERR+1
MAGRY MAKEPKG+2~, MAKEPKG+14, MAKEPKG+15, MAKEPKG+16
OK MAKEPKG+2~, MAKEPKG+15, MAKEPKG+16
PARENT MAKEPKG+2~, MAKEPKG+3*, MAKEPKG+5, MAKEPKG+11, MAKEPKG+12
PKG MAKEPKG+2~, MAKEPKG+12*, MAKEPROC+5~
PXIEN MAKEPKG+2~, MAKEPKG+13*, MAKEPKG+14
TYPE MAKECLAS+5~, MAKECLAS+6*, MAKECLAS+9, MAKECLAS+10, MAKECLAS+11, MAKEPKG+2~, MAKEPKG+4*, MAKEPKG+5, MAKEPROC+5~, MAKEPROC+7*
, MAKEPROC+9, MAKEPROC+10
U MAKENAME+15, MAKECLAS+10, MAKECLAS+11, MAKEPKG+12, MAKEPKG+15, MAKEPKG+16, MAKEPROC+9, MAKEPROC+10
X MAKENAME+6~, MAKENAME+13*, MAKENAME+15
ZDESC MAKENAME+6~, MAKENAME+7*, MAKENAME+10*, MAKENAME+15*, MAKENAME+17
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All