©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
DIFROMSY ;SFIRMFO/DCM/TKW-MOVE KEY FILE ENTRIES ;12:32 PM 31 Oct 2001 [ 04/02/2003 8:25 AM ]
Source file <DIFROMSY.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DDKEYIN(DIFRFILE,DIFRF2,DIFRSA) | ;
; DIFRFILE=top level file# ; DIFRF2=current file/subfile# ; DIFRSA=global reference of transport global |
|
| IXPTR | ; export index pointer
|
|
| ERR1(DIER,DIFRF2,DIFRNAME) | ;
|
|
| DDKEYOUT(DIFRFILE,DIFRF2,DIFRTA) | ; retrieve KEY entries for file
; DIFRFILE=top level file number ; DIFRF2=current file/subfile number ; DIFRTA=Global reference of transport global |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | DDKEYIN+4, DDKEYIN+14 |
| ^DD("IX" - [#.11] | IXPTR+3, DDKEYIN+19 |
| ^DD("KEY" - [#.31] | DDKEYOUT+6, DDKEYOUT+7, DDKEYOUT+9, DDKEYOUT+10, DDKEYOUT+20, IXPTR+1, DDKEYIN+23, DDKEYIN+28* |
| Name | Line Occurrences |
|---|---|
| ERR1 | IXPTR+2, IXPTR+4, DDKEYIN+18, DDKEYIN+20 |
| IXPTR | DDKEYOUT+24 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | DDKEYIN+22~, DDKEYIN+25*, DDKEYIN+29!* |
| DIC | DDKEYIN+22~, DDKEYIN+26* |
| DIC("DR" | DDKEYIN+26* |
| DIC(0 | DDKEYIN+26* |
| DICNT1 | DDKEYOUT+4~, DDKEYOUT+8*, DDKEYOUT+13* |
| DICNT2 | DDKEYOUT+4~, DDKEYOUT+8*, DDKEYOUT+17*, DDKEYOUT+18 |
| DIEN | DDKEYIN+22~, DDKEYIN+23*, DDKEYIN+24, DDKEYIN+25~, DDKEYIN+26*, DDKEYIN+27, DDKEYIN+28, DDKEYIN+29 |
| DIER | ERR1~, ERR1+3 |
| >> DIFRD0 | DDKEYOUT+7*, DDKEYOUT+9, DDKEYOUT+10, DDKEYOUT+20, DDKEYOUT+23, IXPTR+1 |
| DIFRD1 | DDKEYOUT+4~, DDKEYOUT+8*, DDKEYOUT+9*, DDKEYOUT+10, DDKEYIN+5~, DDKEYIN+9*, DDKEYIN+10*, DDKEYIN+11 |
| DIFRDO | DDKEYOUT+4~ |
| DIFRER | DDKEYIN+4~, ERR1+1~, ERR1+3 |
| DIFRER("FILE" | DDKEYIN+4* |
| DIFRER(1 | ERR1+1* |
| DIFRER(2 | ERR1+2* |
| DIFRF | DDKEYOUT+4~, DDKEYOUT+11*, DDKEYOUT+12, DDKEYOUT+13, DDKEYOUT+14, DDKEYOUT+15, DDKEYOUT+16, DDKEYIN+5~, DDKEYIN+12*, DDKEYIN+13 , DDKEYIN+14 |
| DIFRF2 | DDKEYOUT~, DDKEYOUT+6, DDKEYOUT+7, DDKEYOUT+20, DDKEYOUT+21, DDKEYOUT+23, IXPTR+2, IXPTR+4, IXPTR+5, DDKEYIN~ , DDKEYIN+6, DDKEYIN+17, DDKEYIN+18, DDKEYIN+20, DDKEYIN+23, DDKEYIN+26, DDKEYIN+27, ERR1~, ERR1+2 |
| >> DIFRFDD | DDKEYOUT+15, DDKEYOUT+18 |
| DIFRFILE | DDKEYOUT~, DDKEYOUT+20, DDKEYOUT+21, DDKEYOUT+23, IXPTR+5, DDKEYIN~, DDKEYIN+6, DDKEYIN+17 |
| DIFRFLD | DDKEYOUT+4~, DDKEYOUT+11*, DDKEYOUT+12, DDKEYOUT+14, DDKEYOUT+16, DDKEYIN+5~, DDKEYIN+12*, DDKEYIN+13, DDKEYIN+14 |
| DIFRIN | DDKEYIN+5~, DDKEYIN+6*, DDKEYIN+8, DDKEYIN+9 |
| DIFRIN1 | DDKEYIN+5~, DDKEYIN+9*, DDKEYIN+10, DDKEYIN+11, DDKEYIN+21*, DDKEYIN+28 |
| DIFRKPTR | DDKEYIN+5~, DDKEYIN+19*, DDKEYIN+20, DDKEYIN+21 |
| DIFRNAME | DDKEYOUT+4~, DDKEYOUT+5*, DDKEYOUT+6*, DDKEYOUT+7, DDKEYOUT+16, DDKEYOUT+20, DDKEYOUT+21, DDKEYOUT+23, IXPTR+2, IXPTR+4 , IXPTR+5, DDKEYIN+5~, DDKEYIN+7*, DDKEYIN+8*, DDKEYIN+9, DDKEYIN+14, DDKEYIN+17, DDKEYIN+18, DDKEYIN+20, DDKEYIN+23 , DDKEYIN+26, DDKEYIN+27, ERR1~, ERR1+1 |
| DIFRSA | DDKEYIN~, DDKEYIN+6, DDKEYIN+17 |
| DIFRTA | DDKEYOUT~, DDKEYOUT+14, DDKEYOUT+15, DDKEYOUT+20, DDKEYOUT+21, DDKEYOUT+23, IXPTR+5 |
| DIIXPTR | IXPTR+1~*, IXPTR+2, IXPTR+3 |
| DIK | DDKEYIN+22~, DDKEYIN+25*, DDKEYIN+29!* |
| DINODE | DDKEYOUT+4~ |
| DINUM | DDKEYIN+24~* |
| DIOUT | DDKEYOUT+4~, DDKEYOUT+5*, DDKEYOUT+6, DDKEYOUT+9, DDKEYOUT+18, DDKEYIN+5~, DDKEYIN+9*, DDKEYIN+10, DDKEYIN+16, DDKEYIN+17 , ERR1+3* |
| DO | DDKEYIN+22~ |
| U | DDKEYOUT+11, IXPTR+1, IXPTR+3, DDKEYIN+12, DDKEYIN+19, DDKEYIN+21 |
| X | DDKEYOUT+4~, DDKEYOUT+10*, DDKEYOUT+11, DDKEYOUT+13*, DDKEYOUT+14, DDKEYOUT+15, DDKEYOUT+21*, DDKEYOUT+22, IXPTR+3~*, IXPTR+4 , IXPTR+5, DDKEYIN+5~, DDKEYIN+11*, DDKEYIN+12, DDKEYIN+17*, DDKEYIN+18, DDKEYIN+19, DDKEYIN+26* |
| Y | DDKEYOUT+4~, DDKEYOUT+22*, IXPTR+3~*, IXPTR+4, IXPTR+5, DDKEYIN+26 |