Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Local Variables  | All
Print Page as PDF
Routine: VPRHST1

Package: Virtual Patient Record

Routine: VPRHST1


Information

VPRHST1 ;SLC/KCM,MKB - Display XML object ;09/18/18 4:36pm

Source Information

Source file <VPRHST1.m>

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
Virtual Patient Record 1 VPRHS  

Entry Points

Name Comments DBIA/ICR reference
XML(OBJ) ; -- display XML OBJect in hierarchy, returns DONE if ^
OPEN ; -- opening tag
XDATA ; -- data + closing tag
CLOSE ; -- closing tag, pop stack
READ ; -- continue?
R1
JSON(OBJ) ; -- display JSON OBJect in hierarchy, returns DONE if ^
TAG ; -- display tag
BRACE ; -- braces
LIST ; -- list
JDATA ; -- display value, pop stack

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?((ORSTK*2)),TAG
  • Line Location: OPEN+3
Function Call: WRITE
  • Prompt: DATA
  • Line Location: XDATA+2
Function Call: WRITE
  • Prompt: TAG
  • Line Location: XDATA+4
Function Call: WRITE
  • Prompt: !,?((ORSTK*2)),TAG
  • Line Location: CLOSE+3
Function Call: WRITE
  • Prompt: !!,"Press <return> to continue or ^ to exit item ..."
  • Line Location: R1+0
Function Call: WRITE
  • Prompt: !,"Enter ^ to skip the rest of this item, or ^^ to exit the option."
  • Line Location: R1+1
Function Call: WRITE
  • Prompt: !,?((ORSTK*2)),TAG
  • Line Location: TAG+3
Function Call: WRITE
  • Prompt: "{"
  • Line Location: BRACE+1
Function Call: WRITE
  • Prompt: "["
  • Line Location: LIST+1
Function Call: WRITE
  • Prompt: X
  • Line Location: JDATA+4

Label References

Name Line Occurrences
@( XML+5, JSON+5
OPEN XML+3
R1 R1+1
READ OPEN+2, CLOSE+2, TAG+2
TAG JSON+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DATA XDATA+1~, XDATA+2*, XDATA+3
DONE XML+1!, XML+5, OPEN+2, CLOSE+2, READ+1!, R1+2*, JSON+5, TAG+2
DTIME R1
I JDATA+1~, JDATA+6*
IOSL OPEN+2, CLOSE+2, TAG+2
OBJ XML~, XML+2, JSON~, JSON+2
ORCNT XML+1~, XML+3*, OPEN+2*, CLOSE+2*, JSON+1~, JSON+3*, TAG+2*
ORNXT XML+1~, XML+5*, JSON+1~, JSON+5*
ORSTK XML+1~, XML+3*, OPEN+3*, XDATA+5*, CLOSE+3*, JSON+1~, JSON+3*, TAG+3*, JDATA+4*, JDATA+6*
QUIT XML+1!, READ+1!, R1+2*
TAG OPEN+1~*, OPEN+3, XDATA+1~, XDATA+4*, XDATA+5, CLOSE+1~*, CLOSE+3, TAG+1~*, TAG+3
X READ+1~, R1*, R1+1, R1+2, JDATA+1~*, JDATA+2*, JDATA+3, JDATA+4, JDATA+6
XSTRING XML+1~, XML+2*, XML+5, OPEN+1*, XDATA+2, XDATA+3*, XDATA+4, XDATA+5*, CLOSE+1*, JSON+1~
, JSON+2*, JSON+5, TAG+1*, BRACE+2*, LIST+2*, JDATA+1, JDATA+2, JDATA+3*
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Label References |  Local Variables  | All