DG53209 ;BP-CIOFO/JRP - KIDS INSTALL ROUTINE FOR DG*5.3*209;8/25/98
Source file <DG53209.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENV | ;Environment check
|
|
| PRE | ;Pre-init
|
|
| POST | ;Post-init
|
|
| POST1 | ;Make sure required ADT-Axx protocols are enabled
|
|
| POST2 | ;Remove subscription of VAFC ADT-xxx CLIENT to VAFC ADT-xxx SERVER
|
|
| POST3 | ;Turn on ADT/R HL7 messaging
|
|
| PROTON(NAME) | ;Enable protocol
|
|
| UNSUB(CLIENT,SERVER) | ;Remove subscription of client from server
|
|
| DATA1 | ;
|
|
| DATA2 | ;;Client Protocol^Server Protocol
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^ORD(101 - [#101] | FIND1^DIC |
| 101.01 | FIND1^DIC |
| ^DIC(4.2 - [#4.2] | FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("DIERR" | PROTON+8, UNSUB+11 |
| ^TMP("FDAROOT" | PROTON+7, UNSUB+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLIENT | POST+1~, POST2+5*, POST2+7, POST2+8, UNSUB~, UNSUB+7, UNSUB+19 |
| DG53209 | ENV+1~, POST+1~, POST1+5*, POST1+6*, POST1+7, POST2+8*, POST2+9*, POST2+10 |
| FDAROOT | PROTON+6~, PROTON+7*, PROTON+9, PROTON+13, PROTON+15, PROTON+17, PROTON+18, PROTON+20, PROTON+21, UNSUB+9~ , UNSUB+10*, UNSUB+12, UNSUB+16, UNSUB+21, UNSUB+24, UNSUB+26, UNSUB+28, UNSUB+30 |
| IENS | PROTON+6~, PROTON+16*, PROTON+17, UNSUB+9~, UNSUB+18*, UNSUB+19, UNSUB+23*, UNSUB+24 |
| MSGROOT | PROTON+6~, PROTON+8*, PROTON+9, PROTON+11, PROTON+13, PROTON+15, PROTON+18, PROTON+20, PROTON+21, UNSUB+9~ , UNSUB+11*, UNSUB+12, UNSUB+14, UNSUB+16, UNSUB+19, UNSUB+21, UNSUB+25, UNSUB+26, UNSUB+28, UNSUB+30 |
| NAME | PROTON~, PROTON+5, PROTON+11 |
| OFFSET | POST+1~, POST1+3*, POST2+4* |
| PROT | POST+1~, POST1+3*, POST1+4, POST1+5, POST2+4*, POST2+5, POST2+6 |
| PROTFIX | POST+1~, POST1+4*, POST1+5, POST1+6, POST2+7*, POST2+8, POST2+9 |
| PTR101 | PROTON+6~, PROTON+11*, PROTON+13, PROTON+16, UNSUB+9~, UNSUB+14*, UNSUB+16, UNSUB+18, UNSUB+23 |
| >> PTR101M | UNSUB+19*, UNSUB+21, UNSUB+23 |
| SERVER | POST+1~, POST2+6*, POST2+7, POST2+9, UNSUB~, UNSUB+7, UNSUB+14 |
| >> XPDQUES("POS-REMOVE-SUBSCRIPTION" | POST2+1 |
| >> XPDQUIT | ENV+11* |