LRJSML4 ;ALB/GTS - Lab Vista Hospital Location Pre-Patch Utilities;02/24/2010 14:01:37
Source file <LRJSML4.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 | 2 | LRJ SYS MAP HL AUDIT QUERY LRJSML1 |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EXTHL(LRES) | ;** Create HL output array
|
|
| SETARRY(LRES,LRNODE,LRHLIEN,LRNOW) | ;Set Location Array
|
|
| CDRNG | ;Protocol: LRJ SYS MAP HL AUDIT QUERY to select the report type
|
|
| INIT | ;* init variables and list array
|
|
| CREATRPT(LRFROM,LRTO,LRHLARY) | ;Create array of HL changes between selected dates
|
|
| DATEENT(LRPRMPT,LRBD,LRED) | ;Prompt for extract date
|
|
| CLEAR(LRFROM,LRTO,LRHLARY) | ;* clean up entries
|
|
| REFRESH(LRFROM,LRTO,LRHLARY) | ;* refresh display
|
|
| BUILD(LRFROM,LRTO,LRHLARY) | ; -- build display array
|
|
| KILL | ; -- kill off display data array
|
|
| TYPESEL() | ;Select type of report
|
|
| PROHELP | ;Help with type of report prompt
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | DATEENT+18, DATEENT+24 |
| NOW^%DTC | EXTHL+49 |
| $$GET1^DIQ | EXTHL+55, EXTHL+59, EXTHL+60, SETARRY+13, SETARRY+14, SETARRY+15, SETARRY+16, SETARRY+17, SETARRY+18 |
| ^DIR | TYPESEL+15 |
| HDR^LRJSML | INIT+12, CREATRPT+10 |
| LISTHL^LRJSML | BUILD+19 |
| MSG^LRJSML | CDRNG+9, INIT+13, CREATRPT+11, REFRESH+2 |
| INIT^LRJSML1 | CDRNG+8 |
| BLDREC^LRJSMLA | CREATRPT+14 |
| ADD^LRJSMLU | BUILD+14 |
| HANGCHAR^LRJSMLU | EXTHL+53 |
| FULL^VALM1 | CDRNG+1 |
| CNTRL^VALM10 | BUILD+15 |
| KILL^VALM10 | BUILD+11 |
| IOXY^XGF | EXTHL+45, INIT+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^SC - [#44] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(405.4 - [#405.4] | SETARRY+21, SETARRY+23 |
| ^SC - [#44] | EXTHL+52, SETARRY+19 |
| ^TMP("LRJ SYS MAP HL INIT MGR" | KILL+1! |
| ^TMP("LRJ SYS USER MANAGER - DATES" | INIT+2!, BUILD+18* |
| ^TMP("LRJ SYS USER MANAGER - INIT" | INIT+3!, CREATRPT+9* |
| ^TMP($J | INIT+2! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EXTHL+50, EXTHL+51! |
| %DT | DATEENT+17*, DATEENT+28! |
| %DT("A" | DATEENT+15* |
| %DT("B" | DATEENT+16*, DATEENT+23* |
| %DT(0 | DATEENT+13*, DATEENT+14* |
| %H | EXTHL+51! |
| %I | EXTHL+51! |
| DIR | CREATRPT+1~, TYPESEL+8~, TYPESEL+19! |
| DIR("?" | TYPESEL+11* |
| DIR("A" | TYPESEL+9* |
| DIR("L" | TYPESEL+12*, TYPESEL+13*, TYPESEL+14* |
| DIR(0 | TYPESEL+10* |
| DIRUT | TYPESEL+19! |
| DTOUT | DATEENT+25, DATEENT+26, TYPESEL+17, TYPESEL+19! |
| DUOUT | TYPESEL+17, TYPESEL+19! |
| >> IOINORM | BUILD+15 |
| IOSL | EXTHL+45, INIT+4 |
| >> IOUOFF | BUILD+15 |
| >> IOUON | BUILD+15 |
| LRBD | DATEENT~, DATEENT+25, DATEENT+26 |
| LRBED | SETARRY+10~, SETARRY+29*, SETARRY+30 |
| LRCHAR | EXTHL+32~, EXTHL+48*, EXTHL+53 |
| LRDIV | SETARRY+10~, SETARRY+11*, SETARRY+18*, SETARRY+20, SETARRY+26, SETARRY+30 |
| LRDT | DATEENT+11~, DATEENT+27*, DATEENT+29 |
| LRED | DATEENT~, DATEENT+13, DATEENT+14 |
| LRES | EXTHL~, EXTHL+61, EXTHL+63, EXTHL+64, EXTHL+65, SETARRY~, SETARRY+20, SETARRY+26, SETARRY+30 |
| LRFROM | INIT+1~, INIT+6, INIT+7, INIT+10, INIT+11, CREATRPT~, CREATRPT+5*, CREATRPT+6, CREATRPT+7, CREATRPT+14 , CLEAR~, CLEAR+1, REFRESH~, REFRESH+1, BUILD~, BUILD+13, BUILD+18, BUILD+19 |
| LRGOOD | DATEENT+11~, DATEENT+12*, DATEENT+22, DATEENT+26* |
| LRHLARY | CREATRPT~, CREATRPT+14, CLEAR~, CLEAR+1, REFRESH~, REFRESH+1, BUILD~, BUILD+7, BUILD+19 |
| LRHLIEN | EXTHL+31~, EXTHL+47*, EXTHL+48*, EXTHL+52*, EXTHL+55, EXTHL+59, EXTHL+60, EXTHL+61, EXTHL+63, EXTHL+64 , EXTHL+65, SETARRY~, SETARRY+13, SETARRY+14, SETARRY+15, SETARRY+16, SETARRY+17, SETARRY+18, SETARRY+19, SETARRY+20 , SETARRY+26, SETARRY+30 |
| LRHLNAME | SETARRY+10~, SETARRY+11*, SETARRY+16*, SETARRY+20, SETARRY+26, SETARRY+30 |
| LRHLTYPE | SETARRY+10~, SETARRY+11*, SETARRY+15*, SETARRY+20, SETARRY+26, SETARRY+30 |
| LRINACT | SETARRY+10~, SETARRY+11*, SETARRY+13*, SETARRY+20 |
| LRINACTI | EXTHL+31~, EXTHL+54*, EXTHL+59*, EXTHL+61, EXTHL+62, EXTHL+64, EXTHL+65 |
| LRINST | SETARRY+10~, SETARRY+11*, SETARRY+17*, SETARRY+20, SETARRY+26, SETARRY+30 |
| LRJERRCT | BUILD+9~ |
| LRJRSLT | TYPESEL+6~, TYPESEL+7*, TYPESEL+16*, TYPESEL+17*, TYPESEL+18*, TYPESEL+20 |
| LRLP | EXTHL+32~ |
| LRNODE | EXTHL+31~, EXTHL+48*, EXTHL+61, EXTHL+63, EXTHL+64, EXTHL+65, SETARRY~, SETARRY+12*, SETARRY+20, SETARRY+22* , SETARRY+26, SETARRY+28*, SETARRY+30 |
| LRNOW | EXTHL+31~, EXTHL+50*, EXTHL+61, EXTHL+63, EXTHL+64, EXTHL+65, SETARRY~, SETARRY+20 |
| LRPRMPT | DATEENT~, DATEENT+15, DATEENT+18, DATEENT+21 |
| LRREACT | SETARRY+10~, SETARRY+11*, SETARRY+14*, SETARRY+20 |
| LRREACTI | EXTHL+31~, EXTHL+54*, EXTHL+60*, EXTHL+63, EXTHL+64, EXTHL+65 |
| LRRMBD | SETARRY+10~, SETARRY+11*, SETARRY+23*, SETARRY+24, SETARRY+29 |
| LRRMBDPT | SETARRY+10~, SETARRY+11*, SETARRY+21*, SETARRY+23 |
| LRRMOLD | SETARRY+10~, SETARRY+11*, SETARRY+25, SETARRY+27* |
| LRROOM | SETARRY+10~, SETARRY+24*, SETARRY+25, SETARRY+26, SETARRY+27, SETARRY+30 |
| LRSTATUS | BUILD+9~ |
| LRTO | INIT+1~, INIT+6, INIT+7, INIT+10, INIT+11, CREATRPT~, CREATRPT+7*, CREATRPT+8, CREATRPT+14, CLEAR~ , CLEAR+1, REFRESH~, REFRESH+1, BUILD~, BUILD+13, BUILD+18, BUILD+19 |
| LRTYPE | CDRNG+2~, CDRNG+3*, CDRNG+6, CDRNG+7, CDRNG+8, CDRNG+9 |
| LRTYPEIN | EXTHL+31~, EXTHL+54*, EXTHL+55*, EXTHL+58 |
| LRWPTR | SETARRY+10~, SETARRY+11*, SETARRY+19*, SETARRY+21 |
| LRX | BUILD+9~, BUILD+13*, BUILD+14, BUILD+15 |
| >> VALMBCK | CDRNG+9*, INIT+8*, REFRESH+3* |
| >> VALMBG | INIT+9*, REFRESH+4* |
| >> VALMCNT | BUILD+12*, BUILD+14, BUILD+15 |
| X | EXTHL+51!, DATEENT+25, DATEENT+26, TYPESEL+19! |
| Y | DATEENT+25, DATEENT+26, DATEENT+27, DATEENT+28!, TYPESEL+16, TYPESEL+17, TYPESEL+18, TYPESEL+19! |
