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

Package: Master Patient Index VistA

Routine: MPIFWSC


Information

MPIFWSC ;ALB/CMC - MPIF HEALTHEVET WEB SERVICES CLIENT TOOLS ; 5/26/16 1:23pm

Source Information

Source file <MPIFWSC.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ($$DEFDIR,$$LIST)^%ZISH  (BMES,MES)^XPDUTL  $$ENCRYP^XUSRB1  
VA FileMan 2 FILE^DICN  FILE^DIE  
Web Services Client 1 $$GENPORT^XOBWLIB  

Entry Points

Name Comments DBIA/ICR reference
CKSETUP(MPIWSDL) ; - used to check the environment
; returns the path to be used that was verified or 0 if it fails
CHANGE(RETURN,USER,PASS,SWITCH,SERV,PORT) ; **70 STORY 864667 adding new parameters
ENV ; - environment check entry (first time with this patch only)
; this tag area can be removed with future patches
; future patches can call the $$CKSETUP^MPIFWSC entry for environment
; check
POSTINIT ; -- setup (first time with this patch only)
; this tag area can be removed with future patches
; future patches can call the DO SETUP^MPIFHWSC entry for post-init
; to setup a new HWSC 18.02 entry
TST ;
SETUP(MPIWSDL,MPISERV) ; -- call to setup hwsc

External References

Name Field # of Occurrence
$$DEFDIR^%ZISH CKSETUP+7
$$LIST^%ZISH CKSETUP+9
FILE^DICN SETUP+25, SETUP+33, TST+7
FILE^DIE CHANGE+10, CHANGE+15, CHANGE+24, CHANGE+28
$$GENPORT^XOBWLIB SETUP+15
BMES^XPDUTL CKSETUP+11, SETUP+17, SETUP+18, TST+1, TST+2
MES^XPDUTL SETUP+17
$$ENCRYP^XUSRB1 CHANGE+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"**** WSDL file "_MPIWSDL_" not found in "_MPIPATH_"."
  • Line Location: CKSETUP+13
Function Call: WRITE
  • Prompt: !," You will need that prior to install."
  • Line Location: CKSETUP+14
Routine Call
  • DIE
  • Line Location:
    • CHANGE+10
    • CHANGE+15
    • CHANGE+24
    • CHANGE+28

Used in RPC

RPC Name Call Tags
MPI VISTA HWS CONFIG CHANGE

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XOB(18.12 - [#18.12] Classic Fileman Calls
^MPIF(984.8 - [#984.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(18.12 SETUP+30
^MPIF(984.8 - [#984.8] TST+1, CHANGE+18, CHANGE+19, CHANGE+20*
^XOB(18.02 - [#18.02] SETUP+32
^XOB(18.12 - [#18.12] CHANGE+8, CHANGE+9, CHANGE+13, CHANGE+14, CHANGE+23, CHANGE+27

Label References

Name Line Occurrences
$$CKSETUP ENV+4, SETUP+9
SETUP POSTINIT+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA SETUP+21~, SETUP+26!, SETUP+27*, TST+3~
DA(1 SETUP+27*, SETUP+29
DD SETUP+20!, SETUP+28!, TST+3!
DIC SETUP+21~, SETUP+22*, SETUP+28!, SETUP+29*, TST+3~, TST+4*
DIC("DR" SETUP+23*, SETUP+32*, TST+5*
DIC("P" SETUP+30*
DIC(0 SETUP+22*, SETUP+29*, TST+4*
DO SETUP+20!, SETUP+28!, TST+3!
DTOUT SETUP+21~, SETUP+28!, TST+3~
DUOUT SETUP+21~, SETUP+28!, TST+3~
FDA CHANGE+9~, CHANGE+14~, CHANGE+23~, CHANGE+27~
FDA( CHANGE+10*, CHANGE+15*, CHANGE+24*, CHANGE+28*
HTTPS CHANGE+18~, CHANGE+19*, CHANGE+20
IEN CHANGE+9~*, CHANGE+10, CHANGE+14~*, CHANGE+15, CHANGE+18~*, CHANGE+19, CHANGE+20, CHANGE+23~*, CHANGE+24, CHANGE+27~*
, CHANGE+28
MPIARR SETUP+8~, SETUP+15
MPIARR("AVAIL ABILITY RESOURCE" , SETUP+14*
MPIARR("CACHE PACKAGE NAME" , SETUP+12*
MPIARR("WEB S ERVICE NAME" , SETUP+13*
MPIARR("WSDL FILE" , SETUP+11*
>> MPIERR("DIERR" CHANGE+10, CHANGE+15, CHANGE+24, CHANGE+28
MPIFERR CHANGE+9~, CHANGE+14~, CHANGE+23~, CHANGE+27~
MPIFILE CKSETUP+6~
MPIFILE( CKSETUP+8*, SETUP+10*
MPIPATH CKSETUP+6~, CKSETUP+7*, CKSETUP+9, CKSETUP+11, CKSETUP+13, CKSETUP+16, SETUP+8~, SETUP+9*, SETUP+11
MPISERV SETUP~, SETUP+13, SETUP+17, SETUP+18
MPISTAT CKSETUP+6~, CKSETUP+9*, CKSETUP+10, CKSETUP+12, SETUP+8~, SETUP+15*, SETUP+17
MPIWSDL CKSETUP~, CKSETUP+8, CKSETUP+11, CKSETUP+13, SETUP~, SETUP+9, SETUP+10, SETUP+11
PASS CHANGE~, CHANGE+11, CHANGE+15
PORT CHANGE~, CHANGE+25, CHANGE+28
RETURN CHANGE~
RETURN(1 CHANGE+5*, CHANGE+12*, CHANGE+13*, CHANGE+15*
RETURN(2 CHANGE+5*, CHANGE+7*, CHANGE+8*, CHANGE+10*
RETURN(3 CHANGE+5*, CHANGE+17*, CHANGE+18*, CHANGE+20*
RETURN(4 CHANGE+22*, CHANGE+24*
RETURN(5 CHANGE+26*, CHANGE+28*
SERV CHANGE~, CHANGE+21, CHANGE+24
SWITCH CHANGE~, CHANGE+16, CHANGE+20
USER CHANGE~, CHANGE+6, CHANGE+10
X ENV+4*, SETUP+21~, SETUP+24*, SETUP+28!, SETUP+32*, TST+3~, TST+6*
>> XPDENV CKSETUP+10
>> XPDQUES("POST 1 Port Number" , SETUP+23, 2 Web Server Name" , SETUP+23
>> XPDQUIT CKSETUP+15*
Y SETUP+21~, SETUP+27, SETUP+28!, TST+3~
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All