LRAPBR1 ;DALOI/STAFF - AP Browser Print Cont. ; 26 Jul 2016 5:01 PM
Source file <LRAPBR1.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Lab Service | 3 | LRAPBR LRAPBR4 LRSPRPTA |
Name | Comments | DBIA/ICR reference |
---|---|---|
ENTER | ; from LRAPBR
|
|
MAIN | ;
|
|
SPEC | ; List specimens
|
|
MODCHK | ; Display modified banner if required
|
|
SUPBNNR | ; Display supplementary report header if one or more has been added
|
|
DIAG | ; Display the Brief Clinical History, Preoperative Diagnosis, Operative Findings, and Postoperative Diagnosis
|
|
DOC | ; Pathologist information
|
|
WPFLD | ; Display Frozen Section, Gross Description, Microscopic Description and Surgical Path Diagnosis
|
|
SUPRPT | ; Supplementary Report
|
|
COMMENT | ; Print comment field (#99)
|
|
SSJR | ; Print special studies/journal references
|
|
PPL | ; Print performing laboratories.
|
|
WP | ; Display word processing fields
|
|
HEADER | ;
|
|
HEADER2 | ;
|
|
FOOTER | ; Footer-called from ^LRAPBR
|
|
ESIGLN | ; Write signature block name, title, and date of signature
|
|
DASH | ; Display a line of dashes
|
|
GLENTRY(LRPR1,LRPR2,LRPR3) | ; Write to global
; LRPR1 = Text to be written to global ; LRPR2 = Tab position ; LRPR3 = 1 means start a new line. Otherwise, write an current line. |
|
TEXT1 | ;Text for top of report
|
|
TEXT2 | ;Descriptive text based on section
|
|
FIELDS | ;Field numbers for word processing fields
|
|
TEXTCHK | ; update text line counter if it is missing (Remedy 116253)
|
|
ATTEND(LRMD) | ; Retrieve surgeon/attending
; Call with LRMD = current ordering provider array, pass by reference |
Name | Field # of Occurrence |
---|---|
$$GET1^DID | SPEC+8, WPFLD+9, SUPRPT+3, WP+5, WP+6 |
WP^DIE | TEXTCHK+10 |
$$GET1^DIQ | SPEC+11, MODCHK+1, MODCHK+3, WPFLD+15, WPFLD+16, SUPRPT+8, SUPRPT+9, WP+3, ESIGLN+4, ESIGLN+6 , ESIGLN+10, ESIGLN+12, ESIGLN+16 |
^DIWP | WP+9 |
^LRAPBR3 | SSJR+1 |
GETPCP^LRAPUTL | ENTER+7 |
GLBWRT^LRAPUTL | GLENTRY+8 |
NEWLN^LRAPUTL | GLENTRY+7 |
PFAC^LRRP1 | HEADER+7 |
RL^LRRP1 | HEADER+15 |
RETLST^LRRPL | PPL+3 |
D^LRU | SUPRPT+23 |
^LRUA | ENTER+13 |
GETDATA^LRUEPR | ATTEND+12 |
SRCASE^LRUEPR | ATTEND+18 |
SRCASERR^LRUEPR | ATTEND+22 |
$$FMTE^XLFDT | ESIGLN+18 |
$$CJ^XLFSTR | SUPBNNR+3, SUPBNNR+5, SUPRPT+14 |
$$GET^XPAR | HEADER+6, HEADER+12 |
$$NAME^XUAF4 | ENTER+11 |
$$NAME^XUSER | ATTEND+26, ATTEND+29 |
FileNo | Call Tags |
---|---|
^LR - [#63] | GET1^DIQ |
63.08 | WP^DIE |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LR - [#63] | ENTER+3, ENTER+10, SPEC+10, SUPBNNR+1, WPFLD+5, WPFLD+8, WPFLD+13, WPFLD+14, SUPRPT+2, SUPRPT+6 , SUPRPT+12, SUPRPT+17, SUPRPT+19, COMMENT+3, COMMENT+8, COMMENT+9, HEADER+13, HEADER2+7, TEXTCHK+4, TEXTCHK+6 , TEXTCHK+7, ATTEND+7, ATTEND+17 |
^TMP("WP" | TEXTCHK+3!, TEXTCHK+8*, TEXTCHK+9, TEXTCHK+11! |
^UTILITY($J | WP+1!, WP+11, WP+12! |
^VA(200 - [#200] | SUPRPT+22, ESIGLN+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> AGE | FOOTER+14, FOOTER+15 |
>> BTAB | WPFLD+18, SUPRPT+11, SUPRPT+24, FOOTER+13, FOOTER+16, FOOTER+17, FOOTER+19 |
DATA | TEXTCHK+1~, TEXTCHK+7*, TEXTCHK+8 |
>> DIWF | WP+4*, WP+6*, WP+7* |
DIWL | WP+2~, WP+4*, WP+11 |
DIWR | WP+2~, WP+4* |
>> DOB | FOOTER+13 |
DUZ | ESIGLN+2, ESIGLN+4, ESIGLN+12, ESIGLN+16 |
DUZ(2 | HEADER+7 |
>> GROOT | ENTER+4*, ENTER+5* |
I | TEXTCHK+1~, TEXTCHK+2*, TEXTCHK+6*, TEXTCHK+7, TEXTCHK+8 |
IOM | SUPBNNR+3, SUPBNNR+5, SUPRPT+14, WP+4, HEADER2+3, HEADER2+8 |
>> LR( | WPFLD+6 |
>> LR("%" | DASH+1 |
>> LR("%1" | DOC+12 |
>> LR("F" | ENTER+14* |
>> LR("R" | SUPRPT+11 |
>> LR("W" | FOOTER+3, FOOTER+10 |
>> LRA | ENTER+19, DIAG+3, DOC+12, DOC+15 |
LRA1 | ENTER+1~, DOC+21*, DOC+23, WPFLD+12*, WPFLD+13*, SUPRPT+16*, SUPRPT+17*, SUPRPT+18 |
LRA2 | SUPRPT+1~, SUPRPT+20*, SUPRPT+21 |
>> LRA2A | SUPRPT+20*, SUPRPT+21*, SUPRPT+22*, SUPRPT+24 |
>> LRAA1 | HEADER+21 |
>> LRAC | HEADER2+2 |
LRADESC | ENTER+1~, HEADER2+2*, HEADER2+3, HEADER2+8 |
>> LRADM | FOOTER+19 |
>> LRADX | FOOTER+20 |
LRAPMD | ENTER+1~, MODCHK+3*, MODCHK+6, MODCHK+9, MODCHK+10 |
LRAPMR | ENTER+2~, MODCHK+1*, MODCHK+2 |
LRB | SPEC+4~, SPEC+9*, SPEC+10*, SPEC+11, COMMENT+2~, COMMENT+7*, COMMENT+8*, COMMENT+9 |
LRB(0 | COMMENT+9*, COMMENT+10 |
LRB1 | ENTER+2~, WPFLD+12*, WPFLD+13*, WPFLD+14, WPFLD+15, WPFLD+16, SUPRPT+16*, SUPRPT+18*, SUPRPT+19 |
LRCNT | ENTER+1~, MODCHK+6*, MODCHK+10*, DIAG+1*, DIAG+4*, DOC+21*, DOC+22*, WPFLD+1* |
LRDATA | ATTEND+10~, ATTEND+12 |
LRDATA( | ATTEND+13 |
>> LRDFN | ENTER+3, ENTER+7, ENTER+10, ENTER+21, SPEC+10, SUPBNNR+1, DIAG+1, WPFLD+5, WPFLD+7, WPFLD+8 , WPFLD+13, WPFLD+14, SUPRPT+2, SUPRPT+4, SUPRPT+6, SUPRPT+12, SUPRPT+17, SUPRPT+19, COMMENT+3, COMMENT+8 , COMMENT+9, PPL+3, HEADER+13, HEADER2+7, ESIGLN+6, ESIGLN+9, TEXTCHK+4, TEXTCHK+6, TEXTCHK+7, TEXTCHK+10 , ATTEND+6, ATTEND+7, ATTEND+11, ATTEND+17 |
>> LRDSC | SUPRPT+20*, SUPRPT+21*, SUPRPT+24 |
>> LREFLG | SSJR+2*, FOOTER+5 |
LRFILE | ENTER+1~, SPEC+4~, SPEC+8*, SPEC+11, DIAG+1*, WPFLD+7*, SUPRPT+3*, SUPRPT+8, SUPRPT+9, WP+3 , WP+5, ESIGLN+3*, ESIGLN+4, ESIGLN+12, ESIGLN+16 |
>> LRFILE1 | WPFLD+9*, WPFLD+15, WPFLD+16 |
>> LRFL2 | ESIGLN+8*, ESIGLN+10 |
LRFLD | ENTER+2~, DIAG+2*, WPFLD+7*, SUPRPT+25*, WP+3, WP+5, ESIGLN+3*, ESIGLN+4, ESIGLN+12 |
>> LRFLD2 | ESIGLN+3*, ESIGLN+16 |
>> LRI | ENTER+3, ENTER+7, ENTER+10, ENTER+21, SPEC+10, SUPBNNR+1, DIAG+1, WPFLD+5, WPFLD+7, WPFLD+8 , WPFLD+13, WPFLD+14, SUPRPT+2, SUPRPT+4, SUPRPT+6, SUPRPT+12, SUPRPT+17, SUPRPT+19, COMMENT+3, COMMENT+8 , COMMENT+9, PPL+3, HEADER+13, HEADER2+7, ESIGLN+9, TEXTCHK+4, TEXTCHK+6, TEXTCHK+7, TEXTCHK+10, ATTEND+6 , ATTEND+17 |
LRIENS | ENTER+2~, ENTER+21*, SPEC+11, MODCHK+1, MODCHK+3, DIAG+1*, DOC+2~, WPFLD+7*, WPFLD+15, WPFLD+16 , SUPRPT+7*, SUPRPT+8, SUPRPT+9, WP+3, ESIGLN+9*, ESIGLN+10, ATTEND+5~, ATTEND+6*, ATTEND+7 |
>> LRIENS1 | SUPRPT+4*, SUPRPT+7 |
LRINC | WP+2~, WP+8*, WP+9*, WP+10*, WP+11* |
LRJ | PPL+1~, PPL+10*, PPL+11*, ATTEND+10~, ATTEND+24*, ATTEND+25, ATTEND+26, ATTEND+27*, ATTEND+28, ATTEND+29 |
LRLENG1 | ENTER+1~, HEADER2+3*, HEADER2+4 |
LRLENG2 | ENTER+1~, HEADER2+3*, HEADER2+8 |
>> LRLLOC | FOOTER+17 |
LRMD | DOC+6, DOC+7, ATTEND~ |
LRMD("ERR" | ATTEND+21* |
LRMD("SR-ATTEND" | DOC+9, ATTEND+6*, ATTEND+29* |
LRMD("SR-SURGEON" | DOC+8, ATTEND+6*, ATTEND+26* |
LRN | HEADER+5~, HEADER+8*, HEADER+9*, HEADER+16*, HEADER+17* |
>> LRNTIME | ESIGLN+18 |
LRORDP | ATTEND+10~, ATTEND+17*, ATTEND+26 |
>> LRP | FOOTER+9 |
>> LRPATH | ESIGLN+6*, ESIGLN+10*, ESIGLN+12 |
>> LRPATH2 | ESIGLN+11*, ESIGLN+12*, ESIGLN+13 |
LRPL | PPL+1~, PPL+3, PPL+4, HEADER+5~, HEADER+7 |
LRPL( | PPL+11, HEADER+9 |
>> LRPMD | FOOTER+7 |
LRPR1 | GLENTRY~, GLENTRY+4*, GLENTRY+7, GLENTRY+8 |
LRPR2 | GLENTRY~, GLENTRY+5*, GLENTRY+7, GLENTRY+8 |
LRPR3 | GLENTRY~, GLENTRY+6*, GLENTRY+7, GLENTRY+8 |
>> LRPRAC | ENTER+7, FOOTER+22 |
>> LRPRAC(1 | FOOTER+22 |
>> LRQ | ENTER+13* |
>> LRQ(1 | ENTER+11*, HEADER2+3, HEADER2+4*, HEADER2+7 |
>> LRQ(8 | HEADER2+2 |
>> LRRC | DOC+16, FOOTER+7 |
LRREF | ATTEND+10~, ATTEND+11*, ATTEND+12, ATTEND+13, ATTEND+22 |
LRRL | HEADER+5~, HEADER+15 |
LRRL( | HEADER+17 |
>> LRRMD | DOC+20, DOC+25 |
>> LRSF | SPEC+8, MODCHK+1, MODCHK+3, DIAG+1, WPFLD+7, WPFLD+9, SUPRPT+3 |
>> LRSGN | SUPRPT+20*, SUPRPT+21*, SUPRPT+24 |
LRSPCE | ENTER+2~, HEADER2+3*, HEADER2+4 |
>> LRSR1 | WPFLD+15*, WPFLD+17, SUPRPT+8*, SUPRPT+10 |
>> LRSR2 | WPFLD+16*, WPFLD+17, SUPRPT+9*, SUPRPT+11 |
LRSRDATA | ATTEND+10~, ATTEND+18 |
LRSRDATA("ERR" | ATTEND+20, ATTEND+21, ATTEND+22 |
LRSRDATA(130 | ATTEND+25, ATTEND+28 |
LRSRTN | ATTEND+10~, ATTEND+13*, ATTEND+15, ATTEND+18, ATTEND+22, ATTEND+25, ATTEND+28 |
>> LRSS | ENTER+3, ENTER+7, ENTER+10, SPEC+10, SUPBNNR+1, DOC+24, WPFLD+5, WPFLD+8, WPFLD+13, WPFLD+14 , SUPRPT+2, SUPRPT+6, SUPRPT+12, SUPRPT+17, SUPRPT+19, COMMENT+3, COMMENT+8, COMMENT+9, PPL+3, HEADER+13 , HEADER2+7, ESIGLN+6, ESIGLN+7, ESIGLN+8, TEXTCHK+4, TEXTCHK+6, TEXTCHK+7, ATTEND+6, ATTEND+17 |
LRTEXT | ENTER+2~, MODCHK+5*, MODCHK+7*, MODCHK+8*, MODCHK+9*, MODCHK+11*, MODCHK+12, SUPBNNR+2*, SUPBNNR+3, SUPBNNR+4* , SUPBNNR+5, WPFLD+17*, WPFLD+18, SUPRPT+13*, SUPRPT+14, FOOTER+3*, FOOTER+4, FOOTER+5*, FOOTER+6, FOOTER+10* , FOOTER+11, FOOTER+15*, FOOTER+16, ESIGLN+13*, ESIGLN+15, ESIGLN+16*, ESIGLN+17, ESIGLN+18*, ESIGLN+19 |
>> LRTIU | ENTER+4, ENTER+5, ENTER+16, HEADER+1, HEADER+6, FOOTER+1 |
>> LRTK | ENTER+18 |
>> LRTK(1 | SPEC+6 |
LRTMP | ENTER+1~, DOC+24*, DOC+25, WP+1! |
LRTMP( | DOC+23*, DOC+24, WP+9 |
LRV | ENTER+2~, WPFLD+3*, WPFLD+5, WPFLD+7, SUPRPT+6*, SUPRPT+7, SUPRPT+12, SUPRPT+17, SUPRPT+19, TEXTCHK+4 , TEXTCHK+6, TEXTCHK+7, TEXTCHK+10 |
LRV1 | ENTER+2~, WPFLD+3*, WPFLD+6 |
LRV2 | ENTER+2~, WPFLD+3*, WPFLD+8, WPFLD+9, WPFLD+13, WPFLD+14 |
>> LRW(1 | HEADER2+2 |
>> LRW(5 | ENTER+17 |
>> LRW(9 | FOOTER+7 |
LRX | ENTER+2~, ENTER+10*, ENTER+11, SPEC+4~, SPEC+11*, SPEC+12, DOC+2~, HEADER+5~, HEADER+13*, HEADER+14 , HEADER+15, ATTEND+5~, ATTEND+7*, ATTEND+8, ATTEND+11, ATTEND+25*, ATTEND+26, ATTEND+28*, ATTEND+29 |
>> SEX | FOOTER+13 |
>> SSN | FOOTER+12 |
U | SUPBNNR+1, WPFLD+5, WPFLD+8, SUPRPT+2, SUPRPT+12 |
>> VADM(6 | FOOTER+15 |
X | WPFLD+2*, WPFLD+3, WP+2~, WP+3*, WP+5*, WP+6, WP+9*, ESIGLN+4*, ESIGLN+13, TEXTCHK+1~ , TEXTCHK+4*, TEXTCHK+5 |
>> Y | SUPRPT+20*, SUPRPT+21*, SUPRPT+24 |