©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
INTSREC ;JPD ; 13 May 98 12:09; Generic receiver, enhanced functions
Source file <INTSREC.m>
| Package | Total | Caller Graph |
|---|---|---|
| IHS Generic Interface System | 2 | INTSEND INTSUT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ORMO01 | ;;TEST INTERACTIVE
|
|
| DEST | ; get valid destinations
|
|
| RECEIVE(INIP,INCHNL,INXDST,INDEST,INEXPAND,INPOP,INDA,INRONLY,INOUT) | ;
|
|
| SEND(ACKUIF,INCHNL,INIP,INLOOP,INEXPAND) | ;Send outgoing ack.
; Input: ; ACKUIF - Universal Interface file ien for ack ; INCHNL - tcp/ip channel ; INIP - Parameters ; INLOOP - Receive retry count ; INEXPAND - 0 expand 1 don't expand |
|
| EN(INEXPAND,INDA,DIE) | ;
|
|
| RECSTR(INV,INCHNL,INIP) | ;
; Input: ; INV - gets set in PARSE^INHUVUT1 ; INV(1) if line terminated by $c(13), or is first line of many in seg ; INV(1,1), INV(1,2)... for overflow nodes until terminated ; INCHNL - tcp/ip channel ; INIP - Parameters |
|
| DSPHNG | ;hang then display
|
| Name | Field # of Occurrence |
|---|---|
| RECV^%INET | RECSTR+11 |
| $$VAL^DWRA | EN+7 |
| ULOG^INHU | RECEIVE+29 |
| SAVE^INHUTC1 | RECEIVE+44 |
| $$RECEIVE^INHUVUT | RECEIVE+19 |
| $$SEND^INHUVUT | SEND+11 |
| PARSE^INHUVUT1 | RECSTR+24 |
| $$ERROR^INTSUT | RECEIVE+21 |
| CLINIT^INTSUT | EN+16 |
| EVAL^INTSUT | RECEIVE+24 |
| EXIT^INTSUT | EN+22 |
| INIT1^INTSUT | EN+9 |
| OPEN^INTSUT | EN+13 |
| SRVINIT^INTSUT | EN+18 |
| DISPLAY^INTSUT1 | EN+11, RECEIVE+25, DSPHNG+1, SEND+7, SEND+9, SEND+12, RECSTR+13 |
| EXPNDIS^INTSUT1 | RECEIVE+31, SEND+10 |
| $$POSTPRE^INTSUT2 | RECEIVE+17, RECEIVE+37 |
| POST^INTSUT2 | RECEIVE+36 |
| PRE^INTSUT2 | RECEIVE+17 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^INRHSITE(1 | RECSTR+9 |
| ^INTHU - [#4001] | RECEIVE+25 |
| ^UTILITY("INREC" | RECSTR+20!, RECSTR+21* |
| Name | Line Occurrences |
|---|---|
| DSPHNG | RECEIVE+16 |
| RECEIVE | EN+20 |
| SEND | RECEIVE+38 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | RECSTR+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACKUIF | RECEIVE+13~, RECEIVE+24, RECEIVE+36, RECEIVE+37, RECEIVE+38, SEND~, SEND+7, SEND+8, SEND+10, SEND+11 |
| AP | RECSTR+7~, RECSTR+8*, RECSTR+22* |
| APDONE | RECSTR+7~, RECSTR+8*, RECSTR+10, RECSTR+14*, RECSTR+15* |
| APREC | RECSTR+7~, RECSTR+8*, RECSTR+11, RECSTR+15, RECSTR+16*, RECSTR+17, RECSTR+22, RECSTR+23 |
| APREC(0 | RECSTR+12, RECSTR+13 |
| CLISRV | EN+5~, EN+9, EN+13, EN+16, EN+18, EN+22 |
| DIE | EN~, EN+7 |
| ER | RECEIVE+13~, RECEIVE+19*, RECEIVE+21, RECEIVE+24, SEND+11*, SEND+12 |
| >> INARY | RECEIVE+17, RECEIVE+36, RECEIVE+37 |
| INBPN | EN+5~, EN+7*, EN+9, EN+22 |
| INCHNL | EN+13, EN+16, EN+18, EN+20, EN+22, RECEIVE~, RECEIVE+19, RECEIVE+38, SEND~, SEND+11 , RECSTR~, RECSTR+11 |
| INDA | EN~, EN+7, EN+9, EN+20, RECEIVE~, RECEIVE+17, RECEIVE+36, RECEIVE+37, RECEIVE+44 |
| INDATA | RECEIVE+13~ |
| INDEBUG | EN+5~ |
| INDEST | EN+5~, EN+9, EN+20, RECEIVE~, RECEIVE+24 |
| INDEST( | RECEIVE+15* |
| INERR | RECEIVE+13~, RECEIVE+18!, RECEIVE+19, RECEIVE+21, RECEIVE+24 |
| INEXPAND | EN~, EN+20, RECEIVE~, RECEIVE+31, RECEIVE+38, SEND~, SEND+10 |
| >> INEXTUIF | RECEIVE+17 |
| ING | RECEIVE+13~, RECEIVE+18*, RECEIVE+19, RECEIVE+24 |
| INIP | EN+5~, EN+9, EN+13, EN+16, EN+18, EN+20, EN+22, RECEIVE~, RECEIVE+19, RECEIVE+24 , RECEIVE+38, SEND~, SEND+11, RECSTR~ |
| INIP("INIT" | EN+14 |
| INIP("PORT" | EN+11 |
| INIP("POST" | RECEIVE+36 |
| INIP("PRE" | RECEIVE+17 |
| INIP("RHNG" | DSPHNG+1, DSPHNG+2 |
| INIP("RTO" | RECSTR+11 |
| INIP("RTRY" | RECEIVE+16, RECSTR+18 |
| >> INLASTN | RECEIVE+17, RECEIVE+37 |
| INLOOP | RECEIVE+38, SEND~, SEND+13* |
| INLP | RECEIVE+13~, RECEIVE+16*, RECEIVE+39* |
| INMEM | EN+13, EN+16, EN+18, RECEIVE+13~, RECEIVE+19 |
| INMS | RECEIVE+20! |
| >> INMSG | RECEIVE+24, RECEIVE+25, RECEIVE+27, RECEIVE+29, RECEIVE+31 |
| INOPT | RECEIVE+42~, RECEIVE+44 |
| INOPT("NONINTER" | RECEIVE+43* |
| INOPT("TYPE" | RECEIVE+43* |
| INOUT | RECEIVE~, RECEIVE+14*, RECEIVE+16, RECEIVE+33* |
| INPOP | EN+5~, EN+9, EN+10, EN+13, EN+14, EN+16, EN+18, EN+20, RECEIVE~, RECEIVE+16 , RECEIVE+17, RECEIVE+21, RECEIVE+22, RECEIVE+24, RECEIVE+37, RECSTR+14* |
| INRCVE | RECEIVE+13~, RECEIVE+14*, RECEIVE+21 |
| >> INREC | RECSTR+8*, RECSTR+19, RECSTR+21*, RECSTR+22, RECSTR+25 |
| INRONLY | RECEIVE~, RECEIVE+14*, RECEIVE+17, RECEIVE+24, RECEIVE+33, RECEIVE+35, RECEIVE+41 |
| INSMIN | RECSTR+7~, RECSTR+9*, RECSTR+19 |
| INTT | EN+5~ |
| INUPDAT | RECEIVE+13~, RECEIVE+14*, RECEIVE+17, RECEIVE+37, RECEIVE+41 |
| INV | RECSTR~ |
| INXDST | EN+5~, EN+9, EN+20, RECEIVE~, RECEIVE+24 |
| J | EN+5~ |
| MS | EN+5~, RECEIVE+20! |
| NORESP | RECSTR+7~, RECSTR+8*, RECSTR+10, RECSTR+18* |
| NULLREAD | RECSTR+7~, RECSTR+8*, RECSTR+18* |
| RUN | RECEIVE+13~ |
| U | RECEIVE+25, RECSTR+9 |
| X | RECEIVE+13~, RECEIVE+15* |
| Y | RECEIVE+13~, RECEIVE+15* |
| Z | RECEIVE+13~, RECEIVE+15* |
| Name | Field # of Occurrence |
|---|---|
| $T(DEST+X | RECEIVE+15 |