Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: MAGDAIRF

Package: Imaging

Routine: MAGDAIRF


Information

MAGDAIRF ;WOIFO/PMK - Automatic Import Reconciliation Workflow ; 17 Nov 2009 7:31 AM

Source Information

Source file <MAGDAIRF.m>

Entry Points

Name Comments DBIA/ICR reference
UPDATE ; update the OUTSIDE IMAGING LOCATION file
SELECT(DIVISION,IMAGETYPE,RADIMGLOC) ; pick IMAGING LOCATION
SET(DIVISION,IMAGETYPE,RADIMGLOC) ; create the OUTSIDE IMAGING LOCATION fle (#2006.5759) entry
KILL(OUTSIDE) ; delete the file 2006.5759 entry
YESNO(PROMPT,DEFAULT,CHOICE) ; generic YES/NO question driver
CHOOSE(PROMPT,DEFAULT,CHOICE,OPTION) ; generic question driver

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,"OUTSIDE IMAGING LOCATIONS for ",$$GET1^DIQ(4,DIVISION,.01)
  • Line Location: UPDATE+11
Function Call: WRITE
  • Prompt: " (",$$GET1^DIQ(4,DIVISION,99),")"
  • Line Location: UPDATE+12
Function Call: WRITE
  • Prompt: !
  • Line Location: UPDATE+13
Function Call: WRITE
  • Prompt: "-"
  • Line Location: UPDATE+13
Function Call: WRITE
  • Prompt: !
  • Line Location: UPDATE+20
Function Call: WRITE
  • Prompt: !,$$GET1^DIQ(79.2,IMAGETYPE,.01)," -- "
  • Line Location: SELECT+3
Function Call: WRITE
  • Prompt: "*** Redundant records found! ***"
  • Line Location: SELECT+8
Function Call: WRITE
  • Prompt: !,?X,$$GET1^DIQ(2006.5759,I,.01)
  • Line Location: SELECT+10
Function Call: WRITE
  • Prompt: !,?X,"*** These must be deleted and replace by a single entry ***"
  • Line Location: SELECT+12
Function Call: WRITE
  • Prompt: $$GET1^DIQ(2006.5759,OUTSIDE,.01)
  • Line Location: SELECT+23
Function Call: WRITE
  • Prompt: "(not defined yet)"
  • Line Location: SELECT+30

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MAGD(2006.5759 - [#2006.5759] Classic Fileman Calls,  GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
^RA(79.1 - [#79.1] GET1^DIQ
^RA(79.2 - [#79.2] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call