©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
XDRDADD ;SF-IRMFO/IHS/OHPRD/JCM - ADDS RECORDS TO DUPLICATE RECORD FILE ;2/20/97 10:41 [ 04/02/2003 8:47 AM ]
Source file <XDRDADD.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | FILE^DICN ^DIE |
| Toolkit | 1 | EN^XDRMAIN |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MERGEX | ||
| END | ||
| MERGE | ||
| EDIT | ;
|
|
| EOJ | ;
|
|
| ADD | ;
|
|
| ADDX | ||
| START | ;
|
|
| INIT | ;
|
|
| IDO |
| FileNo | Call Tags |
|---|---|
| ^VA(15 - [#15] | Classic Fileman Calls |
| ^VA(15.1 - [#15.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^VA(15 - [#15] | ADD+12, EDIT+5 |
| ^VA(15.1 - [#15.1] | ADD+21 |
| Name | Line Occurrences |
|---|---|
| @( | IDO+1 |
| ADD | START+2 |
| EDIT | START+3 |
| EOJ | END |
| IDO | EDIT+5, EDIT+7 |
| INIT | START+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D | EDIT+1~, IDO~ |
| D0 | EDIT+1~, IDO~ |
| DA | ADD+15*, ADD+19~, ADD+20*, ADDX!, EDIT+1~, EDIT+2*, EDIT+4!, EDIT+5*!, EDIT+7*! |
| DA(1 | EDIT+5* |
| DB | EDIT+1~, IDO~ |
| DC | EDIT+1~, IDO~ |
| DE | EDIT+1~, IDO~ |
| DG | EDIT+1~, IDO~ |
| DH | EDIT+1~, IDO~ |
| DI | EDIT+1~, IDO~ |
| DIC | ADD+2*, ADD+14!, EDIT+1~, IDO~ |
| DIC("DR" | ADD+4*, ADD+5*, ADD+6*, ADD+7*, ADD+8* |
| DIC(0 | ADD+2* |
| DICR | EDIT+1~, IDO~ |
| DIE | ADD+15*, ADD+19~, ADD+20*, ADDX!, EDIT+1~, EDIT+2*, EDIT+4!, EDIT+7*! |
| DIEL | EDIT+1~, IDO~ |
| DIFLD | EDIT+1~, IDO~ |
| DIG | EDIT+1~, IDO~ |
| DIH | EDIT+1~, IDO~ |
| DIK | EDIT+1~, EDIT+5*! |
| DINAME | EDIT+1~, IDO~ |
| DIP | EDIT+1~, IDO~ |
| DIU | EDIT+1~, IDO~ |
| DIV | EDIT+1~, IDO~ |
| DIW | EDIT+1~, IDO~ |
| DK | EDIT+1~, IDO~ |
| DL | EDIT+1~, IDO~ |
| DLAYGO | ADD+2*, ADD+14! |
| DM | EDIT+1~, IDO~ |
| DOV | EDIT+1~, IDO~ |
| DP | EDIT+1~, IDO~ |
| DQ | EDIT+1~, IDO~ |
| DR | ADD+14!, ADD+16*!, ADD+19~, ADD+21*, ADDX!, EDIT+1~, EDIT+3*, EDIT+4!, EDIT+7*! |
| DR(2 | ADD+16*, EDIT+7* |
| DSC | EDIT+1~, IDO~ |
| DT | ADD+6 |
| DU | EDIT+1~, IDO~ |
| DV | EDIT+1~, IDO~ |
| DW | EDIT+1~, IDO~ |
| DXS | EDIT+1~, IDO~ |
| I | ADD+10~, ADD+12* |
| U | ADD+2, ADD+3, ADD+11, ADD+12, ADD+16, ADD+21, EDIT+7 |
| X | ADD+2*, ADD+11, ADD+12!, ADD+13, ADD+14!, EDIT+1~, IDO~, EOJ+1! |
| X1 | ADD+10~, ADD+11*, ADD+12 |
| X2 | ADD+10~, ADD+11*, ADD+12 |
| X3 | ADD+10~, ADD+12* |
| >> XDRCD | INIT+4, INIT+5 |
| >> XDRCD2 | INIT+4, INIT+5 |
| >> XDRD("DUPSCORE" | INIT+1, INIT+6, ADD+7, EDIT+3 |
| XDRDADD | EOJ+1! |
| XDRDADD("DUPSCORE%" | INIT+1*, INIT+2*, INIT+3*, ADD+7, EDIT+3 |
| XDRDADD("FR" | INIT+4*, INIT+5, ADD+2, MERGE+1 |
| XDRDADD("STATUS" | INIT+6*, INIT+7*, ADD+4, ADD+5 |
| XDRDADD("TO" | INIT+5*, ADD+3, MERGE+1 |
| XDRDADDX | ADD+3*, ADD+11, ADDX! |
| XDRDORD | ADD+16*, ADDX!, EDIT+5*, EDIT+6!, EDIT+7*, EDIT+8! |
| XDRDPDA | START+2, ADD+15*, ADDX!, MERGE+2, EDIT+2, EDIT+5, EDIT+7 |
| XDRDRTN | EDIT+5*, EDIT+7*, IDO+1! |
| >> XDRDSCOR("MAX" | INIT+1, ADD+7, EDIT+3 |
| >> XDRDSCOR("PDT%" | ADD+7, EDIT+3 |
| >> XDRDSCOR("VDT" | INIT+6 |
| >> XDRDSCOR("VDT%" | ADD+8, EDIT+3 |
| >> XDRDTEST( | ADD+16, EDIT+7 |
| >> XDRDUP("TEST | SCORE" , ADD+16 |
| >> XDRFL | ADD+20, ADD+21 |
| >> XDRGL | ADD+2, ADD+3 |
| XDRM | MERGEX! |
| XDRM("AUTO" | MERGE+1* |
| XDRMPAIR | MERGE+1*, MERGEX! |
| >> XDRMPDA | MERGE+2* |
| Y | ADD+13*, ADD+15, EDIT+1~, IDO~, EOJ+1! |