SNAX/CNM Manual
 SAMPLE PROGRAM: SENDING AND RECEIVING NMVT RUS
 Save^Connect^Id;
 Int(32)
 Tag,
 Temp^Tag;
 Literal
 ! object types 0=any or all, used with CONNECT,ACCEPT,
 ! DISCONNECT
 Pi^Sscp = 1, ! object type: SSCP
 Pi^Appl = 7, ! object type: APPL
 Pi^Lu = 14, ! object type: LU
 Pi^Pu = 15, ! object type: PU
 Pi^Line = 8; ! object type: LINE
 string
 ! (Rh + Ru)
 ! these are hard-coded examples of the NMVT requests and
 ! responses. The application would actually either build those
 ! RUs or pass ones actually received.
 ! An example of NMVT RTM request RU
 !44 Bytes:
 ReqNMVT = 'P' := [%H0B,%H80,%H00,%H41,
 %H03,%H8D,%H00,%H00,%H00,%H00,%H00,
 %H00,%H21,%H80,%H80,%H04,%H92,%H88,
 %H00,%H19,%H94,%HED,%H00,%HEC,%H00,
 %H00,%H00,%H01,%H00,%H00,%H00,%H00,
 %H00,%H00,%H00,%H04,%H00,%H0A,%H00,
 %H14,%H00,%H32,%H00,%H64],
 ! An example of a negative response of NMVT
 !10 Bytes:
 NMVTneg = 'P' := [%h8f,%h90,%h00,%h10,%h03,%h00,%h00,
 %h41,%h03,%h8D],
 ! An example of a positive response of NMVT
 !6 Bytes:
 NMVTpos = 'P' := [%h8b,%h80,%h00,%h41,%h03,%h8D],
 ! An example of an NMVT RTM reply RU
 !83 Bytes:
 RepNMVT = 'P' := [%H0B,%H80,%H00,%H41,%H03,%H8D,%H00,%H00,
 %H00,%H00,%H10,%H00,%H48,%H00,%H80,%H11,
 %H04,%H02,%H40,%H00,%H00,%H00,%H00,%H00,
 %H02,%H00,%H00,%H00,%H00,%H00,%H00,%H01,
 %H09,%H91,%H00,%H80,%H28,%HEC,%H00,%H06,
 %H02,%H07,%H42,%HEF,%H00,%H00,%H00,%H13,
 %H21,%H93,%H01,%H00,%H00,%H00,%H00,%H00,
 %H44,%H00,%H0A,%H00,%H14,%H00,%H32,%H00,
 %H64,%H00,%H00,%H00,%H00,%H00,%H00,%H00,
 %H00,%H00,%H00,%H00,%H00,%H00,%H00,%H00,
 %H07,%H02,%H45];
 B-3










