©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
DIT0 ;SFISC/GFT,XAK-PREPARE TO XFR ;8AUG2011
Source file <DIT0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| C | ||
| EN | ; PROGRAMMER CALL
; DIT("F") = GLOBAL ROOT OR FILE # OF FILE TO TRANSFER FROM ; DIT("T") = GLOBAL ROOT OR FILE # OF FILE TO TRANSFER TO ; DA("F") = ENTRY # IN FILE TO TRANSFER FROM ; DA("T") = ENTRY # IN FILE TO TRANSFER TO |
|
| DON | ||
| LK | ||
| Q | ||
| S | ||
| SET | ||
| GO | ||
| FIN | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | S+1 |
| ^DIC - [#1] | EN+10, EN+11 |
| ^UTILITY("DIT" | S+3* |
| Name | Line Occurrences |
|---|---|
| C | EN+9 |
| DON | SET |
| FIN | EN+6, EN+8, EN+9, EN+10, EN+11 |
| GO | DON |
| LK | DIT0+3, DIT0+4 |
| Q | DIT0+4, S |
| S | S |
| SET | C+1 |
| Name | Field # of Occurrence |
|---|---|
| ^("GL" | EN+10, EN+11 |
| ^(0 | S+1, EN+8, EN+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | S, S+1*, S+2*, GO+2 |
| >> D0 | S* |
| >> DA | S*, S+4, GO+1* |
| >> DA( | C+1 |
| >> DA("F" | EN+6, C |
| >> DA("T" | EN+6, C |
| >> DA(1 | C+1 |
| >> DB | C*, DON |
| >> DB1 | C*, DON |
| DDF | FIN+1! |
| DDF(1 | DIT0+3, EN+7*, EN+8*, EN+10 |
| DDT | FIN+1! |
| DDT(0 | EN+7*, EN+9*, EN+11 |
| >> DFL | LK |
| DFR | DIT0+4*, S+3, GO+1!, C*, FIN+1! |
| DFR(1 | S+4*, EN+8*, EN+10*, DON*, SET* |
| >> DH | S*, GO+1, GO+2*, DON* |
| DIC | DIT0+3~*, DIT0+4, S+3, S+4! |
| DIC("A" | LK* |
| DIC("S" | DIT0+4* |
| DIC(0 | DIT0+3*, DIT0+4* |
| >> DIK | S+4*, C* |
| >> DIT | DIT0+3*, S+1, GO+1*, GO+2 |
| >> DIT("F" | EN+6, EN+7, EN+8 |
| >> DIT("T" | EN+6, EN+7, EN+9 |
| DIT0KILL | DIT0+3~, S*, GO+1 |
| >> DKP | DON* |
| >> DMRG | DON* |
| DOT | DON! |
| DOT( | C+1*, SET |
| DRF | DON! |
| DRF( | C+1*, SET |
| DTO | S+4*, DON*, FIN+1! |
| DTO(1 | DIT0+4*, EN+9*, EN+11*, C, DON*, SET* |
| >> I | C+1*, SET* |
| >> L | DIT0+3 |
| U | EN+8, EN+9 |
| >> X | DIT0+3*, DIT0+4*, LK |
| Y | DIT0+3~, DIT0+4, S, S+3 |