STANDARD DATA DICTIONARY #349.9 -- AR TRANSMISSION SEGMENTS FILE                                                  3/24/25    PAGE 1
STORED IN ^RCT(349.9,  (1 ENTRY)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                        (VERSION 4.5)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds the information for AR transmission routers based on type.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

CROSS
REFERENCED BY: NAME(B)



349.9,.01     NAME                   0;1 POINTER TO AR TRANSMISSION TYPE FILE (#349.1) (Required)

              LAST EDITED:      AUG 20, 1996 
              DESCRIPTION:
                                This is the name of the segment/router.  

              CROSS-REFERENCE:  349.9^B 
                                1)= S ^RCT(349.9,"B",$E(X,1,30),DA)=""
                                2)= K ^RCT(349.9,"B",$E(X,1,30),DA)


349.9,.02     MESSAGE SEQUENCE RECEIVED 0;2 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 20, 1996 
              HELP-PROMPT:      Type a Number between 1 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This is the number of messages received.  


349.9,.03     LAST MESSAGE SEQUENCE RECEIVED 0;3 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 20, 1996 
              HELP-PROMPT:      Type a Number between 1 and 999, 0 Decimal Digits 
              DESCRIPTION:
                                This is the last message sequence number received.  


349.9,11      REMOTE USER            1;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      JUN 26, 1996 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                This is the user name at the remote address which receives the transmission.  


349.9,12      DOMAIN NAME            1;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      JUN 26, 1996 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                This is the name of the remote domain.  

              WRITE AUTHORITY:  ^
              NOTES:            TRIGGERED by the DOMAIN field of the AR TRANSMISSION SEGMENTS File 


349.9,13      DOMAIN                 1;3 POINTER TO DOMAIN FILE (#4.2)

              LAST EDITED:      JUN 26, 1996 
              DESCRIPTION:
                                This is the link to the DOMAIN file (4.2).  

              CROSS-REFERENCE:  ^^TRIGGER^349.9^12 
                                1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCT(349.9,D0,1)):^(1),1:"") S X=$P(Y(1),U,2),X=X S 
                                DIU=X K Y X ^DD(349.9,13,1,1,1.1) X ^DD(349.9,13,1,1,1.4)

                                1.1)= S X=DIV S I(0,0)=$S($D(D0):D0,1:""),D0=DIV S:'$D(^DIC(4.2,+D0,0)) D0=-1 S Y(101)=$S($D(^DIC(4
                                .2,D0,0)):^(0),1:"") S X=$P(Y(101),U,1) S D0=I(0,0)

                                1.4)= S DIH=$S($D(^RCT(349.9,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,2)=DIV,DIH=349.9,DIG=12 D ^DIC
                                R:$O(^DD(DIH,DIG,1,0))>0

                                2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCT(349.9,D0,1)):^(1),1:"") S X=$P(Y(1),U,2),X=X S 
                                DIU=X K Y X ^DD(349.9,13,1,1,2.1) X ^DD(349.9,13,1,1,2.4)

                                2.1)= S X=DIV X ^DD(349.9,13,1,1,59.2) S X=$P(Y(101),U,1) S D0=I(0,0)

                                2.4)= S DIH=$S($D(^RCT(349.9,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,2)=DIV,DIH=349.9,DIG=12 D ^DIC
                                R:$O(^DD(DIH,DIG,1,0))>0

                                59.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^RCT(349.9,D0,1)):^(1),1:""),D0=$P(Y(1),U,3) S:'$D(^D
                                IC(4.2,+D0,0)) D0=-1 S Y(101)=$S($D(^DIC(4.2,D0,0)):^(0),1:"")

                                CREATE VALUE)= DOMAIN:.01
                                DELETE VALUE)= DOMAIN:.01
                                FIELD)= DOMAIN NAME


349.9,21      ACTIVE                 2;1 SET

                                '1' FOR ACTIVE; 
                                '0' FOR NOT ACTIVE; 
              LAST EDITED:      JUN 26, 1996 
              DESCRIPTION:
                                This field indicates if the domain is actively receiving tranmissions from the AR software.  



      FILES POINTED TO                      FIELDS

AR TRANSMISSION TYPE (#349.1)     NAME (#.01)

DOMAIN (#4.2)                     DOMAIN (#13)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):