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

Package: Automated Information Collection System

Routine: IBDF2F


Information

IBDF2F ;ALB/CJM - ENCOUNTER FORM - PRINT FORM(sends to printer) ;NOV 16,1992

Source Information

Source file <IBDF2F.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Automated Information Collection System 3 CNVRTHT^IBDF2D1  REGISTER^IBDF2F1  ($$CTRLS,$$GRPHCS)^IBDFU  

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

Package Total Caller Graph
Automated Information Collection System 3 IBDF2A  IBDF2H  IBDFRPC1  

Entry Points

Name Comments DBIA/ICR reference
LNPRINT(IBPFID) ;prints the form
UNDRLINE ;
PGRPHCS(STARTY,LASTY) ;print graphics - only for raster devices
DRAW(STARTY,LASTY) ; draws the objects needing HP-GL/2
DRWBBL(Y,X) ;
; -- position is in terms of col,row - change to decipoints
DRWBOX(Y,X,WIDTH,HT) ;
; -- position is in terms of col,row - change to decipoints
HANDPRNT(Y,X,WIDTH,LINES,PRNTTYPE,TYPEDATA) ; draw hand print area
; -- FORMAT - contains overlay for the field
; -- UNIT - label to print on the right of print area
; -- PRNTTYPE = could be for ICR (print comb) or not ICR (no comb, different size)
FRMT(ND,ADT) ; -- function returns piece 5 on entries from 359.1
; -- reformats the Checkout/date format for y2k
; -- input nd := zero node from 359.1 for entry
; adt := alternate date (appointment date, when known)
WHITEOUT ; -- puts white space around the anchors
; helps insure that the anchors can be located

External References

Name Field # of Occurrence
CNVRTHT^IBDF2D1 HANDPRNT+29
REGISTER^IBDF2F1 LNPRINT+23, LNPRINT+32
$$CTRLS^IBDFU LNPRINT+36
$$GRPHCS^IBDFU PGRPHCS+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IBDEVICE("DUPLEX_LONG")
  • Line Location: LNPRINT+9
Function Call: WRITE
  • Prompt: IBDEVICE("DUPLEX_SHORT")
  • Line Location: LNPRINT+10
Function Call: WRITE
  • Prompt: IBDEVICE("SIMPLEX")
  • Line Location: LNPRINT+11
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LNPRINT+12
Function Call: WRITE
  • Prompt: !
  • Line Location: LNPRINT+33
Function Call: WRITE
  • Prompt: IBDEVICE("SIMPLEX")
  • Line Location: LNPRINT+51
Function Call: WRITE
  • Prompt: IBDEVICE("SIMPLEX")
  • Line Location: LNPRINT+52
Function Call: WRITE
  • Prompt: @IBDEVICE("RESET")
  • Line Location: LNPRINT+59
Function Call: WRITE
  • Prompt: IOG1
  • Line Location: PGRPHCS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PGRPHCS+5
Function Call: WRITE
  • Prompt: GRPHCS
  • Line Location: PGRPHCS+5
Function Call: WRITE
  • Prompt: IOG0
  • Line Location: PGRPHCS+7
Function Call: WRITE
  • Prompt: $C(27),"*p0x0Y"
  • Line Location: DRAW+2
Function Call: WRITE
  • Prompt: $C(27),"*c5760x7200Y"
  • Line Location: DRAW+3
Function Call: WRITE
  • Prompt: $C(27),"*c0T"
  • Line Location: DRAW+4
Function Call: WRITE
  • Prompt: $C(27),"%1B"
  • Line Location: DRAW+5
Function Call: WRITE
  • Prompt: "IN;SP1;"
  • Line Location: DRAW+6
Function Call: WRITE
  • Prompt: "SC0,5760,7200,0;"
  • Line Location: DRAW+7
Function Call: WRITE
  • Prompt: "AD3,16.6;"
  • Line Location: DRAW+8
Function Call: WRITE
  • Prompt: "PW."_PWPARAM_";"
  • Line Location: DRAW+17
Function Call: WRITE
  • Prompt: "SV1,"_FIPARAM_";"
  • Line Location: DRAW+18
Function Call: WRITE
  • Prompt: "PW.4;"
  • Line Location: DRAW+24
Function Call: WRITE
  • Prompt: "SV1,100;"
  • Line Location: DRAW+25
Function Call: WRITE
  • Prompt: "PW."_PWPARAM_";"
  • Line Location: DRAW+37
Function Call: WRITE
  • Prompt: "SV1,"_FIPARAM_";"
  • Line Location: DRAW+38
Function Call: WRITE
  • Prompt: $C(27),"%0A"
  • Line Location: DRAW+46
Function Call: WRITE
  • Prompt: "PA"_(X)_","_(Y)_";"
  • Line Location: DRWBBL+5
Function Call: WRITE
  • Prompt: "EA"_(X+87)_","_(Y+45)_";"
  • Line Location: DRWBBL+8
Function Call: WRITE
  • Prompt: "PA"_(X)_","_(Y)_";"
  • Line Location: DRWBOX+5
Function Call: WRITE
  • Prompt: "EA"_(X+((WIDTH-1)*IBDEVICE("COL_WIDTH")))_","_(Y+((HT-1.7)*IBDEVICE("ROW_HT")))_";"
  • Line Location: DRWBOX+8
Function Call: WRITE
  • Prompt: "SA;","PA"_(X+50+(172.7654*WIDTH))_",",(Y+(120))_";","LB",UNIT,$CHAR(3),"SS;"
  • Line Location: HANDPRNT+19
Function Call: WRITE
  • Prompt: "PA"_(X+(172.7654*I))_",",(Y+(180))_";PD;PR0,-180;PU"
  • Line Location: HANDPRNT+21
Function Call: WRITE
  • Prompt: $C(27),"&a0v0H",!
  • Line Location: WHITEOUT+5
Function Call: WRITE
  • Prompt: $C(27),"&l0E"
  • Line Location: WHITEOUT+6
Function Call: WRITE
  • Prompt: $C(27),"&a354v4H",$C(27),"*c200h60v1P"
  • Line Location: WHITEOUT+9
Function Call: WRITE
  • Prompt: $C(27),"&a7505v4H",$C(27),"*c200h60v1P"
  • Line Location: WHITEOUT+12
Function Call: WRITE
  • Prompt: $C(27),"&a354v5450H",$C(27),"*c400h60v1P"
  • Line Location: WHITEOUT+15
Function Call: WRITE
  • Prompt: $C(27),"&a7505v5450H",$C(27),"*c400h60v1P"
  • Line Location: WHITEOUT+18

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RM" LNPRINT+55
^IBD(357.09 - [#357.09] DRAW+13, DRAW+15, DRAW+33, DRAW+35
^IBE(359.1 - [#359.1] HANDPRNT+6

Label References

Name Line Occurrences
DRAW LNPRINT+28, LNPRINT+46
DRWBBL DRAW+21
DRWBOX DRAW+28
HANDPRNT DRAW+43
PGRPHCS LNPRINT+27, LNPRINT+43
UNDRLINE LNPRINT+40
WHITEOUT LNPRINT+28, LNPRINT+46

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADT FRMT~, FRMT+6
BLK DRAW+1~, DRAW+27*, DRAW+28
CHAR HANDPRNT+4~, HANDPRNT+21*, HANDPRNT+24
COL DRAW+1~, DRAW+21*, DRAW+27*, DRAW+28, DRAW+41*, DRAW+42, DRAW+43
CURX LNPRINT+3~, LNPRINT+35*, LNPRINT+36, LNPRINT+37*, LNPRINT+38
CURY LNPRINT+3~, LNPRINT+24*, LNPRINT+25, LNPRINT+27, LNPRINT+28, LNPRINT+33, LNPRINT+34, LNPRINT+40
DT FRMT+6
DX PGRPHCS+1~, PGRPHCS+3*, PGRPHCS+5*
DY PGRPHCS+1~, PGRPHCS+3*, PGRPHCS+5*
FIPARAM DRAW+1~, DRAW+15*, DRAW+16*, DRAW+18, DRAW+35*, DRAW+36*, DRAW+38
FORMAT HANDPRNT+4~, HANDPRNT+8*, HANDPRNT+21
FRMT FRMT+4~, FRMT+5*, FRMT+6*, FRMT+7
GRPHCS PGRPHCS+1~, PGRPHCS+5*
HT DRAW+1~, DRAW+28*, DRWBOX~, DRWBOX+8
I HANDPRNT+21~*, HANDPRNT+23
>> IBARRAY("BOXES" DRAW+27, DRAW+28
>> IBARRAY("BUBBLES" DRAW+21
>> IBARRAY("CONTROLS" LNPRINT+35, LNPRINT+36
>> IBARRAY("GRAPHICS" PGRPHCS+4, PGRPHCS+5
>> IBARRAY("HAND_PRINT" DRAW+41, DRAW+42
>> IBARRAY("TEXT" LNPRINT+16, LNPRINT+18, LNPRINT+39
>> IBARRAY("UNDERLINES" LNPRINT+16, UNDRLINE+3, UNDRLINE+11
>> IBDEVICE("COL_WIDTH" DRWBBL+2, DRWBOX+2, DRWBOX+8, HANDPRNT+12, HANDPRNT+28
>> IBDEVICE("CRT" UNDRLINE+1
>> IBDEVICE("DUPLEX_LONG" LNPRINT+9, LNPRINT+51
>> IBDEVICE("DUPLEX_SHORT" LNPRINT+10, LNPRINT+52
>> IBDEVICE("GRAPHICS" LNPRINT+27, LNPRINT+43
>> IBDEVICE("PCL" LNPRINT+21, LNPRINT+27, LNPRINT+28, LNPRINT+43, LNPRINT+46, LNPRINT+57, UNDRLINE+4, UNDRLINE+7
>> IBDEVICE("RESET" LNPRINT+59
>> IBDEVICE("ROW_HT" DRWBBL+2, DRWBOX+2, DRWBOX+8, HANDPRNT+12, HANDPRNT+13, HANDPRNT+28, HANDPRNT+33
>> IBDEVICE("SIMPLEX" LNPRINT+11, LNPRINT+51, LNPRINT+52
>> IBDEVICE("TCP" LNPRINT+29, LNPRINT+30, LNPRINT+48
>> IBFORM("PAGE_HT" LNPRINT+14
>> IBFORM("PRINT_MODE" LNPRINT+9, LNPRINT+10, LNPRINT+51, LNPRINT+52
>> IBFORM("SCAN" WHITEOUT+3
>> IBFORM("WIDTH" DRWBBL+2, HANDPRNT+12
IBPFID LNPRINT~
IEN DRAW+1~, DRAW+41*, DRAW+42
IOF LNPRINT+12, LNPRINT+30, LNPRINT+48
>> IOG0 PGRPHCS+7
>> IOG1 PGRPHCS+2
IOM LNPRINT+55
IOSL LNPRINT+15, LNPRINT+60*
>> IOXY PGRPHCS+3, PGRPHCS+5
LASTY PGRPHCS~, PGRPHCS+4, PGRPHCS+6, DRAW~, DRAW+21, DRAW+27, DRAW+41, DRAW+45
LINE LNPRINT+3~, LNPRINT+18*, LNPRINT+36, LNPRINT+38, LNPRINT+39*, PGRPHCS+1~, PGRPHCS+4*, PGRPHCS+5
LINES HANDPRNT~, HANDPRNT+9*, HANDPRNT+13*, HANDPRNT+29, HANDPRNT+33
ND FRMT~, FRMT+5, FRMT+6
NODE DRAW+1~, DRAW+28*, DRAW+42*, DRAW+43, HANDPRNT+4~, HANDPRNT+5*, HANDPRNT+6*, HANDPRNT+8
NXTTXT LNPRINT+3~, LNPRINT+16*, LNPRINT+18, LNPRINT+24, LNPRINT+26, LNPRINT+34, LNPRINT+35, LNPRINT+36, LNPRINT+39*
NXTUL LNPRINT+3~, LNPRINT+16*, LNPRINT+24, LNPRINT+26, LNPRINT+40, UNDRLINE+3, UNDRLINE+11*
NXTX LNPRINT+3~, LNPRINT+35*, LNPRINT+36, LNPRINT+37
PAGE LNPRINT+3~, LNPRINT+4*, LNPRINT+23, LNPRINT+31*, LNPRINT+32
PERPAGE LNPRINT+3~, LNPRINT+14*, LNPRINT+15*, LNPRINT+25, LNPRINT+33, LNPRINT+36, PGRPHCS+5, DRAW+21, DRAW+28, DRAW+43
PRNTTYPE DRAW+1~, DRAW+42*, DRAW+43, HANDPRNT~, HANDPRNT+10, HANDPRNT+26
PWPARAM DRAW+1~, DRAW+13*, DRAW+14*, DRAW+17, DRAW+33*, DRAW+34*, DRAW+37
ROW DRAW+1~, DRAW+20*, DRAW+21*, DRAW+26*, DRAW+27*, DRAW+28, DRAW+40*, DRAW+41*, DRAW+42, DRAW+43
STARTY LNPRINT+3~, LNPRINT+17*, LNPRINT+27, LNPRINT+28, LNPRINT+43, LNPRINT+46, PGRPHCS~, PGRPHCS+4, PGRPHCS+6*, DRAW~
, DRAW+20, DRAW+26, DRAW+40, DRAW+45*
STRING LNPRINT+3~, LNPRINT+38*
TYPEDATA HANDPRNT~, HANDPRNT+6
UL UNDRLINE+2~, UNDRLINE+3*, UNDRLINE+5, UNDRLINE+8
UNIT HANDPRNT+4~, HANDPRNT+8*, HANDPRNT+19
WIDTH DRAW+1~, DRAW+28*, DRAW+42*, DRAW+43, DRWBOX~, DRWBOX+8, HANDPRNT~, HANDPRNT+17, HANDPRNT+19, HANDPRNT+21
, HANDPRNT+33
X LNPRINT+55*!, DRWBBL~, DRWBBL+2*, DRWBBL+5, DRWBBL+8, DRWBOX~, DRWBOX+2*, DRWBOX+5, DRWBOX+8, HANDPRNT~
, HANDPRNT+12*, HANDPRNT+15, HANDPRNT+17, HANDPRNT+19, HANDPRNT+21, HANDPRNT+23, HANDPRNT+28*, HANDPRNT+31, HANDPRNT+33
Y DRWBBL~, DRWBBL+2*, DRWBBL+5, DRWBBL+8, DRWBOX~, DRWBOX+2*, DRWBOX+5, DRWBOX+8, HANDPRNT~, HANDPRNT+12*
, HANDPRNT+13*, HANDPRNT+15, HANDPRNT+17, HANDPRNT+19, HANDPRNT+21, HANDPRNT+23, HANDPRNT+28*, HANDPRNT+31, HANDPRNT+33
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All