home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 14 / 14.iso / s / s005 / 52.ddi / SMM.LIB / COLLECT.SMM < prev    next >
Encoding:
INI File  |  1993-10-21  |  15.0 KB  |  1,459 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _default.sty
  5. [charset]
  6.     82
  7.     ANSI (Windows, IBM CP 1252)
  8. [PanoseFontTable]
  9.     4
  10.     5
  11.     Arial
  12.     257
  13.     257
  14.     257
  15.     257
  16.     257
  17.     Helvetica
  18.     2818
  19.     1029
  20.     514
  21.     514
  22.     1026
  23.     Helv
  24.     2818
  25.     1029
  26.     514
  27.     770
  28.     1026
  29.     Times New Roman
  30.     514
  31.     774
  32.     1029
  33.     517
  34.     1027
  35. [revisions]
  36.     0
  37. [recfile]
  38.     
  39.     *
  40.     1
  41.     1
  42.     3
  43.     8
  44.     0
  45.     0
  46. [lang]
  47.     1
  48. [desc]
  49.     Collect default information for automated style sheets
  50.     
  51.     
  52.     
  53.     
  54.     751229013
  55.     1
  56.     750620291
  57.     62
  58.     0
  59.     0
  60.     0
  61.     0
  62.     0
  63.     
  64.     
  65.     
  66.     
  67.     
  68.     
  69.     1
  70. [prn]
  71.     QMS-PS 810
  72. [port]
  73.     NW:\\SPEEDY\QMS
  74. [fopts]
  75.     0
  76.     1
  77.     0
  78.     0
  79. [lnopts]
  80.     2
  81.     Body Text
  82.     1
  83. [docopts]
  84.     5
  85.     2
  86. [GramStyle]
  87.     
  88. [tag]
  89.     Outline3
  90.     1
  91.     [fnt]
  92.         Times New Roman
  93.         200
  94.         0
  95.         49152
  96.     [algn]
  97.         1
  98.         1
  99.         0
  100.         0
  101.         0
  102.     [spc]
  103.         33
  104.         0
  105.         1
  106.         72
  107.         72
  108.         1
  109.         100
  110.     [brk]
  111.         4
  112.     [line]
  113.         8
  114.         0
  115.         1
  116.         0
  117.         0
  118.         1
  119.         1
  120.         144
  121.         144
  122.         1
  123.     [spec]
  124.         0
  125.         3
  126.         
  127.         0
  128.         1
  129.         1
  130.         0
  131.         0
  132.         0
  133.         0
  134.     [nfmt]
  135.         272
  136.         1
  137.         2
  138.         .
  139.         ,
  140.         $
  141.     Outline3
  142.     0
  143.     0
  144. [tag]
  145.     Outline4
  146.     1
  147.     [fnt]
  148.         Times New Roman
  149.         200
  150.         0
  151.         49152
  152.     [algn]
  153.         1
  154.         1
  155.         0
  156.         0
  157.         0
  158.     [spc]
  159.         33
  160.         0
  161.         1
  162.         72
  163.         72
  164.         1
  165.         100
  166.     [brk]
  167.         4
  168.     [line]
  169.         8
  170.         0
  171.         1
  172.         0
  173.         0
  174.         1
  175.         1
  176.         144
  177.         144
  178.         1
  179.     [spec]
  180.         0
  181.         4
  182.         
  183.         0
  184.         1
  185.         1
  186.         0
  187.         0
  188.         0
  189.         0
  190.     [nfmt]
  191.         272
  192.         1
  193.         2
  194.         .
  195.         ,
  196.         $
  197.     Outline4
  198.     0
  199.     0
  200. [tag]
  201.     Outline1
  202.     1
  203.     [fnt]
  204.         Times New Roman
  205.         240
  206.         0
  207.         49153
  208.     [algn]
  209.         1
  210.         1
  211.         0
  212.         0
  213.         0
  214.     [spc]
  215.         33
  216.         0
  217.         1
  218.         72
  219.         0
  220.         1
  221.         100
  222.     [brk]
  223.         16
  224.     [line]
  225.         8
  226.         0
  227.         1
  228.         0
  229.         0
  230.         1
  231.         1
  232.         144
  233.         144
  234.         1
  235.     [spec]
  236.         0
  237.         1
  238.         
  239.         0
  240.         1
  241.         1
  242.         0
  243.         0
  244.         0
  245.         0
  246.     [nfmt]
  247.         272
  248.         1
  249.         2
  250.         .
  251.         ,
  252.         $
  253.     Outline1
  254.     0
  255.     0
  256. [tag]
  257.     Outline2
  258.     1
  259.     [fnt]
  260.         Times New Roman
  261.         200
  262.         0
  263.         49152
  264.     [algn]
  265.         1
  266.         1
  267.         216
  268.         0
  269.         0
  270.     [spc]
  271.         33
  272.         0
  273.         1
  274.         0
  275.         0
  276.         1
  277.         100
  278.     [brk]
  279.         4
  280.     [line]
  281.         8
  282.         0
  283.         1
  284.         0
  285.         0
  286.         1
  287.         1
  288.         144
  289.         144
  290.         1
  291.     [spec]
  292.         0
  293.         2
  294.         
  295.         0
  296.         1
  297.         1
  298.         0
  299.         16
  300.         0
  301.         0
  302.     [nfmt]
  303.         272
  304.         1
  305.         3
  306.         .
  307.         ,
  308.         $
  309.     Outline2
  310.     0
  311.     0
  312. [tag]
  313.     Footer
  314.     11
  315.     [fnt]
  316.         Times New Roman
  317.         240
  318.         0
  319.         49152
  320.     [algn]
  321.         1
  322.         1
  323.         0
  324.         0
  325.         0
  326.     [spc]
  327.         33
  328.         0
  329.         1
  330.         0
  331.         0
  332.         1
  333.         100
  334.     [brk]
  335.         4
  336.     [line]
  337.         8
  338.         0
  339.         1
  340.         0
  341.         0
  342.         1
  343.         1
  344.         144
  345.         144
  346.         1
  347.     [spec]
  348.         0
  349.         0
  350.         
  351.         0
  352.         1
  353.         1
  354.         0
  355.         0
  356.         0
  357.         0
  358.     [nfmt]
  359.         280
  360.         1
  361.         2
  362.         .
  363.         ,
  364.         $
  365.     Footer
  366.     0
  367.     0
  368. [tag]
  369.     Header
  370.     9
  371.     [fnt]
  372.         Times New Roman
  373.         240
  374.         0
  375.         49152
  376.     [algn]
  377.         1
  378.         1
  379.         0
  380.         0
  381.         0
  382.     [spc]
  383.         33
  384.         0
  385.         1
  386.         0
  387.         0
  388.         1
  389.         100
  390.     [brk]
  391.         4
  392.     [line]
  393.         8
  394.         0
  395.         1
  396.         0
  397.         0
  398.         1
  399.         1
  400.         144
  401.         144
  402.         1
  403.     [spec]
  404.         0
  405.         0
  406.         
  407.         0
  408.         1
  409.         1
  410.         0
  411.         0
  412.         0
  413.         0
  414.     [nfmt]
  415.         280
  416.         1
  417.         2
  418.         .
  419.         ,
  420.         $
  421.     Header
  422.     0
  423.     0
  424. [tag]
  425.     Title
  426.     8
  427.     [fnt]
  428.         Helvetica
  429.         280
  430.         0
  431.         49153
  432.     [algn]
  433.         1
  434.         1
  435.         0
  436.         0
  437.         0
  438.     [spc]
  439.         33
  440.         0
  441.         1
  442.         144
  443.         72
  444.         1
  445.         100
  446.     [brk]
  447.         16
  448.     [line]
  449.         8
  450.         0
  451.         1
  452.         0
  453.         0
  454.         1
  455.         1
  456.         144
  457.         144
  458.         1
  459.     [spec]
  460.         0
  461.         1
  462.         
  463.         0
  464.         1
  465.         1
  466.         0
  467.         0
  468.         0
  469.         0
  470.     [nfmt]
  471.         272
  472.         1
  473.         2
  474.         .
  475.         ,
  476.         $
  477.     Title
  478.     0
  479.     0
  480. [tag]
  481.     Subhead
  482.     7
  483.     [fnt]
  484.         Times New Roman
  485.         240
  486.         0
  487.         49152
  488.     [algn]
  489.         1
  490.         1
  491.         0
  492.         0
  493.         0
  494.     [spc]
  495.         33
  496.         0
  497.         1
  498.         72
  499.         72
  500.         1
  501.         100
  502.     [brk]
  503.         4
  504.     [line]
  505.         8
  506.         0
  507.         1
  508.         0
  509.         0
  510.         1
  511.         1
  512.         144
  513.         144
  514.         1
  515.     [spec]
  516.         0
  517.         2
  518.         
  519.         0
  520.         1
  521.         1
  522.         0
  523.         0
  524.         0
  525.         0
  526.     [nfmt]
  527.         272
  528.         1
  529.         2
  530.         .
  531.         ,
  532.         $
  533.     Subhead
  534.     0
  535.     0
  536. [tag]
  537.     Number List
  538.     6
  539.     [fnt]
  540.         Times New Roman
  541.         240
  542.         0
  543.         49152
  544.     [algn]
  545.         1
  546.         1
  547.         360
  548.         360
  549.         360
  550.     [spc]
  551.         33
  552.         0
  553.         1
  554.         0
  555.         0
  556.         1
  557.         100
  558.     [brk]
  559.         4
  560.     [line]
  561.         8
  562.         0
  563.         1
  564.         0
  565.         0
  566.         1
  567.         1
  568.         144
  569.         144
  570.         1
  571.     [spec]
  572.         0
  573.         0
  574.         <*:>.
  575.         0
  576.         1
  577.         1
  578.         0
  579.         16
  580.         0
  581.         0
  582.     [nfmt]
  583.         272
  584.         1
  585.         2
  586.         .
  587.         ,
  588.         $
  589.     Number List
  590.     0
  591.     0
  592. [tag]
  593.     Bullet 1
  594.     5
  595.     [fnt]
  596.         Times New Roman
  597.         240
  598.         0
  599.         49152
  600.     [algn]
  601.         1
  602.         1
  603.         288
  604.         288
  605.         288
  606.     [spc]
  607.         33
  608.         0
  609.         1
  610.         0
  611.         0
  612.         1
  613.         100
  614.     [brk]
  615.         4
  616.     [line]
  617.         8
  618.         0
  619.         1
  620.         0
  621.         0
  622.         1
  623.         1
  624.         144
  625.         144
  626.         1
  627.     [spec]
  628.         0
  629.         0
  630.         <*5>
  631.         0
  632.         1
  633.         1
  634.         0
  635.         0
  636.         0
  637.         0
  638.     [nfmt]
  639.         280
  640.         1
  641.         2
  642.         .
  643.         ,
  644.         $
  645.     Bullet 1
  646.     0
  647.     0
  648. [tag]
  649.     Bullet
  650.     4
  651.     [fnt]
  652.         Times New Roman
  653.         240
  654.         0
  655.         49152
  656.     [algn]
  657.         1
  658.         1
  659.         0
  660.         288
  661.         288
  662.     [spc]
  663.         33
  664.         0
  665.         1
  666.         0
  667.         0
  668.         1
  669.         100
  670.     [brk]
  671.         4
  672.     [line]
  673.         8
  674.         0
  675.         1
  676.         0
  677.         0
  678.         1
  679.         1
  680.         144
  681.         144
  682.         1
  683.     [spec]
  684.         0
  685.         0
  686.         <*0>
  687.         0
  688.         1
  689.         1
  690.         0
  691.         0
  692.         0
  693.         0
  694.     [nfmt]
  695.         272
  696.         1
  697.         2
  698.         .
  699.         ,
  700.         $
  701.     Bullet
  702.     0
  703.     0
  704. [tag]
  705.     Body Single
  706.     3
  707.     [fnt]
  708.         Times New Roman
  709.         240
  710.         0
  711.         49152
  712.     [algn]
  713.         1
  714.         1
  715.         0
  716.         0
  717.         0
  718.     [spc]
  719.         33
  720.         0
  721.         1
  722.         0
  723.         0
  724.         1
  725.         100
  726.     [brk]
  727.         4
  728.     [line]
  729.         8
  730.         0
  731.         1
  732.         0
  733.         0
  734.         1
  735.         1
  736.         144
  737.         144
  738.         1
  739.     [spec]
  740.         0
  741.         0
  742.         
  743.         0
  744.         1
  745.         1
  746.         0
  747.         0
  748.         0
  749.         0
  750.     [nfmt]
  751.         280
  752.         1
  753.         2
  754.         .
  755.         ,
  756.         $
  757.     Body Single
  758.     0
  759.     0
  760. [tag]
  761.     Body Text
  762.     2
  763.     [fnt]
  764.         Times New Roman
  765.         240
  766.         0
  767.         49152
  768.     [algn]
  769.         1
  770.         1
  771.         0
  772.         0
  773.         0
  774.     [spc]
  775.         33
  776.         0
  777.         1
  778.         0
  779.         0
  780.         1
  781.         100
  782.     [brk]
  783.         4
  784.     [line]
  785.         8
  786.         0
  787.         1
  788.         0
  789.         0
  790.         1
  791.         1
  792.         144
  793.         144
  794.         1
  795.     [spec]
  796.         0
  797.         0
  798.         
  799.         0
  800.         1
  801.         1
  802.         0
  803.         0
  804.         0
  805.         0
  806.     [nfmt]
  807.         280
  808.         1
  809.         2
  810.         .
  811.         ,
  812.         $
  813.     Body Text
  814.     0
  815.     0
  816. [lay]
  817.     Standard
  818.     513
  819.     [rght]
  820.         15840
  821.         12240
  822.         1
  823.         1440
  824.         1440
  825.         1
  826.         1440
  827.         1440
  828.         0
  829.         1
  830.         0
  831.         1
  832.         0
  833.         2
  834.         1
  835.         1440
  836.         10800
  837.         12
  838.         1
  839.         720
  840.         1
  841.         1440
  842.         1
  843.         2160
  844.         1
  845.         2880
  846.         1
  847.         3600
  848.         1
  849.         4320
  850.         1
  851.         5040
  852.         1
  853.         5760
  854.         1
  855.         6480
  856.         1
  857.         7200
  858.         1
  859.         7920
  860.         1
  861.         8640
  862.     [frght]
  863.     [lyfrm]
  864.         0
  865.         13184
  866.         0
  867.         14400
  868.         12240
  869.         15840
  870.         0
  871.         1
  872.         1
  873.         0 0 0 0 0 0 0
  874.         0
  875.         16777215
  876.         0
  877.     [frmlay]
  878.         15840
  879.         12240
  880.         1
  881.         1440
  882.         792
  883.         1
  884.         14472
  885.         1440
  886.         0
  887.         1
  888.         0
  889.         0
  890.         0
  891.         0
  892.         1
  893.         1440
  894.         10800
  895.         2
  896.         2
  897.         4680
  898.         3
  899.         9360
  900.     [txt]
  901. <:s>
  902.  
  903. >
  904.     [hrght]
  905.     [lyfrm]
  906.         0
  907.         11136
  908.         0
  909.         0
  910.         12240
  911.         1440
  912.         0
  913.         1
  914.         1
  915.         0 0 0 0 0 0 0
  916.         0
  917.         16777215
  918.         0
  919.     [frmlay]
  920.         1440
  921.         12240
  922.         1
  923.         1440
  924.         72
  925.         1
  926.         792
  927.         1440
  928.         0
  929.         1
  930.         0
  931.         0
  932.         0
  933.         0
  934.         1
  935.         1440
  936.         10800
  937.         2
  938.         2
  939.         4680
  940.         3
  941.         9360
  942.     [txt]
  943. <:s>
  944.  
  945. >
  946. [elay]
  947. [lay]
  948.     1
  949.     513
  950.     [rght]
  951.         15840
  952.         12240
  953.         1
  954.         1440
  955.         1440
  956.         1
  957.         1440
  958.         1440
  959.         0
  960.         0
  961.         16777215
  962.         1
  963.         0
  964.         2
  965.         1
  966.         1440
  967.         10800
  968.         12
  969.         1
  970.         720
  971.         1
  972.         1440
  973.         1
  974.         2160
  975.         1
  976.         2880
  977.         1
  978.         3600
  979.         1
  980.         4320
  981.         1
  982.         5040
  983.         1
  984.         5760
  985.         1
  986.         6480
  987.         1
  988.         7200
  989.         1
  990.         7920
  991.         1
  992.         8640
  993.     [frght]
  994.     [lyfrm]
  995.         0
  996.         13184
  997.         0
  998.         14400
  999.         12240
  1000.         15840
  1001.         0
  1002.         1
  1003.         1
  1004.         0 0 0 0 0 0 0
  1005.         0
  1006.         16777215
  1007.         0
  1008.     [frmlay]
  1009.         15840
  1010.         12240
  1011.         1
  1012.         1440
  1013.         792
  1014.         1
  1015.         14472
  1016.         1440
  1017.         0
  1018.         0
  1019.         16777215
  1020.         0
  1021.         0
  1022.         0
  1023.         1
  1024.         1440
  1025.         10800
  1026.         2
  1027.         2
  1028.         4680
  1029.         3
  1030.         9360
  1031.     [txt]
  1032. <:s><:#P30670848,P943718>
  1033.  
  1034. >
  1035.     [hrght]
  1036.     [lyfrm]
  1037.         0
  1038.         11136
  1039.         0
  1040.         0
  1041.         12240
  1042.         1440
  1043.         0
  1044.         1
  1045.         1
  1046.         0 0 0 0 0 0 0
  1047.         0
  1048.         16777215
  1049.         0
  1050.     [frmlay]
  1051.         1440
  1052.         12240
  1053.         1
  1054.         1440
  1055.         72
  1056.         1
  1057.         792
  1058.         1440
  1059.         0
  1060.         0
  1061.         16777215
  1062.         0
  1063.         0
  1064.         0
  1065.         1
  1066.         1440
  1067.         10800
  1068.         2
  1069.         2
  1070.         4680
  1071.         3
  1072.         9360
  1073.     [txt]
  1074. <:s><:#P30670848,P943718>
  1075.  
  1076. >
  1077. [elay]
  1078. [l1]
  1079.     1
  1080. [edoc]
  1081. @Outline3@<:s><:#P30670848,P802161><:X3,0;Include "amixlate.sam!collect">'declares and defines
  1082.  
  1083. @Outline3@<:s>define MSG_BOXTEXT    "Type the information that you would like for your automated style sheets."<:X~3,0;Include "amixlate.sam!collect">
  1084.  
  1085. @Title@<:s><:#P30670848,P1132462>function datacollector()
  1086.  
  1087. @Subhead@<:s><:#P30670848,P943718>name=""
  1088.  
  1089. @Subhead@<:s><:#P30670848,P943718>title=""
  1090.  
  1091. @Subhead@<:s><:#P30670848,P943718>company=""
  1092.  
  1093. @Subhead@<:s><:#P30670848,P943718>address1=""
  1094.  
  1095. @Subhead@<:s><:#P30670848,P943718>address2=""
  1096.  
  1097. @Subhead@<:s><:#P30670848,P943718>csz=""
  1098.  
  1099. @Subhead@<:s><:#P30670848,P943718>phone=""
  1100.  
  1101. @Subhead@<:s><:#P30670848,P943718>fax=""
  1102.  
  1103. @Subhead@<:s><:#P30670848,P943718>rmac=getrunningmacrofile$()
  1104.  
  1105. @Subhead@<:s><:#P30670848,P943718>DataGood=getprofilestring$("AutoStyleSheets", "DataGood", "AMIPRO2.INI")
  1106.  
  1107. @Subhead@<:s><:#P30670848,P943718>if DataGood = ""
  1108.  
  1109. @Subhead@<:s><:#P30670848,P943718>    writeprofilestring("AutoStyleSheets", "DataGood", 0, "AMIPRO2.INI")
  1110.  
  1111. @Subhead@<:s><:#P30670848,P943718>elseif DataGood = 1
  1112.  
  1113. @Outline3@<:s><:#P30670848,P802161>'read it in
  1114.  
  1115. @Outline4@<:s><:#P30670848,P802161>name=getprofilestring$("AutoStyleSheets", "Name", "AMIPRO2.INI")
  1116.  
  1117. @Outline4@<:s><:#P30670848,P802161>title=getprofilestring$("AutoStyleSheets", "Title", "AMIPRO2.INI")
  1118.  
  1119. @Outline4@<:s><:#P30670848,P802161>company=getprofilestring$("AutoStyleSheets", "Company", "AMIPRO2.INI")
  1120.  
  1121. @Outline4@<:s><:#P30670848,P802161>address1=getprofilestring$("AutoStyleSheets", "Address1", "AMIPRO2.INI")
  1122.  
  1123. @Outline4@<:s><:#P30670848,P802161>address2=getprofilestring$("AutoStyleSheets", "Address2", "AMIPRO2.INI")
  1124.  
  1125. @Outline4@<:s><:#P30670848,P802161>csz=getprofilestring$("AutoStyleSheets", "CSZ", "AMIPRO2.INI")
  1126.  
  1127. @Outline4@<:s><:#P30670848,P802161>phone=getprofilestring$("AutoStyleSheets", "Phone", "AMIPRO2.INI")
  1128.  
  1129. @Outline4@<:s><:#P30670848,P802161>fax=getprofilestring$("AutoStyleSheets", "Fax", "AMIPRO2.INI")
  1130.  
  1131. @Outline3@<:s><:#P30670848,P802161>goto boxer
  1132.  
  1133. @Subhead@<:s><:#P30670848,P943718>endif
  1134.  
  1135. @Subhead@<:s><:#P30670848,P943718>name=getprofilestring$("AmiPro", "UserName", "AMIPRO.INI")
  1136.  
  1137. @Subhead@<:s><:#P30670848,P943718>'check envelope info
  1138.  
  1139. @Outline3@<:s><:#P30670848,P802161>envretname=getprofilestring$("AmiEnv", "defretad", "AMIPRO2.INI")
  1140.  
  1141. @Outline3@<:s><:#P30670848,P802161>if envretname != ""
  1142.  
  1143. @Outline3@<:s><:#P30670848,P802161>    addressline=getprofilestring$("AdrsBook", envretname, "AMIPRO2.INI")
  1144.  
  1145. @Outline3@<:s><:#P30670848,P802161>    goodaddress=strfield$(addressline, 2, "*")
  1146.  
  1147. @Outline3@<:s><:#P30670848,P802161>    if goodaddress != (-1) and left$(goodaddress, 6) != "Type y"
  1148.  
  1149. @Outline3@<:s><:#P30670848,P802161>        address1=strfield$(addressline, 2, "*")
  1150.  
  1151. @Outline3@<:s><:#P30670848,P802161>        address2=strfield$(addressline, 3, "*")
  1152.  
  1153. @Outline3@<:s><:#P30670848,P802161>    endif
  1154.  
  1155. @Outline3@<:s><:#P30670848,P802161>endif
  1156.  
  1157. @Subhead@<:s><:#P30670848,P943718>boxer:
  1158.  
  1159. @Subhead@<:s><:#P30670848,P943718>'SetDlgCallback(0, "{rmac}!initdlg")
  1160.  
  1161. @Subhead@<:s><:#P30670848,P943718>'filledits
  1162.  
  1163. @Outline3@<:s><:#P30670848,P802161>filledit(1011, MSG_BOXTEXT)
  1164.  
  1165. @Outline3@<:s><:#P30670848,P802161>filledit(8000, name)
  1166.  
  1167. @Outline3@<:s><:#P30670848,P802161>filledit(8001, title)
  1168.  
  1169. @Outline3@<:s><:#P30670848,P802161>filledit(8002, company)
  1170.  
  1171. @Outline3@<:s><:#P30670848,P802161>filledit(8003, address1)
  1172.  
  1173. @Outline3@<:s><:#P30670848,P802161>filledit(8004, address2)
  1174.  
  1175. @Outline3@<:s><:#P30670848,P802161>filledit(8005, csz)
  1176.  
  1177. @Outline3@<:s><:#P30670848,P802161>filledit(8006, phone)
  1178.  
  1179. @Outline3@<:s><:#P30670848,P802161>filledit(8007, fax)
  1180.  
  1181. @Subhead@<:s><:#P30670848,P943718>box = dialogbox("collect.dlg", "collect")
  1182.  
  1183. @Subhead@<:s><:#P30670848,P943718>if box = 0 
  1184.  
  1185. @Subhead@<:s><:#P30670848,P943718>    exit function
  1186.  
  1187. @Subhead@<:s><:#P30670848,P943718>endif
  1188.  
  1189. @Subhead@<:s><:#P30670848,P943718>'get the stuff back out of the box
  1190.  
  1191. @Outline3@<:s><:#P30670848,P802161>name=getdialogfield$(8000)
  1192.  
  1193. @Outline3@<:s><:#P30670848,P802161>title=getdialogfield$(8001)
  1194.  
  1195. @Outline3@<:s><:#P30670848,P802161>company=getdialogfield$(8002)
  1196.  
  1197. @Outline3@<:s><:#P30670848,P802161>address1=getdialogfield$(8003) 
  1198.  
  1199. @Outline3@<:s><:#P30670848,P802161>address2=getdialogfield$(8004) 
  1200.  
  1201. @Outline3@<:s><:#P30670848,P802161>csz=getdialogfield$(8005)
  1202.  
  1203. @Outline3@<:s><:#P30670848,P802161>phone=getdialogfield$(8006)
  1204.  
  1205. @Outline3@<:s><:#P30670848,P802161>fax=getdialogfield$(8007)
  1206.  
  1207. @Subhead@<:s><:#P30670848,P943718>'write it out
  1208.  
  1209. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "Name", name, "AMIPRO2.INI")
  1210.  
  1211. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "Title", title, "AMIPRO2.INI")
  1212.  
  1213. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "Company", Company, "AMIPRO2.INI")
  1214.  
  1215. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "Address1", address1, "AMIPRO2.INI")
  1216.  
  1217. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "Address2", address2, "AMIPRO2.INI")
  1218.  
  1219. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "CSZ", csz, "AMIPRO2.INI")
  1220.  
  1221. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "Phone", phone, "AMIPRO2.INI")
  1222.  
  1223. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "Fax", fax, "AMIPRO2.INI")
  1224.  
  1225. @Outline3@<:s><:#P30670848,P802161>writeprofilestring("AutoStyleSheets", "DataGood", 1, "AMIPRO2.INI")
  1226.  
  1227. @Subhead@<:s><:#P30670848,P943718>'put envelope builder here
  1228.  
  1229. @Subhead@<:s><:#P30670848,P943718>end function
  1230.  
  1231. @Subhead@<:s><:#P30670848,P943718>
  1232. >
  1233.  
  1234. [Embedded]
  1235. 00012633
  1236. >
  1237. [macsum4] 1 14
  1238. datacollector 0 0 15 2
  1239. [macse]
  1240. 14 datacollector
  1241. 29 0 datacollector
  1242. 17 1
  1243. 29 1 name
  1244. 7 ""
  1245. 8 1
  1246. 17 2
  1247. 29 2 title
  1248. 7 ""
  1249. 8 2
  1250. 17 3
  1251. 29 3 company
  1252. 7 ""
  1253. 8 3
  1254. 17 4
  1255. 29 4 address1
  1256. 7 ""
  1257. 8 4
  1258. 17 5
  1259. 29 5 address2
  1260. 7 ""
  1261. 8 5
  1262. 17 6
  1263. 29 6 csz
  1264. 7 ""
  1265. 8 6
  1266. 17 7
  1267. 29 7 phone
  1268. 7 ""
  1269. 8 7
  1270. 17 8
  1271. 29 8 fax
  1272. 7 ""
  1273. 8 8
  1274. 17 9
  1275. 29 9 rmac
  1276. 0 802
  1277. 13
  1278. 8 9
  1279. 17 10
  1280. 29 10 DataGood
  1281. 0 286 "AutoStyleSheets" "DataGood" "AMIPRO2.INI"
  1282. 13
  1283. 8 10
  1284. 17 11
  1285. 6 10
  1286. 7 ""
  1287. 18 0
  1288. 11 00000499
  1289. 17 12
  1290. 0 287 "AutoStyleSheets" "DataGood" 0 "AMIPRO2.INI"
  1291. 10 00001063
  1292. 17 13
  1293. 6 10
  1294. 5 1
  1295. 18 0
  1296. 11 00001063
  1297. 17 15
  1298. 0 286 "AutoStyleSheets" "Name" "AMIPRO2.INI"
  1299. 13
  1300. 8 1
  1301. 17 16
  1302. 0 286 "AutoStyleSheets" "Title" "AMIPRO2.INI"
  1303. 13
  1304. 8 2
  1305. 17 17
  1306. 0 286 "AutoStyleSheets" "Company" "AMIPRO2.INI"
  1307. 13
  1308. 8 3
  1309. 17 18
  1310. 0 286 "AutoStyleSheets" "Address1" "AMIPRO2.INI"
  1311. 13
  1312. 8 4
  1313. 17 19
  1314. 0 286 "AutoStyleSheets" "Address2" "AMIPRO2.INI"
  1315. 13
  1316. 8 5
  1317. 17 20
  1318. 0 286 "AutoStyleSheets" "CSZ" "AMIPRO2.INI"
  1319. 13
  1320. 8 6
  1321. 17 21
  1322. 0 286 "AutoStyleSheets" "Phone" "AMIPRO2.INI"
  1323. 13
  1324. 8 7
  1325. 17 22
  1326. 0 286 "AutoStyleSheets" "Fax" "AMIPRO2.INI"
  1327. 13
  1328. 8 8
  1329. 17 23
  1330. 10 00001514
  1331. 17 25
  1332. 0 286 "AmiPro" "UserName" "AMIPRO.INI"
  1333. 13
  1334. 8 1
  1335. 17 27
  1336. 29 11 envretname
  1337. 0 286 "AmiEnv" "defretad" "AMIPRO2.INI"
  1338. 13
  1339. 8 11
  1340. 17 28
  1341. 6 11
  1342. 7 ""
  1343. 18 1
  1344. 11 00001514
  1345. 17 29
  1346. 29 12 addressline
  1347. 0 286 "AdrsBook" "{11}" "AMIPRO2.INI"
  1348. 13
  1349. 8 12
  1350. 17 30
  1351. 29 13 goodaddress
  1352. 0 20 "{12}" 2 "*"
  1353. 13
  1354. 8 13
  1355. 17 31
  1356. 6 13
  1357. 5 -1
  1358. 18 1
  1359. 0 806 "{13}" 6
  1360. 13
  1361. 7 "Type y"
  1362. 18 1
  1363. 1 1
  1364. 11 00001514
  1365. 17 32
  1366. 0 20 "{12}" 2 "*"
  1367. 13
  1368. 8 4
  1369. 17 33
  1370. 0 20 "{12}" 3 "*"
  1371. 13
  1372. 8 5
  1373. 17 39
  1374. 0 31 1011 "Type the information that you would like for your automated style sheets."
  1375. 17 40
  1376. 0 31 8000 "{1}"
  1377. 17 41
  1378. 0 31 8001 "{2}"
  1379. 17 42
  1380. 0 31 8002 "{3}"
  1381. 17 43
  1382. 0 31 8003 "{4}"
  1383. 17 44
  1384. 0 31 8004 "{5}"
  1385. 17 45
  1386. 0 31 8005 "{6}"
  1387. 17 46
  1388. 0 31 8006 "{7}"
  1389. 17 47
  1390. 0 31 8007 "{8}"
  1391. 17 48
  1392. 29 14 box
  1393. 0 26 "collect.dlg" "collect"
  1394. 13
  1395. 8 14
  1396. 17 49
  1397. 6 14
  1398. 5 0
  1399. 18 0
  1400. 11 00001907
  1401. 6 0
  1402. 15
  1403. 9
  1404. 17 53
  1405. 0 27 8000
  1406. 13
  1407. 8 1
  1408. 17 54
  1409. 0 27 8001
  1410. 13
  1411. 8 2
  1412. 17 55
  1413. 0 27 8002
  1414. 13
  1415. 8 3
  1416. 17 56
  1417. 0 27 8003
  1418. 13
  1419. 8 4
  1420. 17 57
  1421. 0 27 8004
  1422. 13
  1423. 8 5
  1424. 17 58
  1425. 0 27 8005
  1426. 13
  1427. 8 6
  1428. 17 59
  1429. 0 27 8006
  1430. 13
  1431. 8 7
  1432. 17 60
  1433. 0 27 8007
  1434. 13
  1435. 8 8
  1436. 17 62
  1437. 0 287 "AutoStyleSheets" "Name" "{1}" "AMIPRO2.INI"
  1438. 17 63
  1439. 0 287 "AutoStyleSheets" "Title" "{2}" "AMIPRO2.INI"
  1440. 17 64
  1441. 0 287 "AutoStyleSheets" "Company" "{3}" "AMIPRO2.INI"
  1442. 17 65
  1443. 0 287 "AutoStyleSheets" "Address1" "{4}" "AMIPRO2.INI"
  1444. 17 66
  1445. 0 287 "AutoStyleSheets" "Address2" "{5}" "AMIPRO2.INI"
  1446. 17 67
  1447. 0 287 "AutoStyleSheets" "CSZ" "{6}" "AMIPRO2.INI"
  1448. 17 68
  1449. 0 287 "AutoStyleSheets" "Phone" "{7}" "AMIPRO2.INI"
  1450. 17 69
  1451. 0 287 "AutoStyleSheets" "Fax" "{8}" "AMIPRO2.INI"
  1452. 17 70
  1453. 0 287 "AutoStyleSheets" "DataGood" 1 "AMIPRO2.INI"
  1454. 6 0
  1455. 15
  1456. 17 72
  1457. 9
  1458. 00012658
  1459.