LRCAPBV ;VA/DALOI/FHS - PROCESS VBECS WORKLOAD API ; 13-Aug-2013 09:15 ; MKK
Source file <LRCAPBV.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SUF | ||
| TEC | ||
| DPROV | ;Set default PCE Provider | |
| ERR | ;Check entry for critical data | |
| EUPDATE | ;Set error codes into entry | |
| DPF | ||
| URG | ||
| FILE | ||
| DIV | ||
| TST | ;Get default tests names | |
| NLT | ||
| GET | ;Call VBECS 6002.01 data populating API | |
| BBLOOK | ; | |
| LRAA | ;Get accession data | |
| TS | ||
| AA | ;Accession Area Information | |
| ADT | ||
| EN | ;Will only run if VBECS BUNDLE 1.0 is installed. | |
| END | ; | |
| LOCK | ||
| LRAA1 | ||
| PCEFILE | ;File PCE if outpatient location | |
| DFN | ||
| LRDAA | ||
| UNIT | ||
| UID | ||
| DLOC | ;Get default location and provider | |
| BBDIQ | ;Gather entry info | |
| ACCES | ||
| TYPE | ||
| LOOP | ;Find entries with the status of pending. | |
| LK1 | ;Set default values | 
| Name | Field # of Occurrence | 
|---|---|
| $$FIND1^DIC | LK1+1, LK1+3, LK1+5, LK1+6, TST+1, TST+2, TST+3 | 
| FILE^DID | DPF+2 | 
| FILE^DIE | BBDIQ+8, BBDIQ+17, EUPDATE+7 | 
| GETS^DIQ | DLOC+1, BBDIQ+5, SUF+3, LRAA+4, AA+5, AA+8, AA+11, AA+12, AA+13, LRAA1+3 , ACCES+9 | 
| INIT^LRCAPBB | ERR+2 | 
| $$NLT^LRCAPBV1 | SUF+2 | 
| EN^LRCAPBV1 | PCEFILE+3 | 
| ^LRCAPV3 | BBDIQ+14 | 
| $$WKLDCAP^VBECA7 | GET+1 | 
| UPDTWKLD^VBECA7 | END+3 | 
| $$NOW^XLFDT | BBDIQ+16 | 
| $$GET^XUA4A72 | DLOC+4 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^SC - [#44] | GETS^DIQ | 
| ^LAB(60 - [#60] | FIND1^DIC | 
| ^LR - [#63] | GETS^DIQ | 
| ^LAB(64.2 - [#64.2] | FIND1^DIC, GETS^DIQ | 
| ^LRD(65 - [#65] | FIND1^DIC | 
| ^LRO(68 - [#68] | FIND1^DIC, GETS^DIQ | 
| 68.02 | GETS^DIQ | 
| 68.04 | GETS^DIQ | 
| 68.05 | GETS^DIQ | 
| ^LAB(69.9 - [#69.9] | GETS^DIQ | 
| ^DIC(9.4 - [#9.4] | FIND1^DIC | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIC(4 - [#4] | DIV+1 | 
| ^DPT - [#2] | DFN+3 | 
| ^LAM - [#64] | NLT+1 | 
| ^LRO(68 - [#68] | UID+2, UID+3, UID+4, UID+5, AA+3, LRAA1+1 | 
| ^VA(200 - [#200] | TEC+1 | 
| ^VBEC(6002.01 | EN+1, LOOP+1, BBDIQ+3!, EUPDATE+3 | 
| ^XTMP("BVEC WKLD" | LOCK, LOCK+1*, END+1 | 
| Name | Line Occurrences | 
|---|---|
| BBDIQ | LOOP+1 | 
| END | GET+2, DLOC+4, LK1+7, TST+4 | 
| ERR | BBDIQ+6 | 
| EUPDATE | LK1+8, TST+5, ERR+1, TYPE+1, DIV+1, ADT+1, NLT+1, DFN, TEC+1, UID+6 , UNIT+1 | 
| LOCK | LOCK | 
| LRAA | BBDIQ+9 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ANS | LOCK+2~, GET+1*, GET+2, BBDIQ+2! | 
| ANS( | DLOC+2, DLOC+3, BBDIQ+12, BBDIQ+13, TYPE, DIV, ADT, NLT, SUF, SUF+4 , SUF+5, DFN, TEC, UID, TS+1, UNIT, LRDAA, LRAA+1 | 
| ANX | LOCK+2~, BBDIQ+2!, LRAA+3! | 
| ANX( | LRAA1+2, ACCES, ACCES+1, ACCES+2, ACCES+3, ACCES+4, ACCES+5, ACCES+6, ACCES+7, ACCES+8 , URG | 
| ANX("GLOBAL N | AME" , DPF+3 | 
| ANX(44 | AA+9, ACCES+10, ACCES+11 | 
| ANX(63 | DPF, DPF+1 | 
| ANX(68 | LRAA+5, AA+6 | 
| D1 | LOCK+3~ | 
| D2 | LOCK+3~ | 
| DFN | LOCK+3~, PCEFILE+2, PCEFILE+3, DFN*, DFN+3, FILE+2, DPF+1*, DPF+3 | 
| ERR | LOCK+3~, LK1+2*, LK1+8*, TST+5*, BBDIQ+2!, BBDIQ+6, BBDIQ+10, ERR+1, ERR+3*, TYPE , TYPE+1*, DIV, DIV+1*, ADT, ADT+1*, NLT, NLT+1*, SUF, DFN, TEC , TEC+1*, UID, UID+5*, UID+6, TS+7, TS+8*, UNIT, UNIT+1*, EUPDATE+1, EUPDATE+5 , EUPDATE+6 | 
| ERX | LRAA+3! | 
| FILE | LOCK+3~, BBDIQ+2!, BBDIQ+4*, BBDIQ+5 | 
| >> FLD | AA+10*, AA+11 | 
| IEN | LOCK+3~, BBDIQ+4*, BBDIQ+5, TYPE, DIV, ADT, NLT, SUF, SUF+5, DFN , TEC, UID, TS+1, UNIT, LRDAA, AA+4*, AA+11, AA+12, AA+13, LRAA1+2 , ACCES, ACCES+1, ACCES+2, ACCES+3, ACCES+4, ACCES+5, ACCES+6, ACCES+7, ACCES+8, URG | 
| LRAA | LOCK+3~, TEC+2*, UID+2*, UID+3, UID+4, UID+5, LRAA+1*, LRAA+2*, LRAA+4, LRAA+5 , AA+1, AA+2, AA+3, AA+4, AA+5, AA+6, LRAA1+1 | 
| LRACC | LOCK+3~, ACCES+7* | 
| LRACPABV | LOCK+3~ | 
| LRADT | LOCK+3~, PCEFILE+3, ADT*, ADT+1, ADT+2 | 
| LRAN | LOCK+3~, TEC+2*, UID+4*, UID+5, AA+2, AA+3, AA+4, LRAA1+1 | 
| LRCAPBV | LOCK+9~, GET+3* | 
| LRCC | LOCK+3~, SUF+2* | 
| LRCDT | LOCK+4~, BBDIQ+12*, ADT+2*, UID+3*, UID+4, UID+5, AA+2, AA+3, AA+4, LRAA1+1 | 
| LRCNT | LOCK+4~, PCEFILE+3, SUF+5* | 
| LRCTM | LOCK+4~, BBDIQ+13*, ADT+2* | 
| LRD65 | LOCK+4~, LK1+5*, LK1+7, FILE, UNIT+1 | 
| LRDAA | LOCK+4~, LK1+3*, LK1+4*, TEC+2, LRAA+2 | 
| >> LRDBUG | TST+6, LOOP+2, BBDIQ+1, EUPDATE+1 | 
| LRDFN | LOCK+4~, DFN+1*, DFN+3*, LRAA1+2*, LRAA1+3, DPF, DPF+1, DPF+3 | 
| LRDIV | LOCK+4~, DIV*, DIV+1, DIV+2 | 
| LRDLOC | LOCK+4~, DLOC+2*, AA+7 | 
| LRDPF | LOCK+9~, DPF* | 
| LRDPRO | LOCK+4~, DLOC+3*, DLOC+4 | 
| >> LRDSSID | PCEFILE+3, AA+9* | 
| >> LRDSSLOC | PCEFILE+3, AA+6*, AA+7*, AA+8, AA+9 | 
| LRDSUF | LOCK+4~, LK1+6*, SUF+1 | 
| LRE655 | LOCK+5~, FILE+1 | 
| LREDT | LOCK+5~, ADT* | 
| LRERR | LOCK+5~, LK1+7*, ERR+1* | 
| LRESCPT | LOCK+5~, GET+3* | 
| LRFDA | LOCK+5~, BBDIQ+2!, BBDIQ+15! | 
| LRFDA( | BBDIQ+7*, BBDIQ+15*, BBDIQ+16* | 
| LRFDA(1 | EUPDATE+2!, EUPDATE+4*, EUPDATE+5*, EUPDATE+6* | 
| LRFILE | LOCK+5~, FILE*, FILE+1*, FILE+2*, UNIT+1*, LRAA1+1*, DPF+2, DPF+3* | 
| LRFNUM | LOCK+5~ | 
| LRIDT | LOCK+5~, ACCES+12* | 
| LRIEN | DLOC+5*, LOOP+1*, END+4!, BBDIQ+1, BBDIQ+3, BBDIQ+4, BBDIQ+7, BBDIQ+12, BBDIQ+13, BBDIQ+15 , BBDIQ+16, EUPDATE+3*, EUPDATE+4, EUPDATE+5, EUPDATE+6, LRAA+1 | 
| LRII | LOCK+6~ | 
| LRIN | LOCK+6~, PCEFILE+3, DIV+2* | 
| LRLD | LOCK+6~, ERR+2*, LRAA+5* | 
| LRLOG | LOCK+6~ | 
| LRLSS | LOCK+6~, BBDIQ+11*, AA+1* | 
| LRMA | LOCK+6~, BBDIQ+11*, AA+1* | 
| LRNLT | LOCK+6~, NLT*, NLT+1, SUF+2 | 
| LRNP | LOCK+9~ | 
| LROA | LOCK+6~ | 
| LROAD | LOCK+6~, ACCES* | 
| LROAD1 | LOCK+6~, ACCES+1* | 
| LROAD2 | LOCK+6~, ACCES+2* | 
| LROL | LOCK+7~, ACCES+8*, ACCES+9, ACCES+10, ACCES+11 | 
| LRPKG | LOCK+7~, LK1+1*, LK1+2 | 
| >> LRPRO | PCEFILE+3, ACCES+5* | 
| LRREC | LOCK+7~ | 
| LRRRL | LOCK+7~, ACCES+4* | 
| LRRRL1 | LOCK+7~, ACCES+5* | 
| LRRRL2 | LOCK+9~, ACCES+10* | 
| LRRRL3 | LOCK+7~, ACCES+6* | 
| LRRRL4 | LOCK+7~, PCEFILE+1, ACCES+11* | 
| LRSN | LOCK+9~, ACCES+2* | 
| LRSPEC | LOCK+9~, ACCES+3* | 
| LRSTATUS | LOCK+9~, LK1+7*, ERR+1* | 
| LRSUF | LOCK+7~, SUF*, SUF+1*, SUF+2, SUF+3, SUF+4* | 
| LRTEC | LOCK+7~, PCEFILE+3, TEC*, TEC+1 | 
| LRTS | LOCK+7~, TS!*, TS+1*, TS+2, TS+3*, TS+4*, TS+5*, AA+13, URG | 
| LRTSQA | LOCK+10~ | 
| LRTST | LOCK+8~, PCEFILE+3, TS!, TS+1*, TS+3*, TS+4*, TS+5* | 
| LRTSTD | LOCK+10~, TST+3*, TST+4, TS+5 | 
| LRTSTP | LOCK+8~, TS!, TS+1*, TS+3*, TS+4*, TS+5* | 
| >> LRTSTQA | TST+1*, TST+4, TST+5, TS+4 | 
| LRTSTU | LOCK+10~, TST+2*, TST+4, TST+5, TS+3 | 
| LRTYPE | LOCK+8~, TYPE*, TYPE+1, DFN+2, FILE, FILE+1, FILE+2, TS+3, TS+4, TS+5 , UNIT+1 | 
| LRUA | LOCK+9~ | 
| LRUG | LOCK+8~, AA+1*, URG* | 
| LRUID | LOCK+8~, UID*, UID+1, UID+2, UID+3, UID+4 | 
| LRUNIT | LOCK+8~, UNIT*, UNIT+1 | 
| LRVSITN | LOCK+9~ | 
| LRWA | LOCK+8~, BBDIQ+11*, AA+1* | 
| LRWKLAA | LOCK+8~, BBDIQ+11, LRDAA* | 
| LRZCNT | LOCK+8~ | 
| U | LRAA1+1, DPF+3 | 
| X | LOCK+8~ | 
| Y | LOCK+8~ | 
| >> ZTQUEUED | LOOP+3 | 
| >> ZTREQ | LOOP+3* |