©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
XUPCSRVR ;OAK/BT- SERVER TO UPDATE THE PERSON CLASS(#8932.1) FILE ;12/05/13
Source file <XUPCSRVR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 610 | ;
|
|
| DEF1(XUI) | ; Update definition for single entry XUI
|
|
| 745 | ;
|
|
| DEL(XUIEN) | ||
| S1 | ;get data from email; this starting point for SERVER OPTION. [XUPCSRVR] UPDATE PERSON CLASS SERVER
|
|
| GETDEF | ; get definitions
|
|
| 609 | ;
|
|
| DEFI(XUIEN) | ;
|
|
| GETDES(XUI,XUY) | ; get single entry definition
|
|
| CRMG | ;CREATE MAIL GROUP
|
|
| ADD(XUDATA) | ; add or update a single entry
|
|
| SEND(XUKIND) | ; Send to sites
|
|
| POST | ;
|
|
| DEF | ; Update definitions
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("PSC DATA" | S1+1!, S1+10*, SEND+1, SEND+6! |
| ^TMP("XUBA" | S1+2!, S1+12*, DEFI+4! |
| ^TMP($J | DEF1+2!, DEF1+4*, DEF1+7! |
| ^USC(8932.1 - [#8932.1] | ADD+14, ADD+17, GETDEF+3, GETDES+3 |
| ^XMB(3.9 - [#3.9] | S1+5, S1+6, S1+7 |
| Name | Line Occurrences |
|---|---|
| ADD | S1+11 |
| CRMG | POST+2 |
| DEF | POST+1 |
| DEF1 | DEF+1, DEF+2, DEF+3 |
| DEFI | S1+13 |
| DEL | ADD+15 |
| GETDES | GETDEF+4 |
| SEND | S1+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | DEL+1~, DEL+2* |
| DIK | DEL+1~, DEL+3* |
| >> DILOCKTM | ADD+14 |
| DIR | DEL+1~ |
| DT | SEND+3 |
| DUZ | SEND+2*, SEND+5 |
| FDA | ADD+1~ |
| FDA( | ADD+4*, ADD+5*, ADD+6*, ADD+7*, ADD+8*, ADD+9*, ADD+10*, ADD+11*, ADD+12* |
| FDAIEN | ADD+1~ |
| FDAIEN(1 | ADD+3*, ADD+14, ADD+17 |
| MSG | SEND+1*, SEND+5, SEND+6! |
| MSGSBJ | SEND+3*, SEND+5, SEND+6! |
| ODUZ | SEND+1~, SEND+2* |
| >> WHO | SEND+4, SEND+5 |
| >> WHO("G.PERSON | CLASS UPDATE" , SEND+4* |
| XMDESC | CRMG+2~, CRMG+3 |
| XMDESC(1 | CRMG+2* |
| >> XQMSG | S1+5, S1+6, S1+7 |
| XQMSGP | S1+16! |
| XUA | GETDES+1~, GETDES+3* |
| XUB | GETDES+1~ |
| XUD | ADD+1~, ADD+2*, ADD+3, ADD+4, ADD+5, ADD+6, ADD+7, ADD+8, ADD+9, ADD+10 , ADD+11, ADD+12 |
| XUDATA | S1+3~, S1+7*, S1+8, S1+9*, S1+10, S1+11*, S1+12, S1+13, ADD~, ADD+2 , ADD+15, DEF1+1~, DEF1+3*, DEF1+4 |
| XUI | S1+3~, S1+6*, S1+7, S1+10, DEFI+1~, DEFI+2*, DEFI+3, DEF+1~, DEF+2~, DEF+3~ , DEF1~, DEF1+4, DEF1+5, GETDEF+1~, GETDEF+2*, GETDEF+3, GETDEF+4, GETDES~, GETDES+2, GETDES+3 |
| XUI1 | DEF1+1~, DEF1+5*, DEF1+6 |
| XUIEN | S1+3~, S1+8*, S1+11, S1+12, S1+13, DEL~, DEL+2, DEFI~, DEFI+2, CRMG+3~* |
| XUKIND | SEND~, SEND+3 |
| XUSBJ | S1+3~, S1+5* |
| XUY | S1+3~, S1+4*, S1+12*, S1+13*, DEF1+1~, DEF1+3*, DEF1+4, GETDEF+1~, GETDEF+3*, GETDEF+4 , GETDES~, GETDES+3 |
| Name | Field # of Occurrence |
|---|---|
| $T(@XUI+XUY | DEF1+3 |