Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 870.019

Package: Health Level Seven

HL LOGICAL LINK(#870)-->870.019

Sub-Field: 870.019


Information

Parent File Name Number Package
HL LOGICAL LINK(#870) IN QUEUE 870.019 Health Level Seven

Details

Field # Name Loc Type Details
.01 MESSAGE NUMBER 0;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 02, 1994
  • HELP-PROMPT:  Not editable from any user option. See field description.
  • DESCRIPTION:  
    This is the number assigned to the message when it is enqued into the FIFO queue.
  • CROSS-REFERENCE:  870.019^B
    1)= S ^HLCS(870,DA(1),1,"B",$E(X,1,30),DA)=""
    2)= K ^HLCS(870,DA(1),1,"B",$E(X,1,30),DA)
1 STATUS 0;2 SET
  • 'P' FOR PENDING;
  • 'D' FOR DONE PROCESSING;
  • 'S' FOR STUB RECORD;
  • 'U' FOR UNUSED STUB RECORD;

  • LAST EDITED:  FEB 01, 2010
  • HELP-PROMPT:  This is the status of an individual message in the queue. These statuses control the flow and processing of the message.
  • DESCRIPTION:  Status of a particular message. Can be Stub, Pending, Done or Unused. These statuses control the processing of a message. For example, a stub record is created when a message is enqueued, and cannot be processed until
    its status is changed from 'stub' to 'pending'. Changing this status is the last thing the Low Layer Protocol does after reading in a message. Finally, once the message has been processed, its status is changed to
    'done'. Also, the effect of setting the 'UNUSED STUB RECORD' status is to remove the record from the queue and not to block the transmission of other messages that are pending on the queue. The 'UNUSED STUB RECORD'
    status will get set if the stub record goes unused for a period of time as determined by the 'RETENTION TIME QUEUED STUB RCD' parameter.
  • CROSS-REFERENCE:  870^AISTAT
    1)= S ^HLCS(870,"AISTAT",$E(X,1,30),DA(1),DA)=""
    2)= K ^HLCS(870,"AISTAT",$E(X,1,30),DA(1),DA)
    Used to quickly identify links with messages in any status, thus improving performance.
2 ERROR 0;3 SET
  • 'A' FOR LLP ACKNOWLEDGED NO ERROR;
  • 'C' FOR LLP CHAR COUNT WRONG;
  • 'X' FOR LLP XOR WRONG;
  • 'B' FOR DATA TOO LONG;
  • 'G' FOR OTHER LLP ERROR;

  • LAST EDITED:  OCT 27, 1994
  • HELP-PROMPT:  This field is not editable from any user option. See Field Description.
  • DESCRIPTION:  
    If this field contains a "C","X","B", or a "G" it means an error has ocurred while reading in a message. This field is not editable from any user option.
3 MESSAGE TEXT 1;0 WORD-PROCESSING #870.193

  • DESCRIPTION:  
    This field contains the text of the message.
  • LAST EDITED:  OCT 06, 1994
  • HELP-PROMPT:  This field contains the actual text of the message.
4 tvv 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  JAN 12, 1995
  • HELP-PROMPT:  Answer must be 3 characters in length.
5 ccccc 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  JAN 13, 1995
  • HELP-PROMPT:  Answer must be 1-5 characters in length.
6 xxx 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • LAST EDITED:  JAN 13, 1995
  • HELP-PROMPT:  Answer must be 1-3 characters in length.
7 dhcp-longtitudinal checksum 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  JAN 13, 1995
  • HELP-PROMPT:  Answer must be 1-5 characters in length.
8 dhcp-xor checksum 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • LAST EDITED:  JAN 13, 1995
  • HELP-PROMPT:  Answer must be 1-3 characters in length.
9 IEN772 InQ-Non-TCP 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!'(X?.N) X
  • LAST EDITED:  DEC 21, 2004
  • HELP-PROMPT:  Answer must be 1-30 numeric digits in length.
  • DESCRIPTION:  
    The ien of file #772, where this sub-entry is copied to.
  • FIELD INDEX:  IEN772IN (#217) REGULAR IR LOOKUP & SORTING WHOLE FILE (#870)
    Short Descr: IEN772 whole file cross reference
    Set Logic: S ^HLCS(870,"IEN772IN",X,DA(1),DA)=""
    Kill Logic: K ^HLCS(870,"IEN772IN",X,DA(1),DA)
    Whole Kill: K ^HLCS(870,"IEN772IN")
    X(1): IEN772 InQ-Non-TCP (870.019,9) (Subscr 1) (forwards)
10 DATE/TIME STUB RCD FOUND 0;10 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 30, 2009
  • DESCRIPTION:  
    A system date/time is entered into this field when a stub record is found.
Info |  Details