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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: MDAPI

Package: Clinical Procedures

Routine: MDAPI


Information

MDAPI ; HOIFO/DP/NCA - CP API Calls ; [05-05-2003 10:28]

Source Information

Source file <MDAPI.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 NOW^%DTC  (FILE,UPDATE)^DIE  ^DIK  $$GET1^DIQ  
Clinical Procedures 2 ($$NEWTIUN,$$PREV,RPC,STATUS)^MDRPCOT  ($$GETVSTR,$$UPDCONS,IMGSTAT)^MDRPCOT1  
Consult Request Tracking 1 CPLIST^GMRCCP  

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

Package Total Caller Graph
Text Integration Utility 2 TIUCPCL  TIURD  
Clinical Procedures 1 MDRPCOT1  
Consult Request Tracking 1 GMRCCP  
Imaging 1 MAGGSCP  

Entry Points

Name Comments DBIA/ICR reference
EXTDATA(MDPROC) ; [Procedure]
; Returns 0/1 for external data needed
; Called by Consults to determine status of consult ordered
  • ICR #3378
    • Status: Active
    • Usage: Controlled Subscription
    ISTAT(MDARR) ; [Procedure] Called by Imaging to update status
    ; Input parameters
    ; 1. MDARR [Literal/Required] Array from Imaging
  • ICR #3378
    • Status: Active
    • Usage: Controlled Subscription
    ITIU(RESULTS,DFN,CONSULT,VSTRING) ; [Procedure] API for Vista Imaging
    ; This API enables VistA Imaging to retrieve/create a TIU note for
    ; a consult for attaching images to.
    ;
    ; RESULTS(0) will equal one of the following
    ; IEN of the TIU note if successful
    ; or on failure one of the following status messages
    ; -1^No patient DFN
    ; -1^No Consult IEN
    ; -1^No VString
    ; -1^Error in CP transaction
    ; -1^Unable to create CP transaction
    ; -1^Unable to create the TIU document
    ; -1^No such consult for this patient.
  • ICR #3378
    • Status: Active
    • Usage: Controlled Subscription
    TIUCOMP(MDNOTE) ; [Procedure] Post Signature action to complete transaction
    ; Input parameters
    ; 1. MDNOTE [Literal/Required] TIU IEN
  • ICR #3378
    • Status: Active
    • Usage: Controlled Subscription
    TIUDEL(MDNOTE) ; [Procedure] TIU Note deletion Update
    ; Input parameters
    ; 1. MDNOTE [Literal/Required] TIU IEN
  • ICR #3378
    • Status: Active
    • Usage: Controlled Subscription
    TIUREAS(MDFN,MDOLDC,MDANOTE,MDNDFN,MDNEWC,MDNEWV,MDNTIU) ; [Function] This is an API to clean up and update TIU note re-assignment.
    ; Input parameters
    ; 1. MDFN [Literal/Required] The Patient DFN whose TIU document is being re-assigned.
    ; 2. MDOLDC [Literal/Required] The Consult that the note is being re-assigned from.
    ; 3. MDANOTE [Literal/Required] The TIU Document IEN that is being re-assigned.
    ; 4. MDNDFN [Literal/Required] The Patient DFN who will be re-assigned the TIU document.
    ; 5. MDNEWC [Literal/Required] The consult number that will be assignment the TIU document.
    ; 6. MDNEWV [Literal/Required] The new visit for the TIU document assignment.
    ; 7. MDNTIU [Literal/Required] The new reassigned TIU document IEN.
    TRANS(STR) ; [Function] Translate the upper arrows to blanks
    ; Input parameters
    ; 1. STR [Literal/Required] Input: Text with upper arrows that needs to be removed
    GETCP(RESULTS,MDCSLT) ; API to return CP Study data
    ; Input Parameters:
    ; 1. RESULTS [Literal/Required] Return Array
    ; 2. MDCSLT [Literal/Required] Consult number

    External References

    Name Field # of Occurrence
    NOW^%DTC ITIU+40, TIUREAS+26
    FILE^DIE TIUCOMP+9, TIUDEL+9, TIUREAS+21, TIUREAS+33
    UPDATE^DIE ITIU+51, TIUREAS+49
    ^DIK ITIU+61, TIUDEL+10, TIUDEL+14, TIUREAS+23, TIUREAS+25
    $$GET1^DIQ ITIU+57, GETCP+25, GETCP+26
    CPLIST^GMRCCP ITIU+38, TIUREAS+35
    $$NEWTIUN^MDRPCOT ITIU+56
    $$PREV^MDRPCOT ITIU+34
    RPC^MDRPCOT ISTAT+20, ISTAT+22, ISTAT+30, TIUDEL+13
    STATUS^MDRPCOT ISTAT+18, ISTAT+28, ISTAT+33, TIUDEL+11
    $$GETVSTR^MDRPCOT1 ITIU+42, TIUREAS+30, TIUREAS+40
    $$UPDCONS^MDRPCOT1 ISTAT+26
    IMGSTAT^MDRPCOT1 ISTAT+23, ISTAT+35

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^MDD(702 - [#702] Classic Fileman Calls,  GET1^DIQ
    ^MDD(702.001 - [#702.001] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^MDD(702 - [#702] ISTAT+25, TIUCOMP+5, TIUCOMP+6, TIUCOMP+7, TIUDEL+5, TIUDEL+6, TIUREAS+18, TIUREAS+26, TIUREAS+28, TIUREAS+29
    , GETCP+21, GETCP+23, GETCP+25
    ^MDD(702.001 - [#702.001] TIUDEL+10, TIUDEL+14, TIUREAS+22, TIUREAS+24
    ^MDS(702.01 - [#702.01] EXTDATA+7, EXTDATA+8
    ^TMP("MDTIUST" ITIU+29!
    ^TMP("MDTMP" TIUREAS+17!, TIUREAS+35, TIUREAS+37, TIUREAS+38!
    ^TMP($J ITIU+29!, ITIU+38, ITIU+39, ITIU+42, ITIU+46

    Label References

    Name Line Occurrences
    $$TRANS ISTAT+22

    Naked Globals

    Name Field # of Occurrence
    ^( EXTDATA+8, ITIU+39, TIUREAS+37
    ^(0 ISTAT+25

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % ITIU+40, TIUREAS+26
    CONSULT ITIU~, ITIU+32, ITIU+34, ITIU+39, ITIU+47
    DA ITIU+59~, ITIU+61*, TIUDEL+10~*, TIUDEL+14~*, TIUREAS+23~*, TIUREAS+25~*
    >> DATA ISTAT+20, ISTAT+22, ISTAT+30, TIUDEL+13
    >> DATA("MESSAGE" ISTAT+20*, ISTAT+22*, ISTAT+29*, TIUDEL+13*
    >> DATA("PKG" ISTAT+19*, ISTAT+29*, TIUDEL+12*
    >> DATA("TRANSACTION" ISTAT+15*, TIUDEL+12*
    DFN ITIU~, ITIU+31, ITIU+38, ITIU+42, ITIU+43
    DIK ITIU+59~, ITIU+61*, TIUDEL+10~*, TIUDEL+14~*, TIUREAS+23~*, TIUREAS+25~*
    DUZ ITIU+45, TIUREAS+43
    MDANOTE TIUREAS~, TIUREAS+13, TIUREAS+18, TIUREAS+19, TIUREAS+22, TIUREAS+23
    MDARR ISTAT~
    MDARR( ISTAT+21, ISTAT+22
    MDARR(0 ISTAT+9, ISTAT+14, ISTAT+18, ISTAT+20
    MDARR(1 ISTAT+10, ISTAT+11, ISTAT+12, ISTAT+13
    MDCHK TIUREAS+10~, TIUREAS+17*, TIUREAS+18*, TIUREAS+19
    MDCON ISTAT+8~, ISTAT+25*, ISTAT+26
    MDCR ISTAT+8~, ISTAT+26*, ISTAT+27, ISTAT+28, ISTAT+29
    MDCSLT GETCP~, GETCP+20, GETCP+21, GETCP+23
    MDCT GETCP+19~, GETCP+23*, GETCP+24*, GETCP+25, GETCP+26
    MDD ITIU+30~, ITIU+40*, ITIU+42, ITIU+44, TIUREAS+10~, TIUREAS+17*, TIUREAS+26*, TIUREAS+30, TIUREAS+40, TIUREAS+42
    MDFDA TIUCOMP+4~, TIUDEL+4~, TIUREAS+21!, TIUREAS+33!
    MDFDA(702 ITIU+43*, ITIU+44*, ITIU+45*, ITIU+46*, ITIU+47*, ITIU+48*, ITIU+49*, TIUCOMP+8*, TIUDEL+8*, TIUREAS+20*
    , TIUREAS+31*, TIUREAS+32*, TIUREAS+41*, TIUREAS+42*, TIUREAS+43*, TIUREAS+44*, TIUREAS+45*, TIUREAS+46*, TIUREAS+47*, TIUREAS+48*
    MDFN TIUREAS~, TIUREAS+11
    MDGBL TIUDEL+4~, TIUDEL+14*, TIUREAS+10~, TIUREAS+22*, TIUREAS+23*
    MDIEN ISTAT+8~, ISTAT+13*, ISTAT+15, ISTAT+25, ITIU+28~
    MDIEN(1 ITIU+51, ITIU+55
    MDIENS ISTAT+8~, ISTAT+13*, ISTAT+18, ISTAT+23, ISTAT+28, ISTAT+33, ISTAT+35, ITIU+28~, ITIU+55*, ITIU+56
    , ITIU+57, ITIU+61
    MDLP ISTAT+8~, ISTAT+21*, ISTAT+22, TIUREAS+10~
    MDMULN TIUREAS+10~, TIUREAS+24*, TIUREAS+25
    MDN ITIU+30~, ITIU+56*, ITIU+57, TIUREAS+10~, TIUREAS+23*
    MDNDFN TIUREAS~, TIUREAS+14, TIUREAS+28, TIUREAS+30, TIUREAS+35, TIUREAS+40, TIUREAS+41
    MDNEWC TIUREAS~, TIUREAS+15, TIUREAS+26, TIUREAS+37, TIUREAS+45
    MDNEWV ITIU+30~, ITIU+42*, ITIU+48, TIUREAS~, TIUREAS+27, TIUREAS+30*, TIUREAS+32, TIUREAS+40*, TIUREAS+47
    MDNOTE ITIU+28~, ITIU+57*, ITIU+58, ITIU+62, TIUCOMP~, TIUCOMP+5, TIUDEL~, TIUDEL+5, TIUDEL+10, TIUDEL+14
    MDNTIU TIUREAS~, TIUREAS+16, TIUREAS+31, TIUREAS+46
    MDOLDC TIUREAS~, TIUREAS+12, TIUREAS+19
    MDPPR TIUREAS+10~, TIUREAS+17*, TIUREAS+29*, TIUREAS+30, TIUREAS+34, TIUREAS+37*, TIUREAS+39, TIUREAS+40, TIUREAS+44
    MDPROC EXTDATA~, EXTDATA+7, EXTDATA+8
    MDREAS TIUREAS+10~, TIUREAS+17*, TIUREAS+27*, TIUREAS+30, TIUREAS+40
    MDRES TIUCOMP+4~, TIUCOMP+5*, TIUCOMP+6, TIUCOMP+7, TIUCOMP+8, TIUDEL+4~, TIUDEL+5*, TIUDEL+6, TIUDEL+8, TIUDEL+10
    , TIUDEL+11, TIUDEL+12
    MDSTAT ISTAT+8~, ISTAT+14*, ISTAT+17
    MDSTR ISTAT+8~
    MDTIU ISTAT+8~, ISTAT+25*, ISTAT+26
    MDTIUD ITIU+30~*, ITIU+34*, ITIU+35
    MDTIUER ITIU+30~*
    MDTRAN TIUDEL+4~, TIUDEL+10*, TIUDEL+14*, TIUREAS+10~, TIUREAS+17*, TIUREAS+18*, TIUREAS+20, TIUREAS+24, TIUREAS+25
    MDTRANI TIUREAS+10~, TIUREAS+18*, TIUREAS+26*, TIUREAS+28, TIUREAS+29, TIUREAS+31
    MDTRANS ITIU+28~
    MDTST ITIU+30~*
    MDX ITIU+39*, ITIU+42, ITIU+46, TIUREAS+10~, TIUREAS+36*, TIUREAS+37*, GETCP+19~, GETCP+21*, GETCP+23*, GETCP+24
    , GETCP+25, GETCP+26
    MDY GETCP+19~, GETCP+25*, GETCP+26
    RESULTS ISTAT+8~, ISTAT+20, ISTAT+22, ISTAT+30, ITIU~, TIUDEL+4~, TIUDEL+13, GETCP~, GETCP+20, GETCP+21
    , GETCP+22, GETCP+24, GETCP+25, GETCP+26
    RESULTS(0 ITIU+31*, ITIU+32*, ITIU+35*, ITIU+37*, ITIU+52*, ITIU+60*, ITIU+62*
    STR TRANS~, TRANS+4, TRANS+5
    U EXTDATA+8, ITIU+39, ITIU+42, ITIU+46, TIUREAS+19, TIUREAS+37, GETCP+25, GETCP+26
    VSTRING ITIU~, ITIU+37, ITIU+41*, ITIU+42
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All