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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: HLOPRSR3

Package: Health Level Seven

Routine: HLOPRSR3


Information

HLOPRSR3 ;ALB/CJM - Visual Parser 12 JUN 1997 10:00 am ;08/29/2008

Source Information

Source file <HLOPRSR3.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Health Level Seven 5 $$DESCAPE^HLOPRS  $$DESCAPE^HLOPRS1  ($$COMP,$$FLD,$$LINE,$$REP,$$SEG,$$SEGSTART,$$SUB,$$X,$$Y,IOXY,WRITELN)^HLOPRSR1  HILITE^HLOPRSR2  SPLITHDR^HLOSRVR1  
Kernel 3 ENS^%ZISS  PREP^XGF  $$LJ^XLFSTR  
List Manager 1 PAUSE^VALM1  
VA FileMan 1 $$TEST^DDBRT  

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

Package Total Caller Graph
Health Level Seven 2 HLOPRSR1  HLOPRSR2  

Entry Points

Name Comments DBIA/ICR reference
SETUP(PARMS,MSG,POS,SEG) ;
DESCRIBE ;
LJ(STRING,LENGTH) ;
GETSEG(VALUE,SEG,VERSION) ;
GETFLD(VALUE,SEG,VERSION,FLD) ;
GETCOMP(VALUE,SEG,VERSION,FLD,COMP) ;
GETSUB(VALUE,SEG,VERSION,FLD,COMP,SUB) ;
HELP ;
LINE(TO,INC) ;msg line
X(TO,INC) ;current position within the line
Y(LINE) ;screen line of msg line = LINE
SEG(INC) ;returns the current segement #
FLD(SET) ;returns the currrent field #
REP(SET) ;returns the current repetition #
COMP(SET) ;returns the current component #
SUB(SET) ;returns the current sub-component #
SEGSTART(SEGMENT) ;
IOXY(Y,X) ; moves to screen position line=Y, col=X
OPTIONAL(CODE) ;

External References

Name Field # of Occurrence
ENS^%ZISS SETUP+10
$$TEST^DDBRT SETUP+14
$$DESCAPE^HLOPRS SETUP+38
$$DESCAPE^HLOPRS1 DESCRIBE+41
$$COMP^HLOPRSR1 COMP+1
$$FLD^HLOPRSR1 FLD+1
$$LINE^HLOPRSR1 LINE+1
$$REP^HLOPRSR1 REP+1
$$SEG^HLOPRSR1 SEG+1
$$SEGSTART^HLOPRSR1 SEGSTART+1
$$SUB^HLOPRSR1 SUB+1
$$X^HLOPRSR1 X+2
$$Y^HLOPRSR1 Y+1
IOXY^HLOPRSR1 IOXY+1
WRITELN^HLOPRSR1 SETUP+47
HILITE^HLOPRSR2 SETUP+52
SPLITHDR^HLOSRVR1 SETUP+37
PAUSE^VALM1 SETUP+11
PREP^XGF SETUP+8
$$LJ^XLFSTR LJ+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Sorry, your terminal is not configured to support this option!",!,"If working from a PC, you might try selecting a VT-series device type"
  • Line Location: SETUP+11
Function Call: WRITE
  • Prompt: IORVON," Q:quit ?:help [Up/Down/Left/Right Arrow]:navigation ",IORVOFF
  • Line Location: SETUP+49
Function Call: WRITE
  • Prompt: @IOSTBM
  • Line Location: SETUP+50
Function Call: WRITE
  • Prompt: $$LJ($G(@DESCRIBE@(I)),80)
  • Line Location: DESCRIBE+45
Function Call: WRITE
  • Prompt: $$LJ($G(MSG1(I)),80)
  • Line Location: HELP+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLD(779.5 - [#779.5] GETSEG+4, GETSEG+5, GETSEG+7, GETFLD+5, GETFLD+6, GETFLD+8, GETFLD+10, GETCOMP+5, GETCOMP+6, GETCOMP+8
, GETCOMP+10, GETCOMP+12, GETSUB+5, GETSUB+6, GETSUB+8, GETSUB+10, GETSUB+12, GETSUB+14
^TMP($J SETUP+20

Label References

Name Line Occurrences
$$COMP SETUP+42, DESCRIBE+28, DESCRIBE+29, DESCRIBE+34
$$FLD SETUP+42, DESCRIBE+8, DESCRIBE+9, DESCRIBE+17, DESCRIBE+18, DESCRIBE+28, DESCRIBE+34, DESCRIBE+39
$$GETCOMP DESCRIBE+28
$$GETFLD DESCRIBE+17
$$GETSEG DESCRIBE+6
$$GETSUB DESCRIBE+34
$$LINE SETUP+41
$$LJ DESCRIBE+7, DESCRIBE+18, DESCRIBE+21, DESCRIBE+24, DESCRIBE+29, DESCRIBE+32, DESCRIBE+35, DESCRIBE+38, DESCRIBE+42, DESCRIBE+45
HELP+10
$$REP SETUP+42, DESCRIBE+18
$$SEG SETUP+41, DESCRIBE+7
$$SUB SETUP+42, DESCRIBE+34, DESCRIBE+35
$$X SETUP+41, HELP+11
$$Y HELP+11
DESCRIBE SETUP+51
IOXY SETUP+48, DESCRIBE+45, HELP+10, HELP+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BOT SETUP+1~, SETUP+6*, SETUP+7, SETUP+17, SETUP+21
CODE OPTIONAL~, OPTIONAL+2, OPTIONAL+3, OPTIONAL+4, OPTIONAL+5, OPTIONAL+6, OPTIONAL+7
COMP SETUP+25*, SETUP+29, SETUP+34, SETUP+38, DESCRIBE+11, DESCRIBE+28, DESCRIBE+41, GETCOMP~, GETCOMP+10, GETSUB~
, GETSUB+10
COMPIEN GETCOMP+2~, GETCOMP+10*, GETCOMP+11, GETCOMP+12, GETSUB+2~, GETSUB+10*, GETSUB+11, GETSUB+12, GETSUB+14
CS SETUP+33~, SETUP+34*
>> DELIM SETUP+24*, SETUP+25, SETUP+26, SETUP+27, SETUP+28, SETUP+29*
>> DESCRIBE DESCRIBE+2*, DESCRIBE+3, DESCRIBE+4, DESCRIBE+7, DESCRIBE+10, DESCRIBE+11, DESCRIBE+12, DESCRIBE+13, DESCRIBE+14, DESCRIBE+18
DESCRIBE+21, DESCRIBE+24, DESCRIBE+29, DESCRIBE+32, DESCRIBE+35, DESCRIBE+38, DESCRIBE+42, DESCRIBE+44, DESCRIBE+45, HELP+2*
>> ESC SETUP+27*, SETUP+34, DESCRIBE+13, DESCRIBE+41
ESCAPE SETUP+33~, SETUP+34*
FLD SETUP+23*, SETUP+24, SETUP+29, SETUP+34, SETUP+38, DESCRIBE+10, DESCRIBE+41, GETFLD~, GETFLD+8, GETCOMP~
, GETCOMP+8, GETSUB~, GETSUB+8
FLDIEN GETFLD+2~, GETFLD+8*, GETFLD+9, GETFLD+10, GETCOMP+2~, GETCOMP+8*, GETCOMP+9, GETCOMP+10, GETCOMP+12, GETSUB+2~
, GETSUB+8*, GETSUB+9, GETSUB+10, GETSUB+12, GETSUB+14
FS SETUP+33~, SETUP+34*
HDR SETUP+33~, SETUP+37
HDR( SETUP+36*
HDR(2 SETUP+38
I SETUP+1~, SETUP+21*, SETUP+35*, SETUP+36*, SETUP+39*, SETUP+40*, SETUP+47*, DESCRIBE+1~, DESCRIBE+44*, DESCRIBE+45*
HELP+1~, HELP+10*
INC LINE~, LINE+1, X~, X+2, SEG~, SEG+1
>> IOBM SETUP+16*, SETUP+47, SETUP+48, DESCRIBE+45, HELP+10
>> IOINHI DESCRIBE+7, DESCRIBE+18, DESCRIBE+29, DESCRIBE+35, DESCRIBE+42, HELP+6, HELP+7, HELP+8, HELP+9
>> IOINORM DESCRIBE+7, DESCRIBE+18, DESCRIBE+29, DESCRIBE+35, DESCRIBE+42, HELP+6, HELP+7, HELP+8, HELP+9
>> IORVOFF SETUP+49
>> IORVON SETUP+49
IOSL SETUP+16
>> IOSTBM SETUP+50
>> IOTM SETUP+16*
>> IOXY SETUP+13
>> LASTPART(1 SETUP+53*
>> LASTPART(2 SETUP+54*
LENGTH LJ~, LJ+1
LINE Y~, Y+1
MSG SETUP~, SETUP+18*, SETUP+20*, SETUP+21, SETUP+23, SETUP+24, SETUP+30, SETUP+36, SETUP+47, DESCRIBE+27
DESCRIBE+34
MSG(2 HELP+5*
MSG1 HELP+3!
MSG1( HELP+10
MSG1(1 HELP+4*
MSG1(3 HELP+6*
MSG1(4 HELP+7*
MSG1(5 HELP+8*
MSG1(6 HELP+9*
MSG2 DESCRIBE+1~, HELP+3!
NEXT DESCRIBE+26~, DESCRIBE+27*, DESCRIBE+28
NODE GETSEG+1~, GETSEG+7*, GETSEG+8, GETFLD+2~, GETFLD+3*, GETFLD+10*, GETFLD+11, GETFLD+12, GETFLD+13, GETFLD+14
, GETFLD+15, GETFLD+16, GETFLD+17, GETCOMP+2~, GETCOMP+3*, GETCOMP+12*, GETCOMP+13, GETCOMP+14, GETCOMP+15, GETCOMP+16
, GETSUB+2~, GETSUB+3*, GETSUB+14*, GETSUB+15, GETSUB+16, GETSUB+17, GETSUB+18
>> OLD DESCRIBE+4*, DESCRIBE+45, DESCRIBE+46
PARMS SETUP~
PARMS( SETUP+40
PARMS("ARY" SETUP+2
PARMS("BOT" SETUP+6
PARMS("TOP" SETUP+4
POS SETUP~
POS("CURRENT DELIMITER" , SETUP+45*, HELP+11
POS("NEXT DEL IMITER" , SETUP+46*, DESCRIBE+27, DESCRIBE+34
POS("TOP" SETUP+44*
QUIT SETUP+1~, SETUP+11, SETUP+12*, SETUP+15*
>> REP SETUP+26*, SETUP+29, DESCRIBE+12, DESCRIBE+41
REPEAPT DESCRIBE+16~
>> REPEAT DESCRIBE+19*, DESCRIBE+20*, DESCRIBE+21
SEG SETUP~, GETSEG~, GETSEG+4, GETSEG+5, GETFLD~, GETFLD+5, GETFLD+6, GETCOMP~, GETCOMP+5, GETCOMP+6
, GETSUB~, GETSUB+5, GETSUB+6
SEG( SETUP+40*
SEGIEN GETSEG+3*, GETSEG+4*, GETSEG+5*, GETSEG+6, GETSEG+7, GETFLD+2~, GETFLD+4*, GETFLD+5*, GETFLD+6*, GETFLD+7
, GETFLD+8, GETFLD+10, GETCOMP+2~, GETCOMP+4*, GETCOMP+5*, GETCOMP+6*, GETCOMP+7, GETCOMP+8, GETCOMP+10, GETCOMP+12
, GETSUB+2~, GETSUB+4*, GETSUB+5*, GETSUB+6*, GETSUB+7, GETSUB+8, GETSUB+10, GETSUB+12, GETSUB+14
>> SEGLINE( SETUP+36, SETUP+40*
SEGMENT SEGSTART~, SEGSTART+1
>> SEGTYPE SETUP+30*, DESCRIBE+5, DESCRIBE+6, DESCRIBE+7, DESCRIBE+9, DESCRIBE+17, DESCRIBE+28, DESCRIBE+34
SET FLD~, FLD+1, REP~, REP+1, COMP~, COMP+1, SUB~, SUB+1
STRING LJ~, LJ+1
SUB SETUP+28*, SETUP+29, SETUP+34, DESCRIBE+14, DESCRIBE+28, DESCRIBE+34, DESCRIBE+41, GETSUB~, GETSUB+12
SUBCOMP SETUP+33~, SETUP+34*
SUBIEN GETSUB+2~, GETSUB+12*, GETSUB+13, GETSUB+14
TMP SETUP+1~, SETUP+2*, SETUP+3, SETUP+21
TO LINE~, LINE+1, X~, X+2
TOP SETUP+1~, SETUP+4*, SETUP+5, SETUP+17, SETUP+21, SETUP+40
VAL DESCRIBE+1~, DESCRIBE+6, DESCRIBE+17, DESCRIBE+28, DESCRIBE+34, DESCRIBE+40~, DESCRIBE+41*, DESCRIBE+42
VAL("DATA TYP E" , DESCRIBE+24, DESCRIBE+32, DESCRIBE+38
VAL("ID" DESCRIBE+21
VAL("MAX LENG TH" , DESCRIBE+21
VAL("NAME" DESCRIBE+7, DESCRIBE+18, DESCRIBE+29, DESCRIBE+35
VAL("REPETITION" DESCRIBE+19
VAL("TABLE" DESCRIBE+24, DESCRIBE+32, DESCRIBE+38
VALUE DESCRIBE+41, GETSEG~, GETFLD~, GETCOMP~, GETSUB~
VALUE( GETFLD+3*, GETCOMP+3*, GETSUB+3*
VALUE("DATA T YPE" , GETFLD+13*, GETCOMP+14*, GETSUB+16*
VALUE("ID" GETFLD+17*
VALUE("MAX LE NGTH" , GETFLD+12*
VALUE("NAME" GETSEG+2*, GETSEG+8*, GETFLD+11*, GETCOMP+13*, GETSUB+15*
VALUE("OPTIONALITY" GETFLD+14*, GETCOMP+15*, GETSUB+17*
VALUE("REPETITION" GETFLD+15*
VALUE("TABLE" GETFLD+16*, GETCOMP+16*, GETSUB+18*
VALUES GETFLD+1!, GETCOMP+1!, GETSUB+1!
VERSION SETUP+38*, DESCRIBE+6, DESCRIBE+17, DESCRIBE+28, DESCRIBE+34, GETSEG~, GETSEG+4, GETFLD~, GETFLD+5, GETCOMP~
, GETCOMP+5, GETSUB~, GETSUB+5
X IOXY~, IOXY+1
Y IOXY~, IOXY+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All