INTSUSN ; DGH JPD; 3 Jun 96 09:54; Enhanced functions and utilities
Source file <INTSUSN.m>
Package | Total | Call Graph |
---|---|---|
IHS Generic Interface System | 6 | $$NEW^INHD ULOG^INHU $$ACKIN^INHUSEN2 ERRADD^INHUSEN3 $$VERIF^INTSUSN1 DISPLAY^INTSUT1 |
Uncategorized | 1 | $$NOW^UTDT |
VA Fileman | 1 | ^DIE |
Name | Comments | DBIA/ICR reference |
---|---|---|
CACKLOG(INCAACK,INCAORIG,INCASTAT,INCANAKM) | ;Log an accept (commit) acknowledgement to a message
|
|
DEST | ;Find destination for incoming message (not incoming ack?).
|
|
STORE(INDST,ING,INMSG) | ;Store incoming xmission in the Universal Interface file
|
|
CACK(INSEND,STAT,ORIGID,TXT,EXPCT,DELAY,INERR,INA,INDA) | ;Send accept (commit) acknowledgement
; STAT = ack status (commit ack: CA, CR, CE) MSA-1 ; ORIGID = (REQ) MESSID of Incoming message being acknowledged MSA-2 ; TXT = Text message MSA-3 ; EXPCT = Expected sequence number MSA-4 ; DELAY = Delayed Ack type MSA-5 ; INERR = Error condition MSA-6 ; INA = (OPT) The INA variable array. ; INDA = (OPT) The INDA array of ien entry numbers. ; NOTE: INDA and INA are not normally needed for commit acks, but ; may be used is specialized situations. |
|
TYPNOTAK(ING,INXDST,INDSTP,INDST,INVL,INMSG) | ;Type was not an ack
|
|
IN(INIP,ING,INDEST,INSEND,INERR,INXDST,INMSG,INMSASTA,INRONLY) | ;Process incoming
|
|
ACK(INIP,INVL,INSEND,INRONLY) | ;Process commit ack and quit back to transceiver routine.
|
|
TYPEACK(ING,INVL,INMSG) | ;Type was ack
|
Name | Field # of Occurrence |
---|---|
^DIE | CACKLOG+10, CACKLOG+20, STORE+23 |
$$NEW^INHD | STORE+19 |
ULOG^INHU | CACK+37, CACKLOG+23, CACKLOG+24 |
$$ACKIN^INHUSEN2 | TYPEACK+16 |
ERRADD^INHUSEN3 | IN+38, IN+43, TYPEACK+22, TYPNOTAK+12 |
$$VERIF^INTSUSN1 | IN+34 |
DISPLAY^INTSUT1 | CACK+19, CACK+21, CACK+35, DEST+5 |
$$NOW^UTDT | CACKLOG+8 |
FileNo | Call Tags |
---|---|
^INTHU - [#4001] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^INRHD - [#4005] | TYPNOTAK+15, CACK+30 |
^INRHD("B" | DEST+5, DEST+6 |
^INRHS - [#4006] | CACK+30 |
^INRHT - [#4000] | CACK+29 |
^INTHU - [#4001] | CACKLOG+14*, CACKLOG+15*, CACKLOG+19, CACKLOG+22 |
^INTHU("C" | CACKLOG+13, STORE+14, STORE+16 |
Name | Line Occurrences |
---|---|
$$ACK | IN+41, IN+50 |
$$CACK | ACK+16, ACK+17, ACK+18 |
CACKLOG | TYPEACK+26 |
STORE | TYPEACK+24, TYPNOTAK+16 |
TYPEACK | IN+47 |
TYPNOTAK | IN+49 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACKMSG | IN+28~, TYPEACK+15~, TYPEACK+16, TYPEACK+26 |
AMID | CACKLOG+6~, CACKLOG+13*, CACKLOG+14, CACKLOG+15, CACKLOG+19, CACKLOG+20, CACKLOG+23 |
CERR | ACK+12~, ACK+16*, ACK+17*, ACK+18*, ACK+19 |
CND | ACK+6~, ACK+9*, ACK+11*, ACK+13, ACK+15, ACK+16, ACK+17 |
DA | CACK+18~, CACKLOG+6~, CACKLOG+8*, CACKLOG+20*, STORE+23* |
DELAY | CACK~, CACK+25 |
DEST | CACK+18~, CACK+29*, CACK+30, CACK+33 |
DIC | CACK+18~ |
DIE | CACK+18~, CACKLOG+6~, CACKLOG+8*, CACKLOG+20*, STORE+8~, STORE+23* |
DR | CACK+18~, CACKLOG+6~, CACKLOG+8*, CACKLOG+20*, STORE+8~, STORE+23* |
EXPCT | IN+27~, IN+32*, TYPEACK+15~, TYPEACK+16, ACK+16, ACK+17, ACK+18, CACK~, CACK+23 |
INA | CACK~, CACK+18~ |
INA("INACKERR" | CACK+27* |
INA("INACKTXT" | CACK+24* |
INA("INDELAY" | CACK+25* |
INA("INEXPSEQ" | CACK+23* |
INA("INORIGID" | CACK+22* |
INA("INSTAT" | CACK+22* |
INCAACK | CACKLOG~, CACKLOG+8, CACKLOG+10~, CACKLOG+14, CACKLOG+15, CACKLOG+22, CACKLOG+24 |
INCANAKM | CACKLOG~, CACKLOG+10~, CACKLOG+21 |
INCAORIG | CACKLOG~, CACKLOG+10~, CACKLOG+11, CACKLOG+13 |
INCASTAT | CACKLOG~, CACKLOG+10~, CACKLOG+15 |
INDA | CACK~, CACK+32* |
>> INDELIM | IN+35, ACK+9 |
INDEST | IN~ |
INDST | IN+27~, IN+49, TYPEACK+15~, TYPEACK+16, TYPEACK+24, TYPNOTAK~, TYPNOTAK+15*, TYPNOTAK+16, STORE~, STORE+19 |
INDSTP | IN+27~, IN+49, TYPEACK+15~, TYPEACK+16, TYPEACK+20, TYPNOTAK~, TYPNOTAK+10, TYPNOTAK+15, DEST+6* |
INERR | IN~, IN+32*, IN+34, IN+38, IN+43, TYPEACK+16, TYPEACK+22, TYPEACK+26, TYPNOTAK+12, ACK+16 , ACK+17, ACK+18, CACK~, CACK+27, STORE+21* |
INEVN | IN+28~, IN+34 |
ING | IN~, IN+34, IN+47, IN+49, TYPEACK~, TYPEACK+16, TYPEACK+24, TYPNOTAK~, TYPNOTAK+16, STORE~ , STORE+19 |
INIP | IN~, IN+41, IN+50, ACK~ |
INIP("AAC" | ACK+11 |
INIP("AATT" | CACK+21 |
INMSASTA | IN~, TYPEACK+15~, TYPEACK+16, TYPEACK+20, TYPEACK+26 |
INMSG | IN~, IN+47, IN+49, TYPEACK~, TYPEACK+24, TYPEACK+26, TYPNOTAK~, TYPNOTAK+16, STORE~, STORE+19* , STORE+21, STORE+23 |
INMSH | IN+27~, IN+34, IN+35, IN+38, IN+42, TYPEACK+21, TYPNOTAK+11, ACK+9, ACK+18 |
INRONLY | IN~, IN+41, IN+50, ACK~, ACK+8 |
INSEND | IN~, IN+32*, IN+41, IN+50, ACK~, ACK+16, ACK+17, ACK+18, CACK~, CACK+38* |
INTYP | IN+27~, IN+34, IN+41, IN+47, IN+49 |
INVL | IN+27~, IN+45*, IN+47, IN+49, IN+50, TYPEACK~, TYPEACK+16*, TYPEACK+18, TYPEACK+23*, TYPNOTAK~ , TYPNOTAK+13*, ACK~, ACK+8, ACK+16, ACK+17, ACK+18, ACK+19, STORE+21* |
INXDST | IN~, IN+49, TYPNOTAK~, TYPNOTAK+9 |
MESS | CACKLOG+6~, CACKLOG+23, CACKLOG+24 |
MESS(1 | CACKLOG+16*, CACKLOG+21*, CACKLOG+22* |
MESS(2 | CACKLOG+21* |
MESSID | IN+27~, IN+35*, IN+38, TYPEACK+21, TYPNOTAK+11, STORE+21 |
>> MSG | IN+38, IN+43, TYPEACK+22, TYPNOTAK+12 |
>> MSG(1 | IN+38*, IN+42*, TYPEACK+21*, TYPNOTAK+11* |
>> MSG(2 | IN+38*, IN+42*, TYPEACK+21*, TYPNOTAK+11* |
ORIGID | IN+27~, IN+35*, ACK+16, ACK+17, ACK+18, CACK~, CACK+19, CACK+22, CACK+35, STORE+14 , STORE+15, STORE+23 |
ORIGID2 | IN+27~, STORE+14*, STORE+16*, STORE+19 |
PN | STORE+15~*, STORE+16 |
SCR | CACK+18~, CACK+29*, CACK+30, CACK+33 |
SOURCE | STORE+8~, STORE+17*, STORE+19 |
STAT | IN+27~, ACK+12~, CACK~, CACK+22, CACKLOG+6~, CACKLOG+15*, CACKLOG+16, CACKLOG+19*, CACKLOG+20, CACKLOG+21 , CACKLOG+23 |
TRT | CACK+18~, CACK+21*, CACK+29, CACK+33 |
TXT | CACK~, CACK+24 |
U | TYPNOTAK+15, ACK+18, CACK+29, CACKLOG+14, CACKLOG+15, CACKLOG+19, CACKLOG+22 |
UIF | CACK+18~, CACK+35, CACK+37, CACK+38 |
USED | STORE+15~, STORE+16* |
Z | IN+28~, CACK+18~ |