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

Package: Health Level Seven

Routine: HLOPRSR2


Information

HLOPRSR2 ;ALB/CJM - Visual Parser 12 JUN 1997 10:00 am ;08/17/2009

Source Information

Source file <HLOPRSR2.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Health Level Seven 2 ($$BOT,$$COMP,$$FLD,$$LINE,$$MSGSIZE,$$REP,$$SCRNSIZE,$$SEG,$$SEGSTART,$$SUB,$$TOP,$$X,$$Y,IOXY,WRITELN)^HLOPRSR1  DESCRIBE^HLOPRSR3  
Kernel 1 $$LJ^XLFSTR  

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  HLOPRSR3  

Entry Points

Name Comments DBIA/ICR reference
WRITELN(LINE,Y) ;writes one line to the screen
RIGHT ;
GORIGHT ;
LEFT ;
GOLEFT ;
MSGSIZE() ;
SCRNSIZE() ;
TOP(INC) ;msg line at the top of the scrolling area
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 repitition #
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
HILITE(LINE1,CHAR1,LINE2,CHAR2) ;does hightlighting
LITE
UNLITE ;
DOWN ;
UP ;
SCROLL(COUNT) ; Scrolls up (COUNT positive) or down (COUNT negative)
GETCHAR(INC) ;returns a message character, can go forward or backward but will not cross the segment boundary.
LJ(STRING,LENGTH) ;

External References

Name Field # of Occurrence
$$BOT^HLOPRSR1 SCROLL+8, SCROLL+10
$$COMP^HLOPRSR1 COMP+1
$$FLD^HLOPRSR1 FLD+1
$$LINE^HLOPRSR1 LINE+1
$$MSGSIZE^HLOPRSR1 MSGSIZE+1
$$REP^HLOPRSR1 REP+1
$$SCRNSIZE^HLOPRSR1 SCRNSIZE+1
$$SEG^HLOPRSR1 SEG+1
$$SEGSTART^HLOPRSR1 SEGSTART+1
$$SUB^HLOPRSR1 SUB+1
$$TOP^HLOPRSR1 TOP+1
$$X^HLOPRSR1 X+2
$$Y^HLOPRSR1 Y+1
IOXY^HLOPRSR1 IOXY+1
WRITELN^HLOPRSR1 WRITELN+1
DESCRIBE^HLOPRSR3 GORIGHT+4, GOLEFT+4, DOWN+16, UP+16
$$LJ^XLFSTR LJ+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IORVOFF
  • Line Location: HILITE+12
Function Call: WRITE
  • Prompt: IOCUON
  • Line Location: HILITE+25
Function Call: WRITE
  • Prompt: IORVOFF
  • Line Location: UNLITE+2
Function Call: WRITE
  • Prompt: IOINHI
  • Line Location: UNLITE+6
Function Call: WRITE
  • Prompt: IOINORM
  • Line Location: UNLITE+8

Label References

Name Line Occurrences
$$COMP RIGHT+12, RIGHT+25, RIGHT+27, RIGHT+29, LEFT+15, LEFT+23, LEFT+27, LEFT+35, LEFT+46, LEFT+47
, LEFT+48, LEFT+61, LEFT+63, LEFT+65
$$FLD RIGHT+12, RIGHT+25, LEFT+15, LEFT+23, LEFT+27, LEFT+35, LEFT+46, LEFT+61, LEFT+63, LEFT+65
$$GETCHAR RIGHT+22, RIGHT+33, LEFT+42, LEFT+58, LEFT+69, HILITE+22
$$LINE RIGHT+7, RIGHT+8, RIGHT+9, RIGHT+10, RIGHT+11, RIGHT+20, RIGHT+34, RIGHT+35, RIGHT+38, RIGHT+41
, LEFT+6, LEFT+9, LEFT+11, LEFT+12, LEFT+13, LEFT+14, LEFT+19, LEFT+20, LEFT+21, LEFT+22
, LEFT+27, LEFT+29, LEFT+30, LEFT+32, LEFT+33, LEFT+34, LEFT+35, LEFT+39, LEFT+40, LEFT+41
, LEFT+44, LEFT+52, LEFT+53, LEFT+55, LEFT+70, LEFT+74, LEFT+77, LEFT+78, HILITE+17, DOWN+5
, DOWN+7, DOWN+13, DOWN+14, DOWN+15, DOWN+17, UP+5, UP+7, UP+13, UP+14, UP+15
, UP+17, SCROLL+10, GETCHAR+8, GETCHAR+13, GETCHAR+19, GETCHAR+20, GETCHAR+31, GETCHAR+35
$$MSGSIZE DOWN+7, UP+7
$$REP RIGHT+12, RIGHT+25, RIGHT+27, LEFT+15, LEFT+23, LEFT+35, LEFT+46, LEFT+47, LEFT+61, LEFT+63
, LEFT+65
$$SEG RIGHT+6, LEFT+9, LEFT+27, DOWN+4, DOWN+5, DOWN+15, UP+4, UP+5, UP+15, GETCHAR+13
, GETCHAR+19
$$SEGSTART RIGHT+6, LEFT+9, LEFT+27, DOWN+4, DOWN+5, DOWN+15, UP+4, UP+5, UP+15, GETCHAR+13
, GETCHAR+19
$$SUB RIGHT+12, RIGHT+25, RIGHT+27, RIGHT+29, RIGHT+31, LEFT+15, LEFT+23, LEFT+27, LEFT+35, LEFT+46
, LEFT+47, LEFT+48, LEFT+49, LEFT+61, LEFT+63, LEFT+65, LEFT+67
$$TOP SCROLL+7, SCROLL+17
$$X RIGHT+12, RIGHT+20, RIGHT+34, RIGHT+35, RIGHT+41, LEFT+6, LEFT+9, LEFT+10, LEFT+15, LEFT+23
, LEFT+27, LEFT+35, LEFT+44, LEFT+52, LEFT+53, LEFT+55, LEFT+70, LEFT+77, LEFT+78, HILITE+17
, HILITE+24, DOWN+17, UP+17, GETCHAR+9, GETCHAR+11, GETCHAR+13, GETCHAR+16, GETCHAR+18, GETCHAR+20, GETCHAR+24
, GETCHAR+31, GETCHAR+35
$$Y GORIGHT+2, GOLEFT+2, HILITE+17, HILITE+24, LITE+2, LITE+3, DOWN+9, DOWN+10, DOWN+12, UP+9
, UP+10, UP+12
DOWN RIGHT+18
GOLEFT LEFT+9, LEFT+26
GORIGHT RIGHT+6
HILITE GORIGHT+5, GOLEFT+5, DOWN+17, UP+17
IOXY HILITE+17, HILITE+24, LITE+3, DOWN+10, UP+10, SCROLL+4, SCROLL+9, SCROLL+14, SCROLL+18
LITE HILITE+11, UNLITE+7
SCROLL GORIGHT+2, GOLEFT+2, DOWN+12, UP+12
UNLITE HILITE+7
UP LEFT+6, LEFT+73

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHAR RIGHT+1~, RIGHT+22*, RIGHT+24, RIGHT+26, RIGHT+28, RIGHT+30, RIGHT+33*, RIGHT+34, RIGHT+36, RIGHT+40
, LEFT+1~, LEFT+42*, LEFT+43, LEFT+46, LEFT+47, LEFT+48, LEFT+49, LEFT+51, LEFT+58*, LEFT+60
, LEFT+62, LEFT+64, LEFT+66, LEFT+69*, LEFT+70, LEFT+71, LEFT+76
CHAR1 HILITE~, HILITE+8, HILITE+10, LITE+3, LITE+4, UNLITE+1~, UNLITE+4*, UNLITE+6, UNLITE+8
CHAR2 HILITE~, HILITE+8, HILITE+10, LITE+4, UNLITE+1~, UNLITE+4*
>> COMP RIGHT+28, LEFT+48, LEFT+64
COUNT SCROLL~, SCROLL+3, SCROLL+5, SCROLL+13, SCROLL+15
>> DELIM RIGHT+34, LEFT+43, LEFT+70
END GETCHAR+6~, GETCHAR+7*, GETCHAR+16*, GETCHAR+22*, GETCHAR+24*, GETCHAR+31*, GETCHAR+34
>> FLD RIGHT+8, RIGHT+9, RIGHT+24, LEFT+9, LEFT+12, LEFT+19, LEFT+32, LEFT+35, LEFT+46, LEFT+60
HILITE HILITE+7, HILITE+10*, UNLITE+3, UNLITE+4, UNLITE+5!
I DOWN+1~, DOWN+8*, UP+1~, UP+8*, SCROLL+2~, SCROLL+5*, SCROLL+15*
INC TOP~, TOP+1, LINE~, LINE+1, X~, X+2, SEG~, SEG+1, GETCHAR~, GETCHAR+10
, GETCHAR+17, GETCHAR+31
>> IOBM GORIGHT+2, LITE+2, DOWN+9, DOWN+12, SCROLL+4, SCROLL+9
>> IOCUON HILITE+25
>> IOIND SCROLL+6
>> IOINHI HILITE+21, UNLITE+6
>> IOINORM HILITE+23, UNLITE+8
>> IORI SCROLL+16
>> IORVOFF HILITE+12, UNLITE+2
>> IORVON HILITE+9
>> IOTM GOLEFT+2, LITE+2, UP+9, UP+12
LASTPART DOWN+2!, UP+2!
LASTPART( LEFT+61, LEFT+63, LEFT+65
LASTPART(1 RIGHT+13*, LEFT+16*, LEFT+36*
LASTPART(2 RIGHT+14*, LEFT+17*, LEFT+37*
LENGTH LJ~, LJ+1
LINE WRITELN~, WRITELN+1, RIGHT+1~, LEFT+1~, Y~, Y+1, LITE~, LITE+1*, LITE+2, LITE+3
, LITE+4
LINE1 HILITE~, HILITE+8, HILITE+10, LITE+1, LITE+3, LITE+4, UNLITE+1~, UNLITE+4*
LINE2 HILITE~, HILITE+8, HILITE+10, LITE+1, LITE+4, UNLITE+1~, UNLITE+4*, UNLITE+6, UNLITE+8
>> MSG RIGHT+8, RIGHT+9, LEFT+9, LEFT+12, LEFT+19, LEFT+29, LEFT+32, LEFT+35, LITE+4, DOWN+13
, UP+13, SCROLL+8, SCROLL+17, GETCHAR+20, GETCHAR+35
>> POS( DOWN+8*, UP+8*
>> POS("CHAR" SCROLL+11*, SCROLL+19*
>> POS("CURRENT DELIMITER" , RIGHT+6, RIGHT+7*, RIGHT+17*, RIGHT+18, RIGHT+20, LEFT+5, LEFT+11*, LEFT+20*, LEFT+26
, LEFT+35*, LEFT+39*, LEFT+44*, LEFT+55, LEFT+70*, LEFT+74*, HILITE+13, HILITE+17, DOWN+14*, UP+14*
>> POS("NEXT DEL IMITER" , RIGHT+8*, RIGHT+17, RIGHT+34*, RIGHT+38*, LEFT+5*, LEFT+40*, DOWN+15*, UP+15*
QUIT RIGHT+1~, RIGHT+3*, RIGHT+33, RIGHT+34*, RIGHT+37*, LEFT+1~, LEFT+3*, LEFT+69, LEFT+70*, LEFT+72*
>> REP RIGHT+26, LEFT+47, LEFT+62
>> SEGLINE( UNLITE+6, UNLITE+8
SEGMENT SEGSTART~, SEGSTART+1
>> SEGTYPE RIGHT+6, LEFT+9, LEFT+29*, LEFT+31, LEFT+41, DOWN+3*, DOWN+13*, UP+3*, UP+13*
SET FLD~, FLD+1, REP~, REP+1, COMP~, COMP+1, SUB~, SUB+1
STRING LJ~, LJ+1
>> SUB RIGHT+30, LEFT+49, LEFT+66
TMP GETCHAR+6~
TMP("LINE" GETCHAR+8*, GETCHAR+31
TMP("X" GETCHAR+9*, GETCHAR+31
TO LINE~, LINE+1, X~, X+2
VALUE RIGHT+2!, RIGHT+3*, RIGHT+9*, RIGHT+11, RIGHT+35, RIGHT+40*, LEFT+2!, LEFT+3*, LEFT+12*, LEFT+14
, LEFT+19*, LEFT+28!*, LEFT+32*, LEFT+34, LEFT+41*, LEFT+45!*, LEFT+51*, LEFT+52, LEFT+73, LEFT+76*
, LEFT+77
VALUE("END" RIGHT+11*, RIGHT+35*, RIGHT+41*, GORIGHT+5, LEFT+14*, LEFT+22*, LEFT+34*, LEFT+41*, LEFT+53*, LEFT+77*
, GOLEFT+5
VALUE("START" RIGHT+10*, RIGHT+35*, GORIGHT+5, LEFT+13*, LEFT+21*, LEFT+33*, LEFT+41*, LEFT+52*, LEFT+78*, GOLEFT+5
X IOXY~, IOXY+1, HILITE+6~, HILITE+13*, HILITE+17, HILITE+20
Y WRITELN~, WRITELN+1, IOXY~, IOXY+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All