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

Package: Clinical Information Resource Network

Routine: RGTKPOC


Information

RGTKPOC ;BIRMIO/CML-Establish Visitor Record for TK POC ;25-NOV-14

Source Information

Source file <RGTKPOC.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
RPC Broker 2 (EN1,RPCCHK)^XWB2HL7  RTNDATA^XWBDRPC  
Kernel 1 $$GET^XUESSO1  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Clinical Information Resource Network 1 RG TK POC USER SETUP  

Entry Points

Name Comments DBIA/ICR reference
QUIT ;

External References

Name Field # of Occurrence
^DIR QUIT+1
$$GET^XUESSO1 RGTKPOC+31
EN1^XWB2HL7 RGTKPOC+35
RPCCHK^XWB2HL7 RGTKPOC+41
RTNDATA^XWBDRPC RGTKPOC+46

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RGTKPOC+18
Function Call: WRITE
  • Prompt: !!,"This option allows you to create a Visitor Record in the New Person file on"
  • Line Location: RGTKPOC+19
Function Call: WRITE
  • Prompt: !,"the MPI production account. The purpose of this action is to accomplish the"
  • Line Location: RGTKPOC+20
Function Call: WRITE
  • Prompt: !,"first step toward establishing your ToolKit POC remote view access. Once this"
  • Line Location: RGTKPOC+21
Function Call: WRITE
  • Prompt: !,"action is completed successfully you will have the ability to use the new tools."
  • Line Location: RGTKPOC+22
Function Call: WRITE
  • Prompt: !!,"Note: It is important that prior to using this option you be set up correctly"
  • Line Location: RGTKPOC+23
Function Call: WRITE
  • Prompt: !,"as a user in your local New Person file (#200). You should verify your user"
  • Line Location: RGTKPOC+24
Function Call: WRITE
  • Prompt: !,"record has the correct Name, SSN, Network Username and Phone Contact Number."
  • Line Location: RGTKPOC+25
Function Call: WRITE
  • Prompt: !!,"Attempting to establish Visitor Record on MPI..."
  • Line Location: RGTKPOC+27
Function Call: WRITE
  • Prompt: !!,"<Missing data> - ",$P(USR,"^",2),!,"Please populate this data via the User Management menu."
  • Line Location: RGTKPOC+32
Function Call: WRITE
  • Prompt: !!,"<Missing Network Username> - please populate this field via the User Management",!,"menu as it is required for mapping your VistA account to your ToolKit account."
  • Line Location: RGTKPOC+33
Function Call: WRITE
  • Prompt: !!,"Attempt was unsuccessful: "_$P(RETURN(1),"^",2)
  • Line Location: RGTKPOC+36
Function Call: WRITE
  • Prompt: !!,"Attempt was unsuccessful: "_$S($P(RET(0),"^",2)["Handle":"Error in Process",1:$P(RET(0),"^",2))
  • Line Location: RGTKPOC+42
Function Call: WRITE
  • Prompt: !!,"Attempt was unsuccessful, unable to get data after 10 attempts."
  • Line Location: RGTKPOC+43
Function Call: WRITE
  • Prompt: !!,"Your Visitor Record was successfully established, ",!,"and your ToolKit user profile updated."
  • Line Location: RGTKPOC+47
Function Call: WRITE
  • Prompt: !!,"There was an issue with your record ",RET(0),!,"Please report this to HC IdM for assistance."
  • Line Location: RGTKPOC+48
Function Call: WRITE
  • Prompt: !!
  • Line Location: QUIT+1
Routine Call
  • DIR
  • Line Location:
    • QUIT+1

Label References

Name Line Occurrences
QUIT RGTKPOC+32, RGTKPOC+33, RGTKPOC+36, RGTKPOC+42, RGTKPOC+43

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT RGTKPOC+40~, RGTKPOC+41*
DIR QUIT+1!
DIR(0 QUIT+1*
DUZ RGTKPOC+31
IEN RGTKPOC+28~, RGTKPOC+38*, RGTKPOC+41, RGTKPOC+46
IOF RGTKPOC+18
NAME RGTKPOC+28~, RGTKPOC+34*, RGTKPOC+35
NTNAME RGTKPOC+28~, RGTKPOC+34*, RGTKPOC+35
PHONE RGTKPOC+28~, RGTKPOC+34*, RGTKPOC+35
RET RGTKPOC+41, RGTKPOC+46!
RET(0 RGTKPOC+41, RGTKPOC+42, RGTKPOC+43, RGTKPOC+47, RGTKPOC+48
RETURN RGTKPOC+30!, RGTKPOC+35
RETURN(0 RGTKPOC+36, RGTKPOC+38
RETURN(1 RGTKPOC+36
SITE RGTKPOC+28~, RGTKPOC+29*, RGTKPOC+35
SSN RGTKPOC+28~, RGTKPOC+34*, RGTKPOC+35
USER RGTKPOC+28~
USR RGTKPOC+28~, RGTKPOC+31*, RGTKPOC+32, RGTKPOC+33, RGTKPOC+34
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All