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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SCMCWSUT

Package: Scheduling

Routine: SCMCWSUT


Information

SCMCWSUT ;ALB/ART - PCMM Web Call Patient Summary Web Service ;09/11/2014

Source Information

Source file <SCMCWSUT.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 FIND^DIC  $$GET1^DIQ  
Web Services Client 1 $$SNAME4KY^XOBWLIB  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Order Entry Results Reporting 1 ORWPT1  
Scheduling 1 SCMCWS1  

Entry Points

Name Comments DBIA/ICR reference
SETUP(SCDATA) ;Web service setup
; Lookup server name
; Validate server name
; Validate service name
; Get REST request object
; Inputs: SCDATA - array of variables, passed by reference
; Output:
; Returns: success = 1
; failure = 0^error message
LKUPSRVR(SCNAME,SCLIST) ; Web Server Lookup
; Inputs: SCNAME - name of the server
; Output: SCLIST - list of matching IENs, by reference
; ien^name
CPRSHEAD(SCDFN) ;Get data for CPRS PCMMR Header
; Inputs: SCDFN - Patient DFN
; Returns: String of PACT info from Outpatient Profile (404.41), CPRS Header Text (.06)
  • ICR #6042
    • Status: Active
    • Usage: Private
    LKUPSRVS(SCNAME,SCLIST) ; Web Service Lookup
    ; Inputs: SCNAME - name of the service
    ; Output: SCLIST - list of matching IENs and names, by reference
    ; ien^name

    External References

    Name Field # of Occurrence
    FIND^DIC LKUPSRVR+8, LKUPSRVS+8
    $$GET1^DIQ CPRSHEAD+7
    $$SNAME4KY^XOBWLIB SETUP+13

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^XOB(18.02 - [#18.02] FIND^DIC
    ^XOB(18.12 - [#18.12] FIND^DIC
    ^SCPT(404.41 - [#404.41] GET1^DIQ

    Label References

    Name Line Occurrences
    LKUPSRVR SETUP+18
    LKUPSRVS SETUP+23

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    I LKUPSRVR+5~, LKUPSRVR+9*, LKUPSRVR+10*, LKUPSRVR+11, LKUPSRVS+5~, LKUPSRVS+9*, LKUPSRVS+10*, LKUPSRVS+11
    SCDATA SETUP~
    SCDATA("serverName" SETUP+15*, SETUP+18
    SCDATA("serverNameKey" SETUP+13
    SCDATA("webServiceName" SETUP+23
    SCDFN CPRSHEAD~, CPRSHEAD+4, CPRSHEAD+6
    SCERR LKUPSRVR+5~, LKUPSRVS+5~
    SCIENS CPRSHEAD+5~, CPRSHEAD+6*, CPRSHEAD+7
    SCLIST SETUP+10~, SETUP+18, SETUP+22~, SETUP+23, LKUPSRVR~, LKUPSRVS~
    SCLIST( LKUPSRVR+11*, LKUPSRVS+11*
    SCLIST(1 SETUP+19, SETUP+24, LKUPSRVR+6*, LKUPSRVS+6*
    SCNAME LKUPSRVR~, LKUPSRVR+8, LKUPSRVS~, LKUPSRVS+8
    SCRC SETUP+10~, SETUP+13*, SETUP+14
    SCRET LKUPSRVR+5~, LKUPSRVS+5~
    SCRET("DILIST" LKUPSRVR+10, LKUPSRVR+11, LKUPSRVS+10, LKUPSRVS+11
    SCSERVER SETUP+10~, SETUP+13, SETUP+15
    SCTEXT CPRSHEAD+5~, CPRSHEAD+7*, CPRSHEAD+8*, CPRSHEAD+9
    Y LKUPSRVR+5~, LKUPSRVS+5~
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All