©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
DIFG ;SFISC/DG(OHPRD)-FILEGRAM INSTALLER ;10/9/95 05:50
Source file <DIFG.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| A | ||
| FILEGRAM | ||
| EVAL | ||
| GETTYPE | ||
| KILLVAR | ||
| ERROR | ||
| START | ||
| INIT | ||
| FILE | ||
| EVALFLD | ||
| X3 | ||
| X1 | ||
| X6 | ||
| X4 | ||
| X5 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | EVALFLD+1, EVALFLD+2, EVALFLD+3, EVALFLD+4 |
| ^DIAR(1.13 - [#1.13] | ERROR+2*, ERROR+3* |
| ^UTILITY("DIFG" | INIT+1! |
| ^UTILITY("DIFG@" | INIT+1! |
| ^UTILITY("DIFGFG" | INIT+1!, ERROR+2 |
| ^UTILITY("DIFGX" | INIT+1! |
| Name | Line Occurrences |
|---|---|
| A | A |
| ERROR | FILEGRAM+1, GETTYPE+1, EVALFLD+2 |
| EVAL | FILE |
| EVALFLD | GETTYPE+3 |
| FILE | A+2 |
| FILEGRAM | START |
| GETTYPE | EVAL |
| INIT | DIFG+9 |
| KILLVAR | DIFG+9, START |
| START | DIFG+9 |
| X1 | FILEGRAM+1, A+1 |
| X3 | EVAL+1, EVAL+2, EVAL+3, EVAL+4, EVAL+5, EVAL+6 |
| X4 | GETTYPE, GETTYPE+1, GETTYPE+2 |
| X5 | EVALFLD+2, EVALFLD+3 |
| X6 | ERROR+1 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | ERROR+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | ERROR+2*, X6! |
| B | ERROR+2*, ERROR+3, X6! |
| DA | ERROR~, ERROR+4*!, KILLVAR! |
| DIC | EVALFLD+1, EVALFLD+2, EVALFLD+3, EVALFLD+4, ERROR~, ERROR+1*, KILLVAR! |
| DIC("DR" | ERROR+1* |
| DIC(0 | ERROR+1* |
| DIE | ERROR~, ERROR+4*! |
| >> DIFG | START* |
| >> DIFG("PARAM" | FILEGRAM+2*, EVALFLD |
| >> DIFG("SAVE" | KILLVAR! |
| DIFGADD | START*, KILLVAR! |
| DIFGCHKG | DIFG+7*, DIFG+8! |
| >> DIFGCT | START* |
| DIFGDA | KILLVAR+1! |
| DIFGDI | KILLVAR! |
| DIFGDIC | KILLVAR+1! |
| DIFGDICS | KILLVAR! |
| >> DIFGDIX | FILEGRAM+1, FILEGRAM+2, A, GETTYPE, GETTYPE+1, GETTYPE+2, EVALFLD, EVALFLD+1 |
| >> DIFGEND | START*, GETTYPE+1* |
| >> DIFGER | DIFG+4*, DIFG+6*, DIFG+8*, START*, START+1, FILEGRAM+1*, A+1, FILE, EVAL+1, GETTYPE+1* , EVALFLD+2*, ERROR+1, ERROR+2*, ERROR+4 |
| >> DIFGEROR | ERROR+5* |
| >> DIFGEXC | INIT+3* |
| DIFGFILE | KILLVAR! |
| DIFGFIND | GETTYPE+2*, KILLVAR+1! |
| DIFGFIRP | KILLVAR+1! |
| DIFGFLDN | EVALFLD+4*, KILLVAR+1! |
| DIFGHAT | KILLVAR+1! |
| DIFGINCR | START*, KILLVAR! |
| >> DIFGL | FILE* |
| DIFGLAGO | KILLVAR! |
| DIFGLC | DIFG+3!, START, ERROR+2 |
| >> DIFGLINE | INIT+4*, FILEGRAM, FILEGRAM+3, A, FILE |
| DIFGLO | DIFG+3*, DIFG+4, DIFG+5, DIFG+6!, DIFG+7, DIFG+8!, INIT+4, ERROR+2 |
| >> DIFGLOG | ERROR+1*, ERROR+4 |
| DIFGM | KILLVAR! |
| DIFGMGBL | KILLVAR+1! |
| >> DIFGMLND | EVALFLD+4* |
| DIFGMO | KILLVAR! |
| >> DIFGMULT | START* |
| DIFGNDC | START*, KILLVAR! |
| DIFGNODE | KILLVAR+1! |
| DIFGNODL | START*, KILLVAR! |
| DIFGNUM | EVALFLD*, EVALFLD+1*, EVALFLD+2, EVALFLD+3, EVALFLD+4*, KILLVAR+1! |
| >> DIFGO | START* |
| DIFGREI | DIFG+3, DIFG+6!, DIFG+8! |
| DIFGSAVE | KILLVAR! |
| DIFGSECP | KILLVAR+1! |
| DIFGSKIP | KILLVAR! |
| DIFGSTRT | GETTYPE+2*, KILLVAR+1! |
| DIFGSVN | KILLVAR+1! |
| DIFGSVVL | KILLVAR+1! |
| DIFGTYPE | START*, FILE*, EVAL+2, EVAL+3, EVAL+4, EVAL+5, EVAL+6, EVAL+7, GETTYPE*, GETTYPE+1* , GETTYPE+2*, EVALFLD+3*, EVALFLD+4*, EVALFLD+5*, KILLVAR! |
| >> DIFGY | START*, FILEGRAM+1, GETTYPE+1, EVALFLD+2 |
| DO | ERROR~ |
| DR | ERROR+4*! |
| DT | ERROR+3 |
| U | INIT*, FILEGRAM+1, FILEGRAM+2, GETTYPE+1, GETTYPE+2, EVALFLD, EVALFLD+1, EVALFLD+2, EVALFLD+3, EVALFLD+4 , ERROR+1, ERROR+2, ERROR+4 |
| X | ERROR~, ERROR+1* |
| Y | ERROR~, ERROR+1, ERROR+2, ERROR+3 |