LRVRARU ;DALOI/STAFF - AUTO RELEASE UTILITY PROGRAM ;04/05/16 11:02
Source file <LRVRARU.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INIT | ; Initialize user/environment
|
|
| WKLD(LRP) | ; Setup LRCDEF* variables for workload
; Call with LRP = ien of WKLD suffix in file #64.2 |
|
| WKLDC(LRLL,LRAA) | ; Setup LRCAP*, LRCS*, LRSUF* variables for workload
; Call with LRLL = ien of load/workk list in file #62.8 ; LRAA = ien of accession area in file #68 |
|
| SPALERT | ; Send Processing Alert Message
|
|
| SENDACK | ; Send HL7 ACKnowledgment message
|
|
| CLEAN | ;Clean-up point
|
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | INIT+25, INIT+33 |
| $$GET1^DIQ | INIT+64, INIT+84 |
| XQA^LA7UXQA | SPALERT+9 |
| ACK^LA7VHLU8 | SENDACK+21 |
| BLDERR^LA7VHLU8 | SENDACK+19 |
| EN1^LRCAPV | WKLDC+16 |
| EXPLODE^LRGP2 | INIT+77 |
| EN^LRPARAM | INIT+42 |
| KVAR^VADPT | INIT+22, CLEAN+7 |
| $$HADD^XLFDT | INIT+10 |
| $$HTE^XLFDT | INIT+11, SPALERT+5 |
| DUZ^XUP | INIT+29 |
| DIVSET^XUSRB2 | INIT+62 |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | FIND1^DIC |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^LAB(69.9 - [#69.9] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(64.2 - [#64.2] | WKLD+5 |
| ^LAB(69.9 - [#69.9] | INIT+9 |
| ^LAHM(62.48 - [#62.48] | SPALERT+7 |
| ^LRO(68 - [#68] | INIT+55, INIT+66, WKLDC+13 |
| ^LRO(68.2 - [#68.2] | INIT+14, INIT+18, INIT+48, INIT+53, INIT+69 |
| ^TMP("LR" | INIT+76!, INIT+78 |
| Name | Line Occurrences |
|---|---|
| WKLD | INIT+70 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGE | CLEAN+8! |
| COMB | CLEAN+8! |
| CONTROL | CLEAN+8! |
| DFN | CLEAN+8! |
| >> DIQUIET | INIT+19* |
| DOB | CLEAN+8! |
| DTS | CLEAN+8! |
| DUZ(2 | INIT+60 |
| H8 | CLEAN+8! |
| I | INIT+6~ |
| I5 | CLEAN+8! |
| LA | SENDACK+4~, SENDACK+19, SENDACK+21 |
| LA( | SENDACK+10* |
| LA("ACK" | SENDACK+11* |
| LA("ID" | SENDACK+12*, SENDACK+13*, SENDACK+14* |
| LA("MSG" | SENDACK+15*, SENDACK+16* |
| >> LA7624 | SENDACK+10 |
| >> LA76248 | SENDACK+10 |
| >> LA76249 | SENDACK+10 |
| >> LA7AAT(1 | SENDACK+6, SENDACK+7, SENDACK+8 |
| LAMSG | INIT+11*, INIT+16*, INIT+19*, INIT+28*, INIT+36*, INIT+43*, INIT+51*, INIT+55*, INIT+64*, INIT+73* , INIT+80*, SPALERT+4~, SPALERT+8*, SPALERT+9 |
| LR0070 | INIT+6~ |
| LR60 | INIT+6~ |
| LR61 | INIT+6~ |
| LR62 | INIT+6~ |
| LR64 | INIT+6~ |
| LRAA | INIT+54*, INIT+55, INIT+66, WKLDC~, WKLDC+12, WKLDC+13 |
| LRACC | CLEAN+9! |
| LRACD | CLEAN+9! |
| LRAD | CLEAN+9! |
| >> LRALERT | INIT+86* |
| LRAN | CLEAN+9! |
| >> LRANYAA | INIT+56* |
| LRAOD | CLEAN+9! |
| LRASSN | CLEAN+10! |
| >> LRAUTORELEASE | INIT+19* |
| >> LRAUTOVERIFY | INIT+19* |
| LRBLBP | CLEAN+16! |
| LRCAPLOC | CLEAN+10! |
| LRCAPMS | WKLDC+9! |
| LRCAPWA | WKLDC+9! |
| LRCDEF | INIT+71, WKLD+6*, CLEAN+10! |
| LRCDEF0 | WKLD+5*, WKLD+6, CLEAN+10! |
| LRCDEF0(1 | WKLD+5* |
| LRCDEF0X | CLEAN+10! |
| LRCDT | CLEAN+10! |
| >> LRCNT | INIT+19* |
| LRCODEN | CLEAN+10! |
| LRCOM | CLEAN+10! |
| LRCSQ | WKLDC+9! |
| LRCSQQ | WKLDC+9!, WKLDC+19* |
| LRDATA | CLEAN+11! |
| >> LRDELTACHKOK | INIT+19* |
| >> LRDFWKLD | INIT+69*, INIT+70 |
| LRDUZ | INIT+21! |
| LRDUZ("AR" | INIT+30* |
| LRDUZ("AV" | INIT+37* |
| LRDUZ("USER" | INIT+40* |
| LRDUZ(2 | INIT+59*, INIT+60, INIT+62, INIT+64 |
| LREND | INIT+12*, INIT+15*, INIT+19*, INIT+27*, INIT+35*, INIT+43, INIT+50*, INIT+55*, INIT+60, INIT+64* , INIT+72*, INIT+79*, WKLDC+6~ |
| LRERR | INIT+21!, INIT+82!, INIT+83*, SENDACK+7, SENDACK+8, SENDACK+11, SENDACK+15, SENDACK+19, CLEAN+11! |
| LRIDT | CLEAN+16! |
| LRIEN | INIT+21!, INIT+82! |
| LRIN | CLEAN+16! |
| LRIX | CLEAN+16! |
| >> LRLABKY | INIT+45* |
| >> LRLD | INIT+67* |
| LRLL | INIT+14, INIT+16, INIT+18, INIT+48, INIT+53, INIT+69, WKLDC~, WKLDC+16 |
| LRLL(0 | INIT+18*, INIT+43, INIT+51, INIT+55, INIT+73, INIT+80, SPALERT+8 |
| LRM | CLEAN+16! |
| LRNLT | INIT+6~, CLEAN+16! |
| LRNOCODE | CLEAN+11! |
| >> LRNOECHO | INIT+19* |
| LRNOW | CLEAN+16! |
| LRNT | CLEAN+16! |
| LRNX | CLEAN+16! |
| LRODT | CLEAN+16! |
| LRODTIM | CLEAN+17! |
| LROLDIV | CLEAN+11! |
| LROLLOC | CLEAN+17! |
| LRORD | CLEAN+17! |
| LRORDNLT | INIT+21! |
| LRORU3 | CLEAN+17! |
| LROT | CLEAN+17! |
| >> LROUTINE | INIT+84*, INIT+85*, INIT+86 |
| LRP | WKLD~, WKLD+5 |
| >> LRPARAM | INIT+44*, WKLDC+12 |
| LRPRAC | CLEAN+12! |
| >> LRPROF | INIT+48*, INIT+49, INIT+53 |
| >> LRPROF(0 | INIT+53*, INIT+54, INIT+56, INIT+59, INIT+64, INIT+80 |
| >> LRQUIET | INIT+19* |
| LRRB | CLEAN+12! |
| LRSB | CLEAN+13! |
| LRSN | CLEAN+13! |
| LRSSCX | CLEAN+13! |
| LRSSN | CLEAN+13! |
| LRST | CLEAN+13! |
| >> LRSTORE | INIT+19* |
| >> LRSTORE( | SPALERT+6, SPALERT+8 |
| LRSUB | CLEAN+13! |
| LRSUF0 | WKLDC+9! |
| LRSUM | CLEAN+13! |
| LRSXN | CLEAN+13!, CLEAN+14! |
| LRT | CLEAN+14! |
| LRTIME | SPALERT+4~, SPALERT+5*, SPALERT+8 |
| LRTN | CLEAN+14! |
| LRTREA | CLEAN+14! |
| LRTS | CLEAN+14! |
| LRTSORU | CLEAN+14! |
| LRTST | CLEAN+14! |
| LRTT | CLEAN+14! |
| LRUID | SENDACK+12, CLEAN+14! |
| LRUNQ | CLEAN+15! |
| LRUSUFO | WKLDC+9! |
| >> LRVBY | INIT+88* |
| LRWRD | CLEAN+15! |
| LRX | INIT+6~, INIT+25*, INIT+26, INIT+29, INIT+30, INIT+33*, INIT+34, INIT+37, INIT+66*, INIT+67 , SPALERT+4~, SPALERT+5*, SPALERT+6*, SPALERT+7, SPALERT+8, SPALERT+9 |
| LRY | INIT+6~, INIT+61*, INIT+62, INIT+63 |
| OCXAP | CLEAN+17! |
| PNM | SENDACK+13, CLEAN+15! |
| S5 | CLEAN+15! |
| SEGID | CLEAN+15! |
| SEX | CLEAN+15! |
| SSN | SENDACK+14, CLEAN+15! |
| T1 | CLEAN+18! |
| U | INIT+44, INIT+54, INIT+55, INIT+64, INIT+67, INIT+80, WKLDC+12, WKLDC+13 |
| VA | CLEAN+18! |
| VADMVT | CLEAN+18! |
| >> VAERR | INIT+83* |
| VAINDT | CLEAN+18! |
| VAL | CLEAN+18! |
| XP | CLEAN+18! |
| Y | WKLDC+6~, WKLDC+16* |
| Z | CLEAN+18! |
| >> ZTREQ | INIT+10* |