SROXR1 ;B'HAM ISC/MAM - CROSS REFERENCES (CONT) ;10/05/04
Source file <SROXR1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ATT | ; ATT x-ref on surgeon to update attend surg
|
|
| KATT | ; kill logic for ATT x-ref
|
|
| ATTP | ; ATTP x-ref on provider to update attend provider
|
|
| KATTP | ; kill logic for ATTP x-ref
|
|
| AR | ; 'AR' x-ref on the 'DATE OF OPERATION'
; field in the SURGERY file (130) |
|
| KAR | ; 'KILL' logic of the 'AR' x-ref on the 'DATE OF
; OPERATION' field in the SURGERY file (130) |
|
| SP | ; set 'ASP' and 'AOR' x-refs when date is changed
|
|
| OR | ||
| KSP | ; kill 'ASP' and 'AOR' x-refs when date is changed
|
|
| KOR | ||
| IV | ; delete IV orders
|
|
| OUT | ||
| IV1 | ||
| DCOR | ; entry for tasked job to cancel IVs
|
|
| END | ||
| STAFF | ; update STAFF/RESIDENT field
|
|
| KSTAFF | ; update STAFF/RESIDENT when deleted
|
|
| ANES | ; update ANESTHETIST CATEGORY field
|
|
| KANES | ; update ANESTHETIST CATEGORY when deleted
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | IV1+2 |
| ^SRF - [#130] | AR+2, AR+3, AR+4, KAR+2, SP+1, OR, KSP+1, KOR, IV+4, IV1 , STAFF+2*, KSTAFF+1*, ANES+4*, KANES+1* |
| ^SRF("AOR" | OR*, KOR! |
| ^SRF("AR" | AR+4*, KAR+2! |
| ^SRF("ASP" | SP+1*, KSP+1! |
| ^SRO(133 - [#133] | ATT+2, ATTP+2, ANES+1 |
| ^VA(200 - [#200] | ANES+3 |
| ^XUSEC("SR ANESTHESIOLOGIST" | ANES+2 |
| ^XUSEC("SR NURSE ANESTHETIST" | ANES+2 |
| ^XUSEC("SR STAFF SURGEON" | STAFF+1 |
| ^XUSEC("SR SURGEON" | ANES+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | IV+1 |
| >> DA | ATT+1, ATT+3, ATTP+1, ATTP+3, AR+2, AR+3, AR+4, KAR+2, SP+1, OR , KSP+1, KOR, STAFF+2, KSTAFF+1, ANES+4, KANES+1 |
| DFN | AR+4*, KAR+2*, KOR*, IV1+3, END! |
| DIR | IV1! |
| DIR("?" | IV1* |
| DIR("A" | IV1+1* |
| DIR("B" | IV1* |
| DIR(0 | IV1+1* |
| DT | AR+4 |
| >> DTOUT | IV1+1 |
| >> DUOUT | IV1+1 |
| I | END! |
| S | END! |
| SRACAT | ANES+1~, ANES+2*, ANES+3*, ANES+4! |
| SRAML | ANES+1~*, ANES+3, ANES+4! |
| SRASITE | ANES+1~*, ANES+4! |
| SRDIV | ATT+1~*, ATT+2, ATTP+1~*, ATTP+2 |
| SREQ | ATT+1~, ATTP+1~ |
| SREQ(130 | ATT+3*, ATTP+3* |
| SRSC1 | END! |
| SRSDAT | END! |
| SRSOR | END! |
| SRT | OUT! |
| SRT("X" | IV+1*, OUT |
| >> SRTN | IV+4, IV1 |
| >> STAFF | STAFF+1*, STAFF+2 |
| X | ATT+3, ATTP+3, AR+4, KAR+2, SP+1, OR, KSP+1, KOR, IV+1*, IV+2 , IV+3, OUT*, IV1+2*, IV1+3~, STAFF+1, ANES+2, ANES+3 |
| X1 | IV+1*, OUT! |
| Y | OUT!, IV1+1, IV1+3~ |
| >> ZTDESC | IV1+3* |
| >> ZTDTH | IV1+3* |
| >> ZTIO | IV1+3* |
| >> ZTREQ | DCOR+1* |
| >> ZTRTN | IV1+3* |
| >> ZTSAVE("DFN" | IV1+3* |
| >> ZTSAVE("PSIVRES" | IV1+3* |
