©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
DIFG5 ;SFISC/DG(OHPRD)-MISC FUNCTIONS ;3/11/93 1:25 PM
Source file <DIFG5.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | ERROR^DIFG RCR^DIFG3 ^DIFG4 ^DIK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DOLO | ;called from ^DIFG3
|
|
| EOJ | ;
|
|
| LINK | ;FINDS @NUMBER TO LINK DFN TO FROM LOOKUP
|
|
| KEY | ;DETERMINE @LINK VALUE FROM KEY
|
|
| CHECKY | ;CHECKS Y AFTER DIC CALL
|
|
| X | ||
| ARRAY | ;SETS EXECUTABLE ARRAY FOR DIC("S")
|
|
| X1 | ||
| IDENSPEC | ;called from ^DIFG3
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC - [#1] | KEY+1, DOLO+2 |
| ^UTILITY("DIFG" | CHECKY+1, EOJ+7! |
| ^UTILITY("DIFG@" | KEY+4*, LINK+1, EOJ+7! |
| ^UTILITY("DIFGX" | KEY+4*, EOJ+7! |
| Name | Line Occurrences |
|---|---|
| ARRAY | IDENSPEC+5 |
| X | IDENSPEC+3 |
| X1 | CHECKY+2, CHECKY+4, CHECKY+5, CHECKY+6, CHECKY+7, CHECKY+8 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DOLO+3 |
| ^("MODE" | CHECKY+1* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | IDENSPEC+1*!, DOLO+1~, DOLO+3* |
| %A | DOLO+1~, DOLO+2*, DOLO+3 |
| DA | EOJ+5*! |
| >> DIC | KEY+1, ARRAY+1, ARRAY+2, IDENSPEC+1, IDENSPEC+5, DOLO+2 |
| >> DIC("S" | DOLO+3 |
| DIFG | KEY+4, LINK+1, IDENSPEC+2, IDENSPEC+4, EOJ+6! |
| DIFG("ACGRV" | CHECKY+4 |
| DIFG("FOUND" | DOLO+3*, DOLO+4 |
| DIFG("KEY" | KEY+1*, KEY+2 |
| DIFGALNK | KEY+4*, EOJ+6! |
| DIFGBSE | EOJ+2*, EOJ+6! |
| DIFGCHEK | CHECKY+3*, CHECKY+4, CHECKY+5, CHECKY+6, CHECKY+7, CHECKY+8, X1! |
| DIFGCHKG | EOJ+6! |
| DIFGCT | ARRAY+2, IDENSPEC+1, IDENSPEC+3, EOJ+6! |
| >> DIFGDIC | CHECKY+1 |
| >> DIFGDIC( | ARRAY+1, ARRAY+2*, IDENSPEC+5 |
| DIFGDINM | EOJ+6! |
| DIFGDIX | KEY+1, LINK+1, IDENSPEC+2, IDENSPEC+3, EOJ+6! |
| DIFGDOL | EOJ+6! |
| >> DIFGEL | EOJ+1* |
| DIFGEND | EOJ+6! |
| DIFGENV | EOJ+6! |
| DIFGENV("LAYGO" | IDENSPEC+1 |
| DIFGER | CHECKY+8*, KEY+3*, KEY+4, IDENSPEC+3, EOJ+2, EOJ+4!, EOJ+5 |
| DIFGEROR | EOJ+5, EOJ+6! |
| DIFGEXC | EOJ+6! |
| >> DIFGFLUS | LINK+1* |
| >> DIFGHAT | IDENSPEC+1 |
| DIFGI | ARRAY+1*, ARRAY+2, EOJ+6! |
| >> DIFGINCR | CHECKY+1 |
| DIFGKEY | EOJ+6! |
| DIFGL | EOJ+6! |
| DIFGLAGO | IDENSPEC+1~* |
| DIFGLC | EOJ+6! |
| DIFGLINE | IDENSPEC+2, EOJ+6! |
| DIFGLO | EOJ+6! |
| >> DIFGMGBL( | DOLO+2 |
| DIFGMLND | EOJ+6! |
| >> DIFGMO( | CHECKY+1, CHECKY+4, CHECKY+5, CHECKY+7, CHECKY+8 |
| DIFGMULT | CHECKY+1, CHECKY+4, CHECKY+5, CHECKY+7, CHECKY+8, DOLO+2, EOJ+6! |
| >> DIFGNOLK | IDENSPEC+4*, IDENSPEC+5 |
| DIFGNUMF | EOJ+6! |
| DIFGNUMF( | IDENSPEC+1 |
| DIFGO | EOJ+6! |
| DIFGPC | EOJ+6! |
| DIFGPTER | EOJ+6! |
| DIFGREI | EOJ+5, EOJ+6! |
| >> DIFGSAVE( | KEY+4, LINK+1*, IDENSPEC+2*, IDENSPEC+4 |
| DIFGSAVX | EOJ+6! |
| >> DIFGSKIP( | CHECKY+4*, CHECKY+5* |
| >> DIFGSVVL( | ARRAY+2*, IDENSPEC+3* |
| >> DIFGTYP | CHECKY+1, CHECKY+3, CHECKY+4, CHECKY+5 |
| DIFGVAL | EOJ+6! |
| >> DIFGY | CHECKY+8, KEY+3, EOJ+1, EOJ+3* |
| DIK | EOJ+5*! |
| U | CHECKY+1, CHECKY+4, CHECKY+5, CHECKY+7, CHECKY+8, KEY+1, KEY+3, EOJ+2 |
| >> X | CHECKY+4*, KEY+4, IDENSPEC+2*, IDENSPEC+4*, DOLO+3 |
| >> Y | CHECKY+1, CHECKY+2, KEY+2*, KEY+3*, KEY+4, ARRAY+2, IDENSPEC+4, DOLO+3*, DOLO+4* |