©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
SROSPLG ;B'HAM ISC/ADM - MOVE SP DATA FROM SURGICAL RECORD ;4/12/94 08:54
Source file <SROSPLG.m>
| Package | Total | Call Graph |
|---|---|---|
| Surgery | 2 | ^SROSPLG1 ^SROSPLG2 |
| VA Fileman | 2 | (C,NOW)^%DTC ^DIR |
| Registration | 1 | DEM^VADPT |
| 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] | SROSPLG+2, SROSPLG+3 |
| ^SRF - [#130] | DOC, DISP, LIST+1, LIST+2, LIST+3, LIST+4, LIST+5, CASE+1, OTHER+1, OTHER+2 |
| ^SRF("ADT" | SROSPLG+6 |
| Name | Line Occurrences |
|---|---|
| DOC | SROSPLG+9 |
| END | SROSPLG+2, SROSPLG+7, NOOP |
| LIST | SROSPLG+6 |
| LOOP | CASE+2 |
| NOOP | SROSPLG+8 |
| 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 |
|---|---|
| % | SROSPLG+4, END! |
| CNT | SROSPLG+6*, SROSPLG+7, SROSPLG+8, SROSPLG+9, OPT+1, OPT+3*, END!, LIST+5*, CASE+4 |
| >> DFN | SROSPLG+3*, SROSPLG+6 |
| DIR | SROSPLG+8!, OPT!, END! |
| DIR("?" | OPT* |
| DIR("A" | SROSPLG+8*, OPT+1* |
| DIR(0 | SROSPLG+8*, OPT+1* |
| DR | END! |
| DT | SROSPLG+4 |
| >> DTOUT | SROSPLG+8, OPT+2 |
| >> DUOUT | SROSPLG+8, OPT+2 |
| I | END!, CASE+1* |
| J | END! |
| K | END! |
| LOOP | END!, LOOP+1* |
| >> LRDFN | SROSPLG+2, SROSPLG+3 |
| M | END!, CASE+2*, LOOP+1 |
| MM | END!, CASE+2!, LOOP+1* |
| MMM | END!, CASE+2!, LOOP+1* |
| >> PNM | SROSPLG+3* |
| SR | END! |
| SRABORT | END! |
| SRCASE | END! |
| SRCASE( | OPT+3, CASE+4* |
| SRCASE(1 | SROSPLG+9 |
| SRD | END! |
| SRDOC | DOC*, END! |
| SRDT | SROSPLG+4*, SROSPLG+6*, END!, CASE+4 |
| SREND | SROSPLG+4*, SROSPLG+6, END! |
| SRJ | END! |
| SRK | END! |
| SRLONG | END!, OTHER+1*, OTHER+2 |
| SRN | END! |
| SROP | SROSPLG+6*, 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 | SROSPLG+6, SROSPLG+9*, OPT+3*, NOOP, DOC, DISP, END! |
| >> SSN | SROSPLG+3* |
| VA | END! |
| VA("PID" | SROSPLG+3 |
| VADM | END! |
| VADM(1 | SROSPLG+3 |
| VAERR | END! |
| X | SROSPLG+4, END! |
| >> X1 | SROSPLG+4* |
| >> X2 | SROSPLG+4* |
| >> Y | SROSPLG+8, SROSPLG+9, OPT+3 |