home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / gened10.zip / TEST0.ASN < prev    next >
Text File  |  1996-04-03  |  7KB  |  211 lines
  1. -- Module DDM0
  2.  
  3. DDM0 DEFINITIONS
  4.     IMPLICIT TAGS ::=
  5. BEGIN    -- start of DDM Module
  6.  
  7.  EXPORTS Req10;
  8.  IMPORTS Req9 FROM DDM1;
  9.  
  10.  pippo INTEGER ::= 4
  11.  pippo2 OCTET STRING ::= '0011'H
  12.  
  13.  Req ::= SEQUENCE{
  14.           cmd1 Req0,
  15.           cmd2 [GDSSEGLL 'BBCC'H, 10] PrintableString,
  16.           cmd3 [GDSSEGLL 'AABBCC'H, 10] PrintableString,
  17.           cmd4 [GDSSEGLL 10] PrintableString,
  18.           cmd5 [GDSSEGISS 'AABBCC'H, 20] PrintableString,
  19.           cmd6 [GDSSEGLL 'BBCC'H, 10] OCTET STRING,
  20.           cmd7 [GDSSEGLL 10] OCTET STRING,
  21.           cmd8 [GDSSEGISS 'AABBCC'H, 20] OCTET STRING
  22.          }
  23.  
  24.  Req0 ::= [GDSSEGISS '00CCDD'H, 50] SET SIZE (0..100) OF Req1
  25.  
  26.  Req1 ::= [GDSLT 'AA'H, 2] SET{
  27.            cmd1 [GDSTL 'AABB'H] ENUMERATED{num1(0), num2(1)},
  28.            cmd2 [GDSLT 'CCDDEE'H, 2] INTEGER (5..10),
  29.            cmd3 Req3,
  30.            cmd4 Req2 DEFAULT num1,
  31.            cmd5 Req4 DEFAULT pippo,
  32.            cmd6 Req9
  33.            }
  34.  
  35.  Req2 ::= [GDSUNKNLT '44'H, '77'H] ENUMERATED{num1(0), num2(1)}
  36.  
  37.  Req3 ::= [GDSTL '000000'H, 2] SEQUENCE{
  38.            cmd1 [GDSTL 'AABB'H] OCTET STRING,
  39.            cmd2 [GDSTL 'CCDDEE'H, 2] PrintableString (SIZE(1..10)),
  40.            cmd3 [GDSLT 'AABB'H] OCTET STRING DEFAULT 'FFFF'H,
  41.            cmd4 [GDSLT 'CCDDEE'H, 2] PrintableString OPTIONAL,
  42.            cmd5 [GDSLENGTH 2] OCTET STRING,
  43.            cmd6 [GDSLENGTH 1] PrintableString,
  44.            cmd7 [GDSFLEN 2] OCTET STRING,
  45.            cmd8 [GDSFLEN 1] PrintableString,
  46.            cmd9 [GDSUNKNLT '44'H, '77'H] PrintableString,
  47.            cmd10 [GDSUNKNLT '88'H] OCTET STRING,
  48.            cmd11 [GDSLENGTH 1] INTEGER,
  49.            cmd12 [GDSFLEN 2] INTEGER,
  50.            cmd13 Req5,
  51.            cmd14 Req11
  52.            }
  53.  
  54.  Req4 ::= [GDSUNKNLT 'CCDD'H] INTEGER
  55.  
  56.  Req5 ::= [GDSLENGTH 2] SEQUENCE{
  57.            cmd1 [GDSTL 'AABB'H] NULL,
  58.            cmd2 [GDSTL 'CCDDEE'H, 2] BOOLEAN,
  59.            cmd3 [GDSLT 'AABB'H] BOOLEAN DEFAULT TRUE,
  60.            cmd4 [GDSLT 'CCDDEE'H, 2] NULL OPTIONAL,
  61.            cmd7 [GDSUNIQUE '001122'H] BOOLEAN,
  62.            cmd8 [GDSUNIQUE '00'H] NULL,
  63.            cmd9 BOOLEAN,
  64.            cmd10 [GDSUNKNLT '44'H, '77'H] NULL OPTIONAL,
  65.            cmd11 [GDSUNKNLT '88'H] BOOLEAN OPTIONAL,
  66.            cmd12 Req6,
  67.            cmd13 Req7
  68.            }
  69.  
  70.  
  71.  Req6 ::= [GDSFLEN 30] SET{
  72.            cmd1 [GDSUNIQUE '7896'H] SEQUENCE{
  73.                                      cmd1 [GDSFLEN 2] OCTET STRING,
  74.                                      cmd2 [GDSTL 'CCDDEE'H, 2] PrintableString
  75.                                      } OPTIONAL,
  76.            cmd2 Req8
  77.            }
  78.  
  79.  Req7 ::= SEQUENCE{
  80.            cmd1 [GDSTL '7FFFFFFF'H, 2] PrintableString,
  81.            cmd2 [GDSLT 'AABB'H] OCTET STRING DEFAULT 'FFFF'H,
  82.            cmd3 [GDSOccursWhenLKAHD 'CCDDEE'H, 2]
  83.                 SEQUENCE{
  84.                  cmd1 [GDSFLEN 2] OCTET STRING,
  85.                  cmd2 [GDSTL 'CCDDEE'H, 2] PrintableString
  86.                  } OPTIONAL
  87.            }
  88.  
  89.  Req8 ::= CHOICE{
  90.             cmd1 [GDSLT '1122'H] PrintableString,
  91.             cmd2 [GDSUNIQUE pippo2] NULL
  92.            }
  93.  
  94.  Req10 ::= [GDSUNIQUE 'BBCC'H] SEQUENCE{
  95.            cmd1 [GDSTL '7F'H] PrintableString,
  96.            cmd2 [GDSTL '8F'H] OCTET STRING
  97.           }
  98.  
  99.  Req11 ::= [GDSUNKNLT] SEQUENCE{
  100.            cmd1 [GDSTL 'AA'H] PrintableString,
  101.            cmd2 [GDSTL 'BB'H] OCTET STRING
  102.           }
  103.  
  104. END      -- end of DDM0 Module
  105.  
  106. -- Module DDM1
  107.  
  108. DDM1 DEFINITIONS
  109.     IMPLICIT TAGS ::=
  110. BEGIN    -- start of DDM1 Module
  111.  
  112.  EXPORTS Req9;
  113.  IMPORTS Req10 FROM DDM0;
  114.  
  115.  pippo INTEGER ::= 4
  116.  pippo2 OCTET STRING ::= '0011'H
  117.  
  118.  
  119.  Req ::= SEQUENCE{
  120.           cmd1 Req0,
  121.           cmd2 [GDSSEGLL 'BBCC'H, 10] PrintableString,
  122.           cmd3 [GDSSEGLL 'AABBCC'H, 10] PrintableString,
  123.           cmd4 [GDSSEGLL 10] PrintableString,
  124.           cmd5 [GDSSEGISS 'AABBCC'H, 20] PrintableString,
  125.           cmd6 [GDSSEGLL 'BBCC'H, 10] OCTET STRING,
  126.           cmd7 [GDSSEGLL 10] OCTET STRING,
  127.           cmd8 [GDSSEGISS 'AABBCC'H, 20] OCTET STRING
  128.          }
  129.  
  130.  Req0 ::= [GDSSEGISS '00CCDD'H, 50] SET SIZE (0..100) OF Req1
  131.  
  132.  Req1 ::= [GDSLT 'AA'H, 2] SET{
  133.            cmd1 [GDSTL 'AABB'H] ENUMERATED{num1(0), num2(1)},
  134.            cmd2 [GDSLT 'CCDDEE'H, 2] INTEGER,
  135.            cmd3 Req3,
  136.            cmd4 Req2 DEFAULT num1,
  137.            cmd5 Req4 DEFAULT pippo,
  138.            cmd6 Req10
  139.            }
  140.  
  141.  Req2 ::= [GDSUNKNLT '44'H, '77'H] ENUMERATED{num1(0), num2(1)}
  142.  
  143.  Req3 ::= [GDSTL '000000'H, 2] SEQUENCE{
  144.            cmd1 [GDSTL 'AABB'H] OCTET STRING,
  145.            cmd2 [GDSTL 'CCDDEE'H, 2] PrintableString,
  146.            cmd3 [GDSLT 'AABB'H] OCTET STRING DEFAULT 'FFFF'H,
  147.            cmd4 [GDSLT 'CCDDEE'H, 2] PrintableString OPTIONAL,
  148.            cmd5 [GDSLENGTH 2] OCTET STRING,
  149.            cmd6 [GDSLENGTH 1] PrintableString,
  150.            cmd7 [GDSFLEN 2] OCTET STRING,
  151.            cmd8 [GDSFLEN 1] PrintableString,
  152.            cmd9 [GDSLT '55'H] PrintableString OPTIONAL,
  153.            cmd10 [GDSLT '88'H] OCTET STRING OPTIONAL,
  154.            cmd11 [GDSLENGTH 1] INTEGER,
  155.            cmd12 [GDSFLEN 2] INTEGER,
  156.            cmd13 Req5,
  157.            cmd14 Req11
  158.            }
  159.  
  160.  Req4 ::= [GDSUNKNLT 'CCDD'H] INTEGER
  161.  
  162.  Req5 ::= [GDSLENGTH 2] SEQUENCE{
  163.            cmd1 [GDSTL 'AABB'H] NULL,
  164.            cmd2 [GDSTL 'CCDDEE'H, 2] BOOLEAN,
  165.            cmd3 [GDSLT 'AABB'H] BOOLEAN DEFAULT TRUE,
  166.            cmd4 [GDSLT 'CCDDEE'H, 2] NULL OPTIONAL,
  167.            cmd7 [GDSUNIQUE '001122'H] BOOLEAN,
  168.            cmd8 [GDSUNIQUE '00'H] NULL,
  169.            cmd9 BOOLEAN,
  170.            cmd10 [GDSLT '77'H] NULL OPTIONAL,
  171.            cmd11 [GDSLT '88'H] BOOLEAN OPTIONAL,
  172.            cmd12 Req6,
  173.            cmd13 Req7
  174.            }
  175.  
  176.  
  177.  Req6 ::= [GDSFLEN 30] SET{
  178.            cmd1 [GDSUNIQUE '7896'H] SEQUENCE{
  179.                                      cmd1 [GDSFLEN 2] OCTET STRING,
  180.                                      cmd2 [GDSTL 'CCDDEE'H, 2] PrintableString
  181.                                      } OPTIONAL,
  182.            cmd2 Req8
  183.            }
  184.  
  185.  Req7 ::= SEQUENCE{
  186.            cmd1 [GDSTL '7FFFFFFF'H, 2] PrintableString,
  187.            cmd2 [GDSLT 'AABB'H] OCTET STRING DEFAULT 'FFFF'H,
  188.            cmd3 [GDSOccursWhenLKAHD 'CCDDEE'H, 2]
  189.                 SEQUENCE{
  190.                  cmd1 [GDSFLEN 2] OCTET STRING,
  191.                  cmd2 [GDSTL 'CCDDEE'H, 2] PrintableString
  192.                  } OPTIONAL
  193.            }
  194.  
  195.  Req8 ::= CHOICE{
  196.             cmd1 [GDSLT '1122'H] PrintableString,
  197.             cmd2 [GDSUNIQUE pippo2] NULL
  198.            }
  199.  
  200.  Req9 ::= [GDSUNIQUE 'BBCC'H] SEQUENCE{
  201.            cmd1 [GDSTL '7F'H] PrintableString,
  202.            cmd2 [GDSTL '8F'H] OCTET STRING
  203.           }
  204.  
  205.  Req11 ::= SEQUENCE{
  206.             cmd1 [GDSTL 'AA'H] PrintableString,
  207.             cmd2 [GDSTL 'BB'H] OCTET STRING
  208.           }
  209.  
  210. END      -- end of DDM1 Module
  211.