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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBDF1B3

Package: Automated Information Collection System

Routine: IBDF1B3


Information

IBDF1B3 ;ALB/CJM - ENCOUNTER FORM - (lists data that did not fit on the encounter form);4/28/93

Source Information

Source file <IBDF1B3.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Automated Information Collection System 3 $$LSTDESCR^IBDFU1  ($$FLDDESCR,$$SFLDDSCR)^IBDFU1A  ($$BLKDESCR,$$DATANAME,RTNDSCR)^IBDFU1B  
VA FileMan 2 FILE^DICN  ^DIWP  

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
Automated Information Collection System 1 IBDF2A  

Entry Points

Name Comments DBIA/ICR reference
OVERFLOW ;
HDR ;writes header to top of page
BLOCKBRK ;writes a line to the report with the block name
FOOTER ;
FIELD ;displays the field (if list, displays all, if record, displays subfields)
SUBFLDS ;process each subfield
LIST ;displays the list
SUBCOLS ;process each subcolumn
SNGLVAL ;output - VALUE
LISTVAL ;input - ITEM=prior item processes, output - VALUE,ITEM=current item processed
TXTPRINT ;for printing a word-processing field

External References

Name Field # of Occurrence
FILE^DICN LIST+19
^DIWP TXTPRINT+4
$$LSTDESCR^IBDFU1 LIST+4
$$FLDDESCR^IBDFU1A FIELD+3
$$SFLDDSCR^IBDFU1A SUBFLDS+2, SUBFLDS+3
$$BLKDESCR^IBDFU1B OVERFLOW+8
$$DATANAME^IBDFU1B SUBFLDS+7, SUBCOLS+8
RTNDSCR^IBDFU1B FIELD+4, LIST+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?((IOM-$L(HDR))/2),HDR,?(IOM-10),"PAGE: ",PAGE,!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"CLINIC: ",$P($G(^SC(IBCLINIC,0)),"^")
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"PATIENT: "
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: $P($G(^DPT(DFN,0)),"^")
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"FORM: ",$P($G(^IBE(357,IBFORM,0)),"^"),!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BLOCKBRK+1
Function Call: WRITE
  • Prompt: !!,"BLOCK: ",$P($G(^IBE(357.1,IBBLK,0)),"^")
  • Line Location: BLOCKBRK+2
Function Call: WRITE
  • Prompt: !!!,?((IOM-$L(FTR))\2),FTR,@IOF
  • Line Location: FOOTER+2
Function Call: WRITE
  • Prompt: !
  • Line Location: FIELD+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FIELD+12
Function Call: WRITE
  • Prompt: !
  • Line Location: FIELD+14
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SUBFLDS+8
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LIST+12
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+20
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SUBCOLS+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TXTPRINT+6
Function Call: WRITE
  • Prompt: !,?5,LABEL_": "
  • Line Location: TXTPRINT+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TXTPRINT+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBD(357.96 - [#357.96] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(357.96 LIST+17
^DPT - [#2] HDR+5
^IBE(357 - [#357] HDR+6
^IBE(357.1 - [#357.1] BLOCKBRK+2
^SC - [#44] HDR+4
^UTILITY($J TXTPRINT+3!, TXTPRINT+8, TXTPRINT+10, TXTPRINT+11!

Label References

Name Line Occurrences
BLOCKBRK OVERFLOW+9
FIELD OVERFLOW+13
FOOTER OVERFLOW+14
HDR OVERFLOW+6, BLOCKBRK+1, FIELD+12, SUBFLDS+8, LIST+12, SUBCOLS+9, TXTPRINT+6, TXTPRINT+9
LIST OVERFLOW+12
LISTVAL FIELD+13, FIELD+18, LIST+13
SNGLVAL FIELD+17
SUBCOLS LIST+20
SUBFLDS FIELD+14, FIELD+19
TXTPRINT FIELD+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BLK FIELD+1~
CNT LIST+1~, LIST+11*, LIST+16*, LIST+17
DA LIST+19!
DA(1 LIST+17*
DD LIST+19!
>> DFN HDR+5
DIC LIST+17*, LIST+19!
DIC("DR" LIST+18*
DIC("P" LIST+17*
DIC(0 LIST+17*
DISPLAY FIELD+1~
DIWF TXTPRINT+1~, TXTPRINT+2*
DIWL TXTPRINT+1~, TXTPRINT+2*
DIWR TXTPRINT+1~, TXTPRINT+2*
DLAYGO LIST+17*, LIST+19!
DO LIST+19!
FIELD OVERFLOW+3~, OVERFLOW+10*, OVERFLOW+11, FIELD+3, FIELD+10, SUBFLDS+2, SUBFLDS+3, LIST+3
FLDNAME FIELD+1~
FTR FOOTER+1~*, FOOTER+2
HDR HDR+1~, HDR+2*, HDR+3
HIO FIELD+1~
>> IBARRAY("OVERFLOW" OVERFLOW+4, OVERFLOW+7, OVERFLOW+10, OVERFLOW+11, OVERFLOW+15, FIELD+10
IBBLK OVERFLOW+3~, OVERFLOW+7*, OVERFLOW+8, OVERFLOW+10, OVERFLOW+11, BLOCKBRK+2, FIELD+10
>> IBCLINIC HDR+4
>> IBFORM HDR+6
>> IBPFID LIST+15, LIST+17
IFARY FIELD+1~, FIELD+5*, LIST+1~, LIST+7*, SNGLVAL+1, LISTVAL+2, LISTVAL+4, TXTPRINT+4
IOF BLOCKBRK+1, FOOTER+2, FIELD+12, SUBFLDS+8, LIST+12, SUBCOLS+9, TXTPRINT+6, TXTPRINT+9
IOM HDR+3, FOOTER+2, TXTPRINT+2
IOSL BLOCKBRK+1, FIELD+12, SUBFLDS+8, LIST+12, SUBCOLS+9, TXTPRINT+6, TXTPRINT+9
ITEM OVERFLOW+3~, FIELD+1~, FIELD+10*, FIELD+13*, FIELD+16, LIST+1~, LIST+13*, LISTVAL+2, LISTVAL+4*
LABEL FIELD+1~, SUBFLDS+7*, SUBFLDS+9, LIST+1~, SUBCOLS+8*, SUBCOLS+10, TXTPRINT+1~, TXTPRINT+5*, TXTPRINT+7
LAST SUBFLDS+1~, SUBFLDS+2*, SUBFLDS+3*
LASTITEM FIELD+1~
LINE TXTPRINT+1~, TXTPRINT+2*, TXTPRINT+4*
LIST FIELD+1~, FIELD+9*, FIELD+10, FIELD+11, FIELD+16, FIELD+17, FIELD+18, LIST+1~, LIST+3*, LIST+4
LIST("INPUT_RTN" LIST+15
LIST("RTN" LIST+5
LIST("SCPIECE" SUBCOLS+4, SUBCOLS+5
LIST("SCTYPE" SUBCOLS+3
PAGE OVERFLOW+3~, OVERFLOW+5*, HDR+3, HDR+7*
PIECE FIELD+1~, SUBFLDS+4*, SUBFLDS+5, SUBFLDS+7, LIST+1~, SUBCOLS+1~, SUBCOLS+5*, SUBCOLS+6, SUBCOLS+8
PVALUE SUBFLDS+1~, SUBFLDS+5*, SUBFLDS+9, SUBCOLS+1~, SUBCOLS+6*, SUBCOLS+10
>> REPRINT LIST+15
RTN OVERFLOW+3~, FIELD+1~, FIELD+4, SUBFLDS+7, LIST+1~, LIST+5*, LIST+6, SUBCOLS+8
RTN("DATATYPE" FIELD+7, FIELD+9, SUBFLDS+4
RTN("DATA_LOCATION" FIELD+5, LIST+7
RTN("NAME" FIELD+13, FIELD+16, LIST+13, TXTPRINT+5
SPACING FIELD+1~
SUB SUBCOLS+1~, SUBCOLS+2*, SUBCOLS+3, SUBCOLS+4, SUBCOLS+5
TYPE OVERFLOW+3~, OVERFLOW+11*, OVERFLOW+12, FIELD+10, FIELD+11, FIELD+15
VALUE FIELD+1~, FIELD+14, SUBFLDS+5, LIST+1~, LIST+20, SUBCOLS+6, SNGLVAL+1*, LISTVAL+2*
WIO FIELD+1~
X LIST+17*, TXTPRINT+1~, TXTPRINT+4*, TXTPRINT+8*, TXTPRINT+10
XIO FIELD+1~
XLAB FIELD+1~
YIO FIELD+1~
YLAB FIELD+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All