©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
INHVCRL4 ;JKB,KAC ; 20 Oct 1999 18:38 ; Logon Server (LoS) - Determine destination for inbound msg
Source file <INHVCRL4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DEST | ; Determine destination for an inbound logon message.
|
|
| CIWBLD | ; Build array containing valid inbound PWS destinations for LoS.
|
|
| DEST3 | ;Entry point From Background Message
|
|
| DEST2 | ;Entry point From Background Message
|
|
| PWSBLD | ; Build array containing valid inbound PWS destinations for LoS.
|
|
| BCCBLD | ; Build array containing valid inbound BCC destinations for LoS.
|
|
| DDSABLD | ;DDSA
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^INRHD("B" | DEST+45 |
| Name | Line Occurrences |
|---|---|
| @( | DEST+42 |
| DEST | DEST2+6, DEST3+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DEST+45 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> INANYONE | DEST2+3*, DEST3+3*, DEST+41* |
| INBLDST | DEST+35~, DEST+39*, DEST+42 |
| >> INDELIM | DEST2+4, DEST2+5, DEST3+4, DEST3+5, DEST+36 |
| INDEST | PWSBLD+7, PWSBLD+8!, PWSBLD+9*, CIWBLD+7, CIWBLD+8!, CIWBLD+9*, BCCBLD+7, BCCBLD+8!, BCCBLD+9* |
| INDEST( | DEST+45 |
| INDEST("ZILZ01" | PWSBLD+10*, CIWBLD+10*, BCCBLD+10* |
| >> INDST | DEST+45* |
| INDSTP | DEST+34!, DEST+45* |
| >> INERR | DEST+40* |
| >> INEVN | DEST+44 |
| INMESSID | DEST+35~, DEST+36*, DEST+40 |
| >> INMSH | DEST2+4, DEST2+5*, DEST3+4, DEST3+5*, DEST+36 |
| INRECV | DEST+35~, DEST+36* |
| INSEND | DEST2+2~, DEST2+4*, DEST2+5*, DEST3+2~, DEST3+4*, DEST3+5*, DEST+35~, DEST+36*, DEST+39, DEST+40 , DEST+41 |
| >> INTYP | DEST+44 |
| X | DEST+35~, DEST+44*, DEST+45 |
| Name | Field # of Occurrence |
|---|---|
| $T(@INBLDST | DEST+40 |