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.01

Package: Health Level Seven

HL LOGICAL LINK(#870)-->870.01

Sub-Field: 870.01


Information

Parent File Name Number Package
HL LOGICAL LINK(#870) OUT QUEUE 870.01 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 enque'd into the FIFO queue.
  • CROSS-REFERENCE:  870.01^B
    1)= S ^HLCS(870,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^HLCS(870,DA(1),2,"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:  JAN 28, 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, it cannot be processed until
    its status is changed from a 'stub' to 'pending', this is the last thing HLCS1 does when dequeueing a message from file #772 and enqueueing it into file #870. 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.
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:  NOV 17, 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 occured while attempting to send a message to another application. This field is not editable from any user option.
3 MESSAGE TEXT 1;0 WORD-PROCESSING #870.13

  • DESCRIPTION:  
    This field contains the text of the message.
  • LAST EDITED:  OCT 06, 1994
4 dhcp-longtitudinal checksum 0;4 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.
5 dhcp-xor checksum 0;5 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.
6 IEN772 OutQ-Non-TCP 0;6 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 from.
  • FIELD INDEX:  IEN772OUT (#218) REGULAR IR LOOKUP & SORTING WHOLE FILE (#870)
    Short Descr: IEN772 whole file cross reference
    Set Logic: S ^HLCS(870,"IEN772OUT",X,DA(1),DA)=""
    Kill Logic: K ^HLCS(870,"IEN772OUT",X,DA(1),DA)
    Whole Kill: K ^HLCS(870,"IEN772OUT")
    X(1): IEN772 OutQ-Non-TCP (870.01,6) (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