LRBEBAO ;DALOI/JAH/FHS - ORDERING AND RESULTING FOR OUTPATIENTS ; 17-Oct-2014 09:22 ; MKK
Source file <LRBEBAO.m>
Package | Total | Call Graph |
---|---|---|
IHS Changes To Lab | 1 | $$MODEXIST^BLRUTIL4 |
Integrated Billing | 1 | $$SWSTAT^IBBAPI |
Kernel | 1 | $$NOW^XLFDT |
Lab Service | 1 | SVST^LRBEBA3 |
PCE Patient Care Encounter | 1 | $$DATA2PCE^PXAPI |
VA Fileman | 1 | ^DIC |
Name | Comments | DBIA/ICR reference |
---|---|---|
OPWRK3 | ;
|
|
EN | ;
|
|
END | ||
GETT(X) | ; Indicators for ^TMP
|
|
PCETM(LRBETM) | ;Return date/time without seconds
|
|
OPRES(LRBEAR,LRBEAR1,LRODT,LRSN,LRBEVST) | ; Outpatient Final Resulting
|
|
SEND | ; Send if procedure is defined
|
|
OPORD | ; Outpatient Order Entry
|
|
INIT | ;Setup PCE variables
|
|
OPWRK2 | ; Outpatient Work Two
|
|
OPWRK | ; More Outpatient Work
|
FileNo | Call Tags |
---|---|
^DIC(9.4 - [#9.4] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LRO(68 - [#68] | OPRES+43 |
^LRO(69 - [#69] | OPRES+36, OPRES+38 |
^TMP("LRPXAPI" | EN+8*, EN+9*, EN+10*, EN+11*, EN+12*, EN+13*, EN+14*, EN+15*, EN+17*, OPWRK+17* , OPWRK+18*, OPWRK+21*, OPWRK+23*, OPWRK+28*, OPWRK+31*, OPWRK+33*, SEND+4, SEND+9, SEND+14, END! , OPWRK3+6, OPWRK3+7*, OPWRK3+8*, OPWRK3+9*, OPWRK3+12*, OPWRK3+13*, OPWRK3+15*, OPWRK3+17*, OPWRK3+19*, OPWRK3+21* , OPWRK3+23*, OPWRK3+27*, OPWRK3+29*, OPWRK3+31*, OPWRK3+33*, OPWRK3+35*, OPWRK3+37*, OPWRK3+39*, OPWRK3+41*, OPWRK3+43* , OPWRK3+45*, OPWRK3+47*, OPWRK3+48! |
^XTMP("LRPCELOG" | SEND+5, SEND+6, SEND+9*, SEND+10*, SEND+12, SEND+13*, SEND+14* |
Name | Line Occurrences |
---|---|
$$GETT | OPWRK+20, OPWRK+30 |
$$PCETM | EN+7, OPWRK3+26 |
END | SEND+4 |
INIT | EN+3, OPRES+26 |
OPWRK | EN+22 |
OPWRK2 | OPRES+41 |
OPWRK3 | OPWRK2+2 |
SEND | OPRES+43 |
Name | Field # of Occurrence |
---|---|
^(0 | OPRES+38 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
B | OPWRK+1~, OPWRK+11*, OPWRK+19*, OPWRK+20, OPWRK+21, OPWRK+23, OPWRK+29*, OPWRK+30, OPWRK+31, OPWRK+33 |
BG | OPWRK+1~, OPWRK+20*, OPWRK+21, OPWRK+23, OPWRK+30*, OPWRK+31, OPWRK+33 |
DIC | INIT+3*, INIT+6! |
DIC(0 | INIT+3* |
DT | EN+6 |
DUZ | INIT+5 |
DX | OPWRK+1~ |
DX( | OPWRK+10, OPWRK+12* |
DX(1 | OPWRK+15, OPWRK+16 |
DX(2 | OPWRK+26, OPWRK+27 |
>> ERRDIS | SEND+11, INIT+5* |
>> INROOT | SEND+11, INIT+1* |
JJ | OPWRK3+1~, OPWRK3+6*, OPWRK3+7, OPWRK3+8, OPWRK3+9 |
>> LRAA | OPRES+43 |
>> LRACC | SEND+8 |
LRACCX | SEND+7~, SEND+8*, SEND+10 |
LRBEAR | OPRES~ |
LRBEAR( | EN+5, EN+10, EN+11, EN+14, EN+16, EN+17, EN+19, EN+21, OPWRK+6, OPWRK+7 , OPRES+39, OPRES+40, OPWRK2+2, OPWRK3+2 |
LRBEAR1 | OPRES~ |
>> LRBECDT | EN+6 |
>> LRBECPT( | OPWRK+3, OPWRK+4 |
>> LRBEDFN | EN+5*, EN+10, EN+11, EN+14, EN+16, EN+17, EN+19, EN+21, OPWRK+6, OPWRK+7 , OPRES+39*, OPRES+40, OPWRK2+2, OPWRK3+2 |
>> LRBEDGX | OPWRK+5*, OPWRK+6*, OPWRK+7, OPWRK+10, OPWRK+12, OPWRK+14*, OPWRK+15*, OPWRK+16, OPWRK+17, OPWRK+25* , OPWRK+26*, OPWRK+27, OPWRK+28 |
LRBEDIA | OPWRK+1~, OPWRK+16*, OPWRK+17, OPWRK+18, OPWRK+21, OPWRK+27*, OPWRK+28, OPWRK+31 |
>> LRBEDN | OPWRK2+2*, OPWRK3+2 |
>> LRBEIEN | OPWRK3+10* |
LRBEPTDT | OPWRK+7*, OPWRK+8, OPWRK2+1!, OPWRK3+2*, OPWRK3+3, OPWRK3+4, OPWRK3+5*, OPWRK3+11, OPWRK3+12, OPWRK3+14 , OPWRK3+15, OPWRK3+16, OPWRK3+17, OPWRK3+18, OPWRK3+19, OPWRK3+20, OPWRK3+21, OPWRK3+22, OPWRK3+23, OPWRK3+24 , OPWRK3+25, OPWRK3+28, OPWRK3+29, OPWRK3+30, OPWRK3+31, OPWRK3+32, OPWRK3+33, OPWRK3+34, OPWRK3+35, OPWRK3+36 , OPWRK3+37, OPWRK3+38, OPWRK3+39, OPWRK3+40, OPWRK3+41, OPWRK3+42, OPWRK3+43, OPWRK3+46, OPWRK3+47 |
>> LRBESMP | EN+18*, EN+19*, EN+21, OPWRK+6, OPWRK+7 |
>> LRBESPC | EN+20*, EN+21*, OPWRK+6, OPWRK+7 |
LRBETM | EN+6*, EN+7*, EN+8, OPWRK3+25~*, OPWRK3+26*, OPWRK3+27, OPWRK3+44, PCETM~, PCETM+2*, PCETM+3 , PCETM+4, PCETM+9*, PCETM+10 |
LRBETNUM | OPWRK+4*, END!, OPWRK3+10*, OPWRK3+12, OPWRK3+13, OPWRK3+15, OPWRK3+17, OPWRK3+19, OPWRK3+21, OPWRK3+23 , OPWRK3+27, OPWRK3+29, OPWRK3+31, OPWRK3+33, OPWRK3+35, OPWRK3+37, OPWRK3+39, OPWRK3+41, OPWRK3+43, OPWRK3+45 , OPWRK3+47, OPWRK3+48, INIT+5* |
>> LRBETST | OPWRK+3*, OPWRK+4, OPWRK+6, OPWRK+7 |
>> LRBEVSIT | SEND+11, SEND+13, SEND+15 |
LRBEVST | OPRES~ |
>> LRCDT | EN+6 |
>> LRDBEDGX | OPRES+33, OPRES+35*, OPRES+36, OPRES+38*, OPWRK3+5, OPWRK3+7 |
>> LRI | OPRES+40*, OPWRK2+2, OPWRK3+2 |
LRLNOW | SEND+3~, SEND+6*, SEND+9, SEND+10, SEND+12, SEND+13, SEND+14 |
LRODT | OPRES~, OPRES+36, OPRES+38, SEND+15, OPWRK3+10 |
>> LROOS | EN+9 |
>> LRPKG | SEND+11, INIT+2, INIT+4* |
LRSN | OPRES~, OPRES+36, OPRES+38, SEND+15, OPWRK3+10 |
LRSWDATE | OPRES+27~, OPRES+30*, OPWRK3+44 |
LRSWSTAT | OPRES+27~, OPRES+29*, OPRES+30, OPRES+31*, OPWRK3+44 |
>> LRUID | SEND+8 |
LRUIDX | SEND+7~, SEND+8*, SEND+10 |
LRVX | SEND+3~, SEND+11*, SEND+13 |
LRX | OPRES+34~, OPRES+35*, OPRES+36*, OPRES+38 |
N | OPWRK+1~, OPWRK+8*, OPWRK+10, OPWRK+12 |
PCETM | PCETM+1~, PCETM+4*, PCETM+5*, PCETM+6*, PCETM+7*, PCETM+8*, PCETM+9 |
PXALOOK | SEND+3~ |
PXUCV | SEND+3~ |
>> SRC | SEND+11, INIT+5* |
>> SUB1 | EN+4*, EN+8, EN+9, EN+10, EN+11, EN+12, EN+13, EN+17, OPWRK+23, OPWRK+33 , OPRES+32*, OPWRK3+12, OPWRK3+13, OPWRK3+15, OPWRK3+17, OPWRK3+19, OPWRK3+21, OPWRK3+23, OPWRK3+27, OPWRK3+29 , OPWRK3+31, OPWRK3+33, OPWRK3+35, OPWRK3+37, OPWRK3+39, OPWRK3+41, OPWRK3+43, OPWRK3+47, OPWRK3+48 |
>> SUB2 | EN+4*, OPWRK+17, OPWRK+18, OPWRK+21, OPWRK+28, OPWRK+31 |
>> SUB3 | EN+4*, EN+14, EN+15 |
U | OPWRK+8, OPWRK+11, OPWRK+19, OPWRK+21, OPWRK+23, OPWRK+29, OPWRK+31, OPWRK+33, OPRES+30, OPRES+31 , OPRES+43, SEND+10, SEND+13, OPWRK3+4, OPWRK3+5, OPWRK3+11, OPWRK3+12, OPWRK3+14, OPWRK3+15, OPWRK3+16 , OPWRK3+17, OPWRK3+18, OPWRK3+19, OPWRK3+20, OPWRK3+21, OPWRK3+22, OPWRK3+23, OPWRK3+24, OPWRK3+25, OPWRK3+28 , OPWRK3+29, OPWRK3+30, OPWRK3+31, OPWRK3+32, OPWRK3+33, OPWRK3+34, OPWRK3+35, OPWRK3+36, OPWRK3+37, OPWRK3+38 , OPWRK3+39, OPWRK3+40, OPWRK3+41, OPWRK3+42, OPWRK3+43, OPWRK3+46, OPWRK3+47 |
>> USR | SEND+11, INIT+5* |
X | OPWRK+1~, OPWRK+8*, OPWRK+11, GETT~, GETT+1, GETT+2, INIT+3* |
XX | OPWRK+1~, OPWRK+10*, OPWRK+11*, OPWRK+12, OPWRK+16*, OPWRK+19, OPWRK+21, OPWRK+23, OPWRK+27*, OPWRK+29 , OPWRK+31, OPWRK+33 |
>> Y | INIT+4 |