©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
XDRMAINI ;SF-IRMFO/IHS/OHPRD/JCM - INITIALIZATION ROUTINE FOR XDRMAIN; [ 04/02/2003 8:47 AM ]
Source file <XDRMAINI.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STATUS | ;
|
|
| MERGEX | ||
| END | ||
| MAILGRP | ;
|
|
| MERGE | ;
|
|
| FILEX | ||
| DUPX | ||
| STATUSX | ||
| START | ;
|
|
| TEST | ;
|
|
| FILE | ;
|
|
| DUP | ;
|
| FileNo | Call Tags |
|---|---|
| ^VA(15.1 - [#15.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | TEST+1 |
| ^DIC - [#1] | DUP+6, MERGE+2 |
| ^VA(15.1 - [#15.1] | DUP+1, DUP+2, DUP+4, DUP+5, STATUS+6*, MERGE+1, MERGE+2, MERGE+3, MERGE+18 |
| ^XMB(3.8 - [#3.8] | DUP+8, MAILGRP+1, MAILGRP+2, MAILGRP+3 |
| ^XTMP("XDRERR" | STATUS+5!* |
| Name | Line Occurrences |
|---|---|
| DUP | START+4 |
| DUPX | DUP+1, DUP+3 |
| END | START+3 |
| FILE | START+2 |
| FILEX | FILE+4 |
| MAILGRP | MERGE+19 |
| MERGE | START+5 |
| MERGEX | MERGE+1, MERGE+8, MERGE+10, MERGE+12, MERGE+14, MERGE+16, MERGE+18 |
| STATUS | DUP+3 |
| STATUSX | STATUS+1 |
| TEST | MERGE+8, MERGE+10, MERGE+12, MERGE+14, MERGE+16 |
| Name | Field # of Occurrence |
|---|---|
| ^( | MERGE+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D0 | STATUS+8! |
| DA | STATUS+2!, STATUS+3*, STATUS+8! |
| DIC | FILE+3*! |
| DIC("A" | FILE+2* |
| DIC("B" | FILE+1! |
| DIC(0 | FILE+3* |
| DIE | STATUS+2!, STATUS+3*, STATUS+8! |
| DR | STATUS+4*, STATUS+5*, STATUS+7*, STATUS+8! |
| DT | STATUS+5 |
| U | FILE+5, DUP+4, DUP+5, DUP+7, DUP+8, STATUS+1, STATUS+3, STATUS+5, STATUS+6, STATUS+7 , MERGE+4, MERGE+7, MERGE+8, MERGE+9, MERGE+10, MERGE+11, MERGE+12, MERGE+13, MERGE+14, MERGE+15 , MERGE+16, MERGE+17, MERGE+18, MAILGRP+1, MAILGRP+2, MAILGRP+3 |
| X | MERGE+8*, MERGE+10*, MERGE+12*, MERGE+14*, MERGE+16*, TEST+1! |
| >> XDRCD | DUP+4* |
| >> XDRD("COLLECT | ION ROUTINE" , DUP+7* |
| >> XDRD("DMAILGRP" | DUP+8*, MAILGRP+3* |
| >> XDRD(0 | DUP+2*, DUP+7, DUP+8, STATUS+1, STATUS+3, STATUS+7 |
| >> XDRDCNT | DUP+5* |
| >> XDRDNSTA | DUP+3, STATUS+1, STATUS+4, STATUS+5, STATUS+7, STATUS+9 |
| >> XDRDPDTI | STATUS+5, STATUS+7 |
| >> XDRDTYPE | STATUS+7 |
| >> XDRERR | DUP+1*, MERGE+1*, MERGE+8*, MERGE+10*, MERGE+12*, MERGE+14*, MERGE+16*, MERGE+18* |
| >> XDRFL | START+2, FILE+5*, DUP+1, DUP+2, DUP+4, DUP+5, DUP+6, STATUS+5, STATUS+6, MERGE+1 , MERGE+2, MERGE+3, MERGE+18 |
| >> XDRGL | DUP+6*, MERGE+2*, MERGE+17 |
| XDRI | DUP+8*, DUP+9!, MERGE+3*, MAILGRP+1*, MAILGRP+2*, MAILGRP+3*, MAILGRP+4! |
| >> XDRM("AUTO" | MERGE+4, MERGE+5 |
| >> XDRM("DINUMS" | MERGE+3* |
| >> XDRM("GL" | MERGE+17* |
| >> XDRM("MD-IT" | MERGE+13*, MERGE+14 |
| >> XDRM("MERGE-MSG" | MERGE+15*, MERGE+16, MAILGRP+2 |
| >> XDRM("MMAILGRP" | MAILGRP+2* |
| >> XDRM("NON-INTERACTIVE" | MERGE+4*, MERGE+5* |
| >> XDRM("NOTALK" | MERGE+5* |
| >> XDRM("NOVERIFY" | FILE+2, MERGE+5*, MERGE+17 |
| >> XDRM("POST-MERGE" | MERGE+9*, MERGE+10 |
| >> XDRM("PRE-MERGE" | MERGE+7*, MERGE+8 |
| >> XDRM("TOP FIL | E" , MERGE+3* |
| >> XDRM("VERIFY-MSG" | MERGE+11*, MERGE+12, MAILGRP+1 |
| >> XDRM("VMAILGRP" | MAILGRP+1* |
| >> XDRM(0 | MERGE+2*, MERGE+4, MERGE+7, MERGE+9, MERGE+11, MERGE+13, MERGE+15, MERGE+18, MAILGRP+1, MAILGRP+2 , MAILGRP+3 |
| XDRMAINI | START+4, START+6!, FILE+2 |
| >> XDRMPAIR | MERGE+6* |
| >> XDRQFLG | START+1*, START+3, FILE+4*, DUP+3, STATUS+1*, STATUS+9* |
| Y | FILE+4, FILE+5! |
| Y(0 | FILE+5 |