©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
LROSPLG ; IHS/DIR/FJE - B'HAM ISC/ADM - MOVE SP DATA FROM SURGICAL RECORD 08:54 ; [ 4/12/94 ]
Source file <LROSPLG.m>
| Package | Total | Call Graph |
|---|---|---|
| Surgery | 2 | ^SROSPLG1 ^SROSPLG2 |
| VA Fileman | 2 | (C,NOW)^%DTC ^DIR |
| IHS Changes To Lab | 1 | $$ISPIMS^BLRUTIL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OPT | ||
| DISP | ||
| END | ||
| DOC | ||
| LIST | ; list cases
|
|
| CASE | ||
| OTHER | ; other operations
|
|
| NOOP | ||
| LOOP | ; break procedures
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LR - [#63] | LROSPLG+3, LROSPLG+6 |
| ^SRF - [#130] | DOC, DISP, LIST+1, LIST+2, LIST+3, LIST+4, LIST+5, CASE+1, OTHER+1, OTHER+2 |
| ^SRF("ADT" | LROSPLG+10 |
| Name | Line Occurrences |
|---|---|
| @( | LROSPLG+6 |
| DOC | LROSPLG+13 |
| END | LROSPLG+3, LROSPLG+11, NOOP |
| LIST | LROSPLG+10 |
| LOOP | CASE+2 |
| NOOP | LROSPLG+12 |
| OTHER | CASE+1 |
| Name | Field # of Occurrence |
|---|---|
| ^("NON" | DOC |
| ^(30 | LIST+2 |
| ^(31 | LIST+3 |
| ^(37 | LIST+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | LROSPLG+8, END! |
| CNT | LROSPLG+10*, LROSPLG+11, LROSPLG+12, LROSPLG+13, OPT+1, OPT+3*, END!, LIST+5*, CASE+4 |
| >> DFN | LROSPLG+6*, LROSPLG+10 |
| DIR | LROSPLG+12!, OPT!, END! |
| DIR("?" | OPT* |
| DIR("A" | LROSPLG+12*, OPT+1* |
| DIR(0 | LROSPLG+12*, OPT+1* |
| DR | END! |
| DT | LROSPLG+8 |
| >> DTOUT | LROSPLG+12, OPT+2 |
| >> DUOUT | LROSPLG+12, OPT+2 |
| I | END!, CASE+1* |
| J | END! |
| K | END! |
| LOOP | END!, LOOP+1* |
| >> LRDFN | LROSPLG+3, LROSPLG+6 |
| M | END!, CASE+2*, LOOP+1 |
| MM | END!, CASE+2!, LOOP+1* |
| MMM | END!, CASE+2!, LOOP+1* |
| >> PNM | LROSPLG+6* |
| SR | END! |
| SRABORT | END! |
| SRCASE | END! |
| SRCASE( | OPT+3, CASE+4* |
| SRCASE(1 | LROSPLG+13 |
| SRD | END! |
| SRDOC | DOC*, END! |
| SRDT | LROSPLG+8*, LROSPLG+10*, END!, CASE+4 |
| SREND | LROSPLG+8*, LROSPLG+10, END! |
| SRJ | END! |
| SRK | END! |
| SRLONG | END!, OTHER+1*, OTHER+2 |
| SRN | END! |
| SROP | LROSPLG+10*, DISP*, END!, LIST+1, LIST+2, LIST+3, LIST+4, LIST+5, CASE+1, CASE+2 , CASE+4, OTHER+1, OTHER+2 |
| SROPER | END!, CASE+1*, CASE+2*, OTHER+1, OTHER+3*, LOOP+1* |
| SROPERS | END!, OTHER+1*, OTHER+2*, OTHER+3 |
| SROPS | END!, CASE+2! |
| SROPS( | LOOP+1* |
| SROPS(1 | CASE+2*, CASE+3 |
| SROPS(2 | CASE+3 |
| SROPS(3 | CASE+3 |
| SROPS(4 | CASE+3 |
| SROTHER | END!, CASE+1*, OTHER+1*, OTHER+2 |
| SRSCAN | END!, LIST+1*!, LIST+2, LIST+3 |
| SRSDATE | DISP*, END!, LIST+5*, CASE |
| SRSTAT | END! |
| SRSTATUS | END! |
| SRTN | LROSPLG+10, LROSPLG+13*, OPT+3*, NOOP, DOC, DISP, END! |
| >> SSN | LROSPLG+6* |
| VA | END! |
| VA("PID" | LROSPLG+6 |
| VADM | END! |
| VADM(1 | LROSPLG+6 |
| VAERR | END! |
| X | LROSPLG+8, END! |
| >> X1 | LROSPLG+8* |
| >> X2 | LROSPLG+8* |
| >> Y | LROSPLG+12, LROSPLG+13, OPT+3 |