home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 July & August / Pcwk78b98.iso / Smart30 / ENGLISH / PRODUCTS / LOTUS022.DSK / AMIFLTR.SMM < prev    next >
INI File  |  1994-08-01  |  30KB  |  2,180 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [recfile]
  12.     
  13.     
  14.     1
  15.     1
  16.     3
  17.     8
  18.     0
  19.     0
  20. [prn]
  21.     HP LaserJet IIISi
  22. [port]
  23.     LPT2.OS2
  24. [lang]
  25.     1
  26. [fldnames]
  27.     Field1
  28.     Field2
  29.     Field3
  30.     Field4
  31.     Field5
  32.     Field6
  33.     Field7
  34.     Field8
  35. [desc]
  36.     Temporary file created during export operation.
  37.     
  38.     
  39.     
  40.     
  41.     775777098
  42.     85
  43.     774229827
  44.     2027
  45.     9
  46.     0
  47.     0
  48.     0
  49.     0
  50.     
  51.     
  52.     
  53.     
  54.     
  55.     
  56.     1
  57. [fopts]
  58.     0
  59.     1
  60.     0
  61.     0
  62.     
  63.     
  64. [lnopts]
  65.     2
  66.     Body Text
  67.     1
  68. [docopts]
  69.     5
  70.     2
  71. [GramStyle]
  72.     
  73. [ParaNum]
  74.     1
  75. [tag]
  76.     Body Text
  77.     2
  78.     [fnt]
  79.         Times New Roman
  80.         240
  81.         0
  82.         49152
  83.     [algn]
  84.         1
  85.         1
  86.         216
  87.         0
  88.         0
  89.     [spc]
  90.         33
  91.         0
  92.         1
  93.         0
  94.         0
  95.         1
  96.         100
  97.     [brk]
  98.         4
  99.     [line]
  100.         8
  101.         0
  102.         1
  103.         0
  104.         0
  105.         1
  106.         1
  107.         144
  108.         144
  109.         1
  110.     [spec]
  111.         0
  112.         2
  113.         
  114.         0
  115.         1
  116.         1
  117.         0
  118.         16
  119.         0
  120.         0
  121.     [nfmt]
  122.         280
  123.         1
  124.         2
  125.         .
  126.         ,
  127.         $
  128.     Body Text
  129.     0
  130.     0
  131. [tag]
  132.     Outline7
  133.     3
  134.     [fnt]
  135.         Times New Roman
  136.         240
  137.         0
  138.         49152
  139.     [algn]
  140.         1
  141.         1
  142.         1296
  143.         0
  144.         0
  145.     [spc]
  146.         33
  147.         0
  148.         1
  149.         0
  150.         0
  151.         1
  152.         100
  153.     [brk]
  154.         4
  155.     [line]
  156.         8
  157.         0
  158.         1
  159.         0
  160.         0
  161.         1
  162.         1
  163.         144
  164.         144
  165.         1
  166.     [spec]
  167.         0
  168.         7
  169.         
  170.         0
  171.         1
  172.         1
  173.         0
  174.         16
  175.         0
  176.         0
  177.     [nfmt]
  178.         280
  179.         1
  180.         2
  181.         .
  182.         ,
  183.         $
  184.     Body Text
  185.     0
  186.     0
  187. [tag]
  188.     Outline6
  189.     4
  190.     [fnt]
  191.         Times New Roman
  192.         240
  193.         0
  194.         49152
  195.     [algn]
  196.         1
  197.         1
  198.         1080
  199.         0
  200.         0
  201.     [spc]
  202.         33
  203.         0
  204.         1
  205.         0
  206.         0
  207.         1
  208.         100
  209.     [brk]
  210.         4
  211.     [line]
  212.         8
  213.         0
  214.         1
  215.         0
  216.         0
  217.         1
  218.         1
  219.         144
  220.         144
  221.         1
  222.     [spec]
  223.         0
  224.         6
  225.         
  226.         0
  227.         1
  228.         1
  229.         0
  230.         16
  231.         0
  232.         0
  233.     [nfmt]
  234.         280
  235.         1
  236.         2
  237.         .
  238.         ,
  239.         $
  240.     Body Text
  241.     0
  242.     0
  243. [tag]
  244.     Outline5
  245.     5
  246.     [fnt]
  247.         Times New Roman
  248.         240
  249.         0
  250.         49152
  251.     [algn]
  252.         1
  253.         1
  254.         864
  255.         0
  256.         0
  257.     [spc]
  258.         33
  259.         0
  260.         1
  261.         0
  262.         0
  263.         1
  264.         100
  265.     [brk]
  266.         4
  267.     [line]
  268.         8
  269.         0
  270.         1
  271.         0
  272.         0
  273.         1
  274.         1
  275.         144
  276.         144
  277.         1
  278.     [spec]
  279.         0
  280.         5
  281.         
  282.         0
  283.         1
  284.         1
  285.         0
  286.         16
  287.         0
  288.         0
  289.     [nfmt]
  290.         280
  291.         1
  292.         2
  293.         .
  294.         ,
  295.         $
  296.     Body Text
  297.     0
  298.     0
  299. [tag]
  300.     Outline4
  301.     6
  302.     [fnt]
  303.         Times New Roman
  304.         240
  305.         0
  306.         49152
  307.     [algn]
  308.         1
  309.         1
  310.         648
  311.         0
  312.         0
  313.     [spc]
  314.         33
  315.         0
  316.         1
  317.         0
  318.         0
  319.         1
  320.         100
  321.     [brk]
  322.         4
  323.     [line]
  324.         8
  325.         0
  326.         1
  327.         0
  328.         0
  329.         1
  330.         1
  331.         144
  332.         144
  333.         1
  334.     [spec]
  335.         0
  336.         4
  337.         
  338.         0
  339.         1
  340.         1
  341.         0
  342.         16
  343.         0
  344.         0
  345.     [nfmt]
  346.         280
  347.         1
  348.         2
  349.         .
  350.         ,
  351.         $
  352.     Body Text
  353.     0
  354.     0
  355. [tag]
  356.     Outline3
  357.     7
  358.     [fnt]
  359.         Times New Roman
  360.         240
  361.         0
  362.         49152
  363.     [algn]
  364.         1
  365.         1
  366.         432
  367.         0
  368.         0
  369.     [spc]
  370.         33
  371.         0
  372.         1
  373.         0
  374.         0
  375.         1
  376.         100
  377.     [brk]
  378.         4
  379.     [line]
  380.         8
  381.         0
  382.         1
  383.         0
  384.         0
  385.         1
  386.         1
  387.         144
  388.         144
  389.         1
  390.     [spec]
  391.         0
  392.         3
  393.         
  394.         0
  395.         1
  396.         1
  397.         0
  398.         16
  399.         0
  400.         0
  401.     [nfmt]
  402.         280
  403.         1
  404.         2
  405.         .
  406.         ,
  407.         $
  408.     Body Text
  409.     0
  410.     0
  411. [tag]
  412.     Function
  413.     8
  414.     [fnt]
  415.         Times New Roman
  416.         320
  417.         16711680
  418.         49152
  419.     [algn]
  420.         1
  421.         1
  422.         0
  423.         0
  424.         0
  425.     [spc]
  426.         33
  427.         0
  428.         1
  429.         0
  430.         0
  431.         1
  432.         100
  433.     [brk]
  434.         4
  435.     [line]
  436.         8
  437.         0
  438.         1
  439.         0
  440.         0
  441.         1
  442.         1
  443.         144
  444.         144
  445.         1
  446.     [spec]
  447.         0
  448.         1
  449.         
  450.         0
  451.         1
  452.         1
  453.         0
  454.         16
  455.         0
  456.         0
  457.     [nfmt]
  458.         280
  459.         1
  460.         2
  461.         .
  462.         ,
  463.         $
  464.     Body Text
  465.     0
  466.     0
  467. [tag]
  468.     Comments
  469.     9
  470.     [fnt]
  471.         Courier New
  472.         200
  473.         255
  474.         32768
  475.     [algn]
  476.         1
  477.         1
  478.         0
  479.         0
  480.         0
  481.     [spc]
  482.         33
  483.         0
  484.         1
  485.         0
  486.         0
  487.         1
  488.         100
  489.     [brk]
  490.         4
  491.     [line]
  492.         8
  493.         0
  494.         1
  495.         0
  496.         0
  497.         1
  498.         1
  499.         144
  500.         144
  501.         1
  502.     [spec]
  503.         0
  504.         0
  505.         
  506.         0
  507.         1
  508.         1
  509.         0
  510.         16
  511.         0
  512.         0
  513.     [nfmt]
  514.         280
  515.         1
  516.         2
  517.         .
  518.         ,
  519.         $
  520.     Comments
  521.     0
  522.     0
  523. [tag]
  524.     Defines
  525.     11
  526.     [fnt]
  527.         Courier New
  528.         200
  529.         16711680
  530.         32768
  531.     [algn]
  532.         1
  533.         1
  534.         0
  535.         0
  536.         0
  537.     [spc]
  538.         33
  539.         0
  540.         1
  541.         0
  542.         0
  543.         1
  544.         100
  545.     [brk]
  546.         4
  547.     [line]
  548.         8
  549.         0
  550.         1
  551.         0
  552.         0
  553.         1
  554.         1
  555.         144
  556.         144
  557.         1
  558.     [spec]
  559.         0
  560.         0
  561.         
  562.         0
  563.         1
  564.         1
  565.         0
  566.         16
  567.         0
  568.         0
  569.     [nfmt]
  570.         280
  571.         1
  572.         2
  573.         .
  574.         ,
  575.         $
  576.     Body Text
  577.     0
  578.     0
  579. [tag]
  580.     Outline8
  581.     12
  582.     [fnt]
  583.         Times New Roman
  584.         240
  585.         0
  586.         49152
  587.     [algn]
  588.         1
  589.         1
  590.         1512
  591.         0
  592.         0
  593.     [spc]
  594.         33
  595.         0
  596.         1
  597.         0
  598.         0
  599.         1
  600.         100
  601.     [brk]
  602.         4
  603.     [line]
  604.         8
  605.         0
  606.         1
  607.         0
  608.         0
  609.         1
  610.         1
  611.         144
  612.         144
  613.         1
  614.     [spec]
  615.         0
  616.         8
  617.         
  618.         0
  619.         1
  620.         1
  621.         0
  622.         16
  623.         0
  624.         0
  625.     [nfmt]
  626.         280
  627.         1
  628.         2
  629.         .
  630.         ,
  631.         $
  632.     Body Text
  633.     0
  634.     0
  635. [tag]
  636.     Outline9
  637.     0
  638.     [fnt]
  639.         Times New Roman
  640.         240
  641.         0
  642.         49152
  643.     [algn]
  644.         1
  645.         1
  646.         1728
  647.         0
  648.         0
  649.     [spc]
  650.         33
  651.         0
  652.         1
  653.         0
  654.         0
  655.         1
  656.         100
  657.     [brk]
  658.         4
  659.     [line]
  660.         8
  661.         0
  662.         1
  663.         0
  664.         0
  665.         1
  666.         1
  667.         144
  668.         144
  669.         1
  670.     [spec]
  671.         0
  672.         9
  673.         
  674.         0
  675.         1
  676.         1
  677.         0
  678.         16
  679.         0
  680.         0
  681.     [nfmt]
  682.         280
  683.         1
  684.         2
  685.         .
  686.         ,
  687.         $
  688.     Body Text
  689.     0
  690.     0
  691. [lay]
  692.     Standard
  693.     513
  694.     [rght]
  695.         15840
  696.         12240
  697.         1
  698.         360
  699.         1440
  700.         1
  701.         1440
  702.         360
  703.         0
  704.         1
  705.         0
  706.         1
  707.         0
  708.         2
  709.         1
  710.         360
  711.         11880
  712.         12
  713.         1
  714.         720
  715.         1
  716.         1440
  717.         1
  718.         2160
  719.         1
  720.         2880
  721.         1
  722.         3600
  723.         1
  724.         4320
  725.         1
  726.         5040
  727.         1
  728.         5760
  729.         1
  730.         6480
  731.         1
  732.         7200
  733.         1
  734.         7920
  735.         1
  736.         8640
  737.     [hrght]
  738.     [lyfrm]
  739.         1
  740.         11200
  741.         0
  742.         0
  743.         12240
  744.         1440
  745.         0
  746.         1
  747.         3
  748.         1 0 0 0 0 0 0
  749.         0
  750.         0
  751.         1
  752.     [frmlay]
  753.         1440
  754.         12240
  755.         1
  756.         1440
  757.         72
  758.         1
  759.         792
  760.         1440
  761.         0
  762.         1
  763.         0
  764.         1
  765.         1
  766.         0
  767.         1
  768.         1440
  769.         10800
  770.         2
  771.         2
  772.         4680
  773.         3
  774.         9360
  775.     [txt]
  776. >
  777.     [frght]
  778.     [lyfrm]
  779.         1
  780.         13248
  781.         0
  782.         14400
  783.         12240
  784.         15840
  785.         0
  786.         1
  787.         3
  788.         1 0 0 0 0 0 0
  789.         0
  790.         0
  791.         2
  792.     [frmlay]
  793.         15840
  794.         12240
  795.         1
  796.         1440
  797.         792
  798.         1
  799.         14472
  800.         1440
  801.         0
  802.         1
  803.         0
  804.         1
  805.         1
  806.         0
  807.         1
  808.         1440
  809.         10800
  810.         2
  811.         2
  812.         4680
  813.         3
  814.         9360
  815.     [txt]
  816. >
  817. [elay]
  818. [l1]
  819.     0
  820. [edoc]
  821. @Defines@<:#240,11520><:X3,-28672;OutlineMode()><:X~3,-28672;OutlineMode()>'International Define Area
  822.  
  823. @Defines@<:#240,11520>DEFINE PREVIEW_ERROR    "Preview not available for this filter."
  824.  
  825. @Defines@<:#240,11520>DEFINE EXISTS_ERROR    " already exists.  Do you want to overwrite it?"
  826.  
  827. @Defines@<:#240,11520>DEFINE ERROR1    "Error opening user file."
  828.  
  829. @Defines@<:#240,11520>DEFINE ERROR2    "Error during read."
  830.  
  831. @Defines@<:#240,11520>DEFINE ERROR3    "Error opening conversion file."
  832.  
  833. @Defines@<:#240,11520>DEFINE ERROR4    "Error during write."
  834.  
  835. @Defines@<:#240,11520>DEFINE ERROR5    "Invalid data in conversion."
  836.  
  837. @Defines@<:#240,11520>DEFINE ERROR6    "Error opening exception file."
  838.  
  839. @Defines@<:#240,11520>DEFINE ERROR7    "Error writing exception file."
  840.  
  841. @Defines@<:#240,11520>DEFINE ERROR8    "Error obtaining memory."
  842.  
  843. @Defines@<:#240,11520>DEFINE ERROR9    "Error invalid document."
  844.  
  845. @Defines@<:#240,11520>DEFINE ERROR10    "Error out of space on output."
  846.  
  847. @Defines@<:#240,11520>DEFINE ERROR11    "Conversion document too large for target."
  848.  
  849. @Defines@<:#240,11520>DEFINE ERROR12    "Warning - Possible error in conversion."
  850.  
  851. @Defines@<:#240,11520>DEFINE ERROR13    "Conversion canceled by the user."
  852.  
  853. @Defines@<:#240,11520>DEFINE ERROR14    "Incorrect option format."
  854.  
  855. @Defines@<:#240,11520>DEFINE ERROR15    "Unknown error."
  856.  
  857. @Defines@<:#240,11520>DEFINE ERROR16    "Fatal internal error."
  858.  
  859. @Defines@<:#240,11520>DEFINE ERROR17    "Error during seek."
  860.  
  861. @Defines@<:#240,11520>DEFINE ERROR18    "Error loading "
  862.  
  863. @Defines@<:#240,11520>DEFINE descrip    "Temporary file created during export operation."
  864.  
  865. @Defines@<:#240,11520>'End of International Define Area
  866.  
  867. @Defines@<:#240,11520>DECLARE Error(Stat)
  868.  
  869. @Defines@<:#240,11520>Declare AddBackslash(fn)
  870.  
  871. @Defines@<:#240,11520>Declare AddPeriod(fn)
  872.  
  873. @Defines@<:#240,11520>Declare FileNameFromPath(pn)
  874.  
  875. @Defines@<:#240,11520>Declare ChopExtension(pn)
  876.  
  877. @Defines@<:#240,11520>Define lock(hWnd)            DllCall("user,lockwindowupdate,hh",%1)
  878.  
  879. @Defines@<:#240,11520>Define GetActiveWindow()         DllCall("user,GetActiveWindow,H")
  880.  
  881. @Defines@<:#240,11520>
  882.  
  883. @Function@<:#384,11520>FUNCTION Main(IEInfo)
  884.  
  885. <:#288,11520>PreviewSwitch = strfield$(IEInfo,6,",")
  886.  
  887. <:#288,11520>If PreviewSwitch = "P"
  888.  
  889. @Outline3@<:#288,11520>Message(PREVIEW_ERROR,"Lotus Ami Pro")
  890.  
  891. @Outline3@<:#288,11520>Return (-1)
  892.  
  893. <:#288,11520>EndIf
  894.  
  895. <:#288,11520>IgnoreKeyboard(2)
  896.  
  897. <:#288,11520>HourGlass(1)
  898.  
  899. <:#288,11520>filtertype=strfield$(IEInfo,2,",")
  900.  
  901. <:#288,11520>filterinfo=GetProfileString$("Filters",filtertype,"AMIPRO2.INI")
  902.  
  903. <:#288,11520>IF filterinfo="" THEN
  904.  
  905. @Outline3@<:#288,11520>WriteProfileString("Filters","WordPerfect 6.0","w4w48f.dll,0,w4w48t.dll,0","AMIPRO2.INI")
  906.  
  907. @Outline3@<:#288,11520>WriteProfileString("Filters","Word for Windows 6.0","w4w49f.dll,0,w4w44t.dll,1","AMIPRO2.INI")
  908.  
  909. @Outline3@<:#288,11520>WriteProfileString("Filters","Q&A Write","w4w23f.dll,0,w4w23t.dll,0","AMIPRO2.INI")
  910.  
  911. @Outline3@<:#288,11520>WriteProfileString("Filters","XyWrite III ","w4w17f.dll,0,w4w17t.dll,0","AMIPRO2.INI")
  912.  
  913. @Outline3@<:#288,11520>WriteProfileString("Filters","XyWrite III Plus","w4w17f.dll,1,w4w17t.dll,1","AMIPRO2.INI")
  914.  
  915. @Outline3@<:#288,11520>WriteProfileString("Filters","XyWrite IV","w4w17f.dll,3,w4w17t.dll,3","AMIPRO2.INI")
  916.  
  917. @Outline3@<:#288,11520>WriteProfileString("Filters","Ami Pro","w4w33f.dll,1,w4w33t.dll,1","AMIPRO2.INI")
  918.  
  919. @Outline3@<:#288,11520>filterinfo=GetProfileString$("Filters",filtertype,"AMIPRO2.INI")
  920.  
  921. <:#288,11520>ENDIF
  922.  
  923. <:#288,11520>DefStr CallBack;
  924.  
  925. <:#288,11520>IEStatus=strfield$(IEInfo,3,",")
  926.  
  927. <:#288,11520>TempFileDir=DosGetEnv$("Temp")
  928.  
  929. <:#288,11520>If TempFileDir = ""
  930.  
  931. @Outline3@<:#288,11520>TempFileDir=GetWindowsDirectory$()
  932.  
  933. <:#288,11520>EndIf
  934.  
  935. <:#288,11520>AddBackslash(&TempFileDir)
  936.  
  937. <:#336,11520><:f280,2Times New Roman,0,0,255>IF IEStatus="I" THEN ' Begin Import<:f>
  938.  
  939. @Outline3@<:#288,11520>ccfstatus=strfield$(IEInfo,4,",")*128
  940.  
  941. @Outline3@<:#288,11520>IF strfield$(IEInfo,5,",")="I" THEN
  942.  
  943. @Outline4@<:#288,11520>insertstatus=8
  944.  
  945. @Outline3@<:#288,11520>ENDIF
  946.  
  947. @Outline3@<:#288,11520>fromdll=strfield$(filterinfo,1,",")
  948.  
  949. @Outline3@<:#288,11520>fromver=strfield$(filterinfo,2,",")
  950.  
  951. @Outline3@<:#288,11520>Id = DllLoadLib(fromdll,"w4wf","HCCCCJ")
  952.  
  953. @Outline3@<:#288,11520>IF Id=0 THEN
  954.  
  955. @Outline4@<:#288,11520>dispvar=strcat$(ERROR18,fromdll)
  956.  
  957. @Outline4@<:#288,11520>Message(dispvar, "Lotus Ami Pro")
  958.  
  959. @Outline4@<:#288,11520>goto CleanUpAndExit
  960.  
  961. @Outline3@<:#288,11520>ENDIF
  962.  
  963. @Outline3@<:#288,11520>OriginalFile = strfield$(IEInfo,1,",")
  964.  
  965. @Outline3@<:#288,11520>TempFileBase = FileNameFromPath(OriginalFile)
  966.  
  967. @Outline3@<:#288,11520>AddPeriod(&TempFileBase)
  968.  
  969. @Outline3@<:#288,11520>TempFileBase = Left$(TempFileBase,strchr(1,TempFileBase,"."))
  970.  
  971. @Outline3@<:#288,11520>TempFile = Right$(TempFileBase,8)
  972.  
  973. @Outline3@<:#288,11520>TempFile = strcat$(TempFileDir,"~",TempFile,"tmp")
  974.  
  975. @Outline3@<:#288,11520>Except = ""
  976.  
  977. @Outline3@<:#288,11520>Stat = DllCall("{fromdll},w4wf,HCCCCJ",OriginalFile,TempFile,fromver,Except,CallBack)
  978.  
  979. @Outline3@<:#288,11520>DllFreeLib(Id)
  980.  
  981. @Outline3@<:#288,11520>IF Stat<<<;>0 THEN
  982.  
  983. @Outline4@<:#288,11520>If FromDLL="w4w49f.dll"    'Word for Windows 6.0 filter chosen but failed
  984.  
  985. @Outline5@<:#288,11520>FileOpen(OriginalFile, 16+ccfStatus+insertStatus, "Word for Windows 2.0")
  986.  
  987. @Outline4@<:#288,11520>ElseIf FromDll="w4w48f.dll"    'WordPerfect 6 fitler chosen but failed
  988.  
  989. @Outline5@<:#288,11520>FileOpen(OriginalFile, 16+ccfStatus+insertStatus, "WordPerfect 5.x")
  990.  
  991. @Outline4@<:#288,11520>Else
  992.  
  993. @Outline5@<:#288,11520>Error(Stat)
  994.  
  995. @Outline4@<:#288,11520>EndIf
  996.  
  997. @Outline4@<:#288,11520>goto CleanUpAndExit
  998.  
  999. @Outline3@<:#288,11520>ENDIF
  1000.  
  1001. @Outline3@<:#288,11520>IF Id=0 THEN
  1002.  
  1003. @Outline4@<:#288,11520>dispvar=strcat$(ERROR18,fromdll)
  1004.  
  1005. @Outline4@<:#288,11520>Message(dispvar, "Lotus Ami Pro")
  1006.  
  1007. @Outline4@<:#288,11520>goto CleanUpAndExit
  1008.  
  1009. @Outline3@<:#288,11520>ENDIF
  1010.  
  1011. @Outline3@<:#288,11520>
  1012.  
  1013. @Outline3@<:#288,11520>'Code for creating FinalFile.
  1014.  
  1015. @Outline3@<:#288,11520>FinalFile = FileNameFromPath(TempFileBase)
  1016.  
  1017. @Outline3@<:#288,11520>AddPeriod(&FinalFile)
  1018.  
  1019. @Outline3@<:#288,11520>FinalFile = strcat$(Left$(FinalFile,strchr(1,FinalFile,".")),"SAM")
  1020.  
  1021. @Outline3@<:#288,11520>DocPath = GetDocPath$()
  1022.  
  1023. @Outline3@<:#288,11520>AddBackslash(&DocPath)
  1024.  
  1025. @Outline3@<:#288,11520>FinalFile = strcat$(DocPath,FinalFile)
  1026.  
  1027. @Outline3@<:#288,11520>
  1028.  
  1029. @Outline3@<:#288,11520>result = fopen(FinalFile, "r")
  1030.  
  1031. @Outline3@<:#288,11520>While (result != 0)
  1032.  
  1033. @Outline4@<:#288,11520>fclose(result)
  1034.  
  1035. @Outline4@<:#288,11520>ExistMessage = strcat$(UCASE$(FinalFile),EXISTS_ERROR)
  1036.  
  1037. @Outline4@<:#288,11520>FillEdit(1000,ExistMessage)
  1038.  
  1039. @Outline4@<:#288,11520>decision = DialogBox(".","FileExists")
  1040.  
  1041. @Outline4@<:#288,11520>If decision = 7
  1042.  
  1043. @Outline5@<:#288,11520>GetNameResult = DialogBox(".","GetName")
  1044.  
  1045. @Outline5@<:#288,11520>If (GetNameResult = 0)    'If Canceled
  1046.  
  1047. @Outline6@<:#288,11520>Goto CleanUpAndExit
  1048.  
  1049. @Outline5@<:#288,11520>else
  1050.  
  1051. @Outline6@<:#288,11520>NewName = GetDialogField$(8000)
  1052.  
  1053. @Outline6@<:#288,11520>ChopExtension(&NewName)
  1054.  
  1055. @Outline6@<:#288,11520>NewName = strcat$(NewName, ".SAM")
  1056.  
  1057. @Outline6@<:#288,11520>If (InStr(1,NewName,"\")=0)    'If they just typed the filename
  1058.  
  1059. @Outline7@<:#288,11520>FinalFile = strcat$(DocPath, NewName)
  1060.  
  1061. @Outline7@<:#288,11520>result = fopen(FinalFile,"r")
  1062.  
  1063. @Outline6@<:#288,11520>else    'Otherwise they typed a path
  1064.  
  1065. @Outline7@<:#288,11520>FinalFile = NewName
  1066.  
  1067. @Outline7@<:#288,11520>result = fopen(FinalFile,"r")
  1068.  
  1069. @Outline6@<:#288,11520>endif
  1070.  
  1071. @Outline5@<:#288,11520>endif
  1072.  
  1073. @Outline4@<:#288,11520>else
  1074.  
  1075. @Outline5@<:#288,11520>result = 0
  1076.  
  1077. @Outline4@<:#288,11520>endif
  1078.  
  1079. @Outline3@<:#288,11520>Wend
  1080.  
  1081. @Outline3@<:#288,11520>
  1082.  
  1083. @Outline3@<:#288,11520>Id = DllLoadLib("w4w33t.dll","w4wt","HCCCCJ")
  1084.  
  1085. @Outline3@<:#288,11520>
  1086.  
  1087. @Outline3@<:#288,11520>Version = "1"
  1088.  
  1089. @Outline3@<:#288,11520>Stat = DllCall("w4w33t.dll,w4wt,HCCCCJ",TempFile,FinalFile,Version,Except,CallBack)
  1090.  
  1091. @Outline3@<:#288,11520>DllFreeLib(Id)
  1092.  
  1093. @Outline3@<:#288,11520>IF Stat<<<;>0 THEN
  1094.  
  1095. @Outline4@<:#288,11520>Error(Stat)
  1096.  
  1097. @Outline4@<:#288,11520>Goto CleanUpAndExit
  1098.  
  1099. @Outline3@<:#288,11520>ENDIF
  1100.  
  1101. @Outline3@<:#288,11520>HourGlass(0)
  1102.  
  1103. @Outline3@<:#288,11520>FileOpen(FinalFile,1+ccfstatus+insertstatus,"")
  1104.  
  1105. @Outline3@<:#288,11520>
  1106.  
  1107. @Outline3@<:#288,11520>CleanUpAndExit:
  1108.  
  1109. @Outline3@<:#288,11520>'DOSDelFile(FinalFile)
  1110.  
  1111. <:f280,2Times New Roman,0,0,255>ELSE 'Begin export<:f>
  1112.  
  1113. @Outline3@'If ((GetOpenFileName$() = "") and (FileChanged(0,0) = 0))
  1114.  
  1115. @Outline4@'Exit Function
  1116.  
  1117. @Outline3@'EndIf
  1118.  
  1119. @Outline3@amifiltinfo=GetProfileString$("Filters","Ami Pro","AMIPRO2.INI")
  1120.  
  1121. @Outline3@FinalFile=strfield$(IEInfo,1,",")
  1122.  
  1123. @Outline3@'Check if existing file
  1124.  
  1125. @Outline3@result = fopen(FinalFile, "r")
  1126.  
  1127. @Outline3@if (result != 0)    'File already exists
  1128.  
  1129. @Outline4@ExistMessage = strcat$(UCASE$(FinalFile),EXISTS_ERROR)
  1130.  
  1131. @Outline4@FillEdit(1000,ExistMessage)
  1132.  
  1133. @Outline4@decision = DialogBox(".","FileExists")
  1134.  
  1135. @Outline4@If decision = 7    'No
  1136.  
  1137. @Outline5@Exit Function
  1138.  
  1139. @Outline4@endif
  1140.  
  1141. @Outline3@endif
  1142.  
  1143. @Outline3@<:#288,11520>TempFileBase = FileNameFromPath(FinalFile)
  1144.  
  1145. @Outline3@<:#288,11520>ChopExtension(&TempFileBase)
  1146.  
  1147. @Outline3@<:#288,11520>AddPeriod(&TempFileBase)
  1148.  
  1149. @Outline3@<:#288,11520>result = FileChanged(0,0)
  1150.  
  1151. @Outline3@If  ((result != 0) or (GetOpenFileName$() = ""))
  1152.  
  1153. @Outline4@<:#288,11520>'Code for creating SamFile.
  1154.  
  1155. @Outline4@<:#288,11520>SamFile = FileNameFromPath(TempFileBase)
  1156.  
  1157. @Outline4@<:#288,11520>AddPeriod(&SamFile)
  1158.  
  1159. @Outline4@<:#288,11520>SamFile = strcat$(Left$(SamFile,strchr(1,SamFile,".")),"SAM")
  1160.  
  1161. @Outline4@<:#288,11520>DocPath = GetDocPath$()
  1162.  
  1163. @Outline4@<:#288,11520>AddBackslash(&DocPath)
  1164.  
  1165. @Outline4@<:#288,11520>SamFile = strcat$(DocPath,SamFile)
  1166.  
  1167. @Outline4@<:f240,2Times New Roman,255,0,0><:f><:f240,2Times New Roman,255,0,0><:f>result = fopen(SamFile, "r")
  1168.  
  1169. @Outline4@While (result != 0)
  1170.  
  1171. @Outline5@<:#288,11520>
  1172.  
  1173. @Outline5@<:#288,11520>fclose(result)
  1174.  
  1175. @Outline5@<:#288,11520>ExistMessage = strcat$(UCASE$(SamFile),EXISTS_ERROR)
  1176.  
  1177. @Outline5@<:#288,11520>FillEdit(1000,ExistMessage)
  1178.  
  1179. @Outline5@<:#288,11520>decision = DialogBox(".","FileExists")
  1180.  
  1181. @Outline5@<:#288,11520>If decision = 7    'No
  1182.  
  1183. @Outline6@<:#288,11520>GetNameResult = DialogBox(".","GetName")
  1184.  
  1185. @Outline6@<:#288,11520>If (GetNameResult = 0)    'If Canceled
  1186.  
  1187. @Outline7@<:#288,11520>Exit Function
  1188.  
  1189. @Outline6@<:#288,11520>else
  1190.  
  1191. @Outline7@<:#288,11520>NewName = GetDialogField$(8000)
  1192.  
  1193. @Outline7@<:#288,11520>ChopExtension(&NewName)
  1194.  
  1195. @Outline7@<:#288,11520>NewName = strcat$(NewName, ".SAM")
  1196.  
  1197. @Outline7@<:#288,11520>If (InStr(1,NewName,"\")=0)    'If they just typed the filename
  1198.  
  1199. @Outline8@<:#288,11520>SamFile = strcat$(DocPath, NewName)
  1200.  
  1201. @Outline8@<:#288,11520>result = fopen(SamFile,"r")
  1202.  
  1203. @Outline7@<:#288,11520>else    'Otherwise they typed a path
  1204.  
  1205. @Outline8@<:#288,11520>SamFile = NewName
  1206.  
  1207. @Outline8@<:#288,11520>result = fopen(SamFile,"r")
  1208.  
  1209. @Outline7@<:#288,11520>endif
  1210.  
  1211. @Outline6@<:#288,11520>endif
  1212.  
  1213. @Outline5@<:#288,11520>else
  1214.  
  1215. @Outline6@<:#288,11520>result = 0
  1216.  
  1217. @Outline5@<:#288,11520>endif
  1218.  
  1219. @Outline4@<:#288,11520>Wend
  1220.  
  1221. @Outline4@<:#288,11520>AnswerMsgBox(6)
  1222.  
  1223. @Outline4@result = SaveAs(SamFile, 32, "", "")
  1224.  
  1225. @Outline4@if (result != 1)
  1226.  
  1227. @Outline5@exit function
  1228.  
  1229. @Outline4@endif
  1230.  
  1231. @Outline3@else
  1232.  
  1233. @Outline4@<:#288,11520>SamFile = GetOpenFileName$()
  1234.  
  1235. @Outline3@<:#288,11520>endif
  1236.  
  1237. @Outline3@<:#288,11520>TempFileBase = Left$(TempFileBase,strchr(1,TempFileBase,"."))
  1238.  
  1239. @Outline3@<:#288,11520>fromdll=strfield$(amifiltinfo,1,",")
  1240.  
  1241. @Outline3@<:#288,11520>fromver=strfield$(amifiltinfo,2,",")
  1242.  
  1243. @Outline3@<:#288,11520>todll=strfield$(filterinfo,3,",")
  1244.  
  1245. @Outline3@<:#288,11520>tover=strfield$(filterinfo,4,",")
  1246.  
  1247. @Outline3@<:#288,11520>Id = DllLoadLib(fromdll,"w4wf","HCCCCJ")
  1248.  
  1249. @Outline3@<:#288,11520>IF Id=0 THEN
  1250.  
  1251. @Outline4@<:#288,11520>dispvar=strcat$(ERROR18,fromdll)
  1252.  
  1253. @Outline4@<:#288,11520>Message(dispvar, "Lotus Ami Pro")
  1254.  
  1255. @Outline4@<:#288,11520>goto CleanUpExport
  1256.  
  1257. @Outline3@<:#288,11520>ENDIF
  1258.  
  1259. @Outline3@<:#288,11520>TempFile = Right$(TempFileBase, 7)
  1260.  
  1261. @Outline3@<:#288,11520>AddPeriod(&TempFile)
  1262.  
  1263. @Outline3@<:#288,11520>TempFile = strcat$(TempFileDir,"~",TempFile,"TMP")
  1264.  
  1265. @Outline3@<:#288,11520>Except = ""
  1266.  
  1267. @Outline3@<:#288,11520>Stat = DllCall("{fromdll},w4wf,HCCCCJ",SamFile,TempFile,tover,Except,CallBack)
  1268.  
  1269. @Outline3@<:#288,11520>DllFreeLib(Id)
  1270.  
  1271. @Outline3@<:#288,11520>IF Stat<<<;>0 THEN
  1272.  
  1273. @Outline4@<:#288,11520>Error(Stat)
  1274.  
  1275. @Outline3@<:#288,11520>ENDIF
  1276.  
  1277. @Outline3@<:#288,11520>IF Id=0 THEN
  1278.  
  1279. @Outline4@<:#288,11520>dispvar=strcat$(ERROR18,fromdll)
  1280.  
  1281. @Outline4@<:#288,11520>Message(dispvar, "Ami Pro")
  1282.  
  1283. @Outline4@<:#288,11520>goto CleanUpExport
  1284.  
  1285. @Outline3@<:#288,11520>ENDIF
  1286.  
  1287. @Outline3@<:#288,11520>Id = DllLoadLib(todll,"w4wt","HCCCCJ")
  1288.  
  1289. @Outline3@<:#288,11520>Stat = DllCall("{todll},w4wt,HCCCCJ",TempFile,FinalFile,tover,Except,CallBack)
  1290.  
  1291. @Outline3@<:#288,11520>IF Stat<<<;>0 THEN
  1292.  
  1293. @Outline4@<:#288,11520>Error(Stat)
  1294.  
  1295. @Outline3@<:#288,11520>ENDIF
  1296.  
  1297. @Outline3@<:#288,11520>DllFreeLib(Id)
  1298.  
  1299. @Outline3@<:#288,11520>
  1300.  
  1301. @Outline3@<:#288,11520>CleanUpExport:
  1302.  
  1303. @Outline3@<:#288,11520>
  1304.  
  1305. @Outline3@<:#288,11520>'DOSDelFile(SamFile)
  1306.  
  1307. @Outline3@<:#288,11520>HourGlass(0)
  1308.  
  1309. <:#288,11520>ENDIF
  1310.  
  1311. @Function@<:#384,11520>END FUNCTION
  1312.  
  1313. @Function@<:#384,11520>
  1314.  
  1315. @Function@<:#384,11520>FUNCTION Error(Stat)
  1316.  
  1317. <:#288,11520>SWITCH Stat
  1318.  
  1319. @Outline3@<:#288,11520>CASE 1 Errornum=ERROR1
  1320.  
  1321. @Outline3@<:#288,11520>CASE 2 Errornum=ERROR2
  1322.  
  1323. @Outline3@<:#288,11520>CASE 3 Errornum=ERROR3
  1324.  
  1325. @Outline3@<:#288,11520>CASE 4 Errornum=ERROR4
  1326.  
  1327. @Outline3@<:#288,11520>CASE 5 Errornum=ERROR5
  1328.  
  1329. @Outline3@<:#288,11520>CASE 6 Errornum=ERROR6
  1330.  
  1331. @Outline3@<:#288,11520>CASE 7 Errornum=ERROR7
  1332.  
  1333. @Outline3@<:#288,11520>CASE 8 Errornum=ERROR8
  1334.  
  1335. @Outline3@<:#288,11520>CASE 9 Errornum=ERROR9
  1336.  
  1337. @Outline3@<:#288,11520>CASE 10 Errornum=ERROR10
  1338.  
  1339. @Outline3@<:#288,11520>CASE 11 Errornum=ERROR11
  1340.  
  1341. @Outline3@<:#288,11520>CASE 12 Errornum=ERROR12
  1342.  
  1343. @Outline3@<:#288,11520>CASE 13 Errornum=ERROR13
  1344.  
  1345. @Outline3@<:#288,11520>CASE 14 Errornum=ERROR14
  1346.  
  1347. @Outline3@<:#288,11520>CASE 15 Errornum=ERROR15
  1348.  
  1349. @Outline3@<:#288,11520>CASE 16 Errornum=ERROR16
  1350.  
  1351. @Outline3@<:#288,11520>CASE 17 Errornum=ERROR17
  1352.  
  1353. <:#288,11520>ENDSWITCH
  1354.  
  1355. <:#288,11520>Message(Errornum, "Lotus Ami Pro")
  1356.  
  1357. @Function@<:#384,11520>END FUNCTION
  1358.  
  1359. @Function@<:#384,11520>Function ChopExtension(pn)
  1360.  
  1361. <:#288,11520>sFile = (*pn)
  1362.  
  1363. <:#288,11520>lcv = len(sFile)
  1364.  
  1365. <:#288,11520>done = 0
  1366.  
  1367. <:#288,11520>while (done = 0)
  1368.  
  1369. @Outline3@<:#288,11520>ch = Mid$(sFile,lcv,1)
  1370.  
  1371. @Outline3@<:#288,11520>if ch="\"
  1372.  
  1373. @Outline4@<:#288,11520>done = 1
  1374.  
  1375. @Outline3@<:#288,11520>elseif ch="."
  1376.  
  1377. @Outline4@<:#288,11520>sFile = Left$(sFile, lcv - 1)
  1378.  
  1379. @Outline4@<:#288,11520>done = 1
  1380.  
  1381. @Outline3@<:#288,11520>elseif lcv = 1
  1382.  
  1383. @Outline4@<:#288,11520>done = 1
  1384.  
  1385. @Outline3@<:#288,11520>endif
  1386.  
  1387. @Outline3@<:#288,11520>lcv = lcv - 1
  1388.  
  1389. <:#288,11520>wend
  1390.  
  1391. <:#288,11520>*pn = sFile
  1392.  
  1393. @Function@<:#384,11520>End Function
  1394.  
  1395. @Function@<:#384,11520>Function AddBackslash(fn)
  1396.  
  1397. <:#288,11520>sFile = (*fn)
  1398.  
  1399. <:#288,11520>if Right$(sFile, 1) != "\"
  1400.  
  1401. @Outline3@<:#288,11520>sFile = strcat$(sFile, "\")
  1402.  
  1403. <:#288,11520>endif
  1404.  
  1405. <:#288,11520>*fn = sFile
  1406.  
  1407. @Function@<:#384,11520>End Function
  1408.  
  1409. @Function@<:#384,11520>Function AddPeriod(fn)
  1410.  
  1411. <:#288,11520>sFile = (*fn)
  1412.  
  1413. <:#288,11520>if Right$(sFile, 1) != "."
  1414.  
  1415. @Outline3@<:#288,11520>sFile = strcat$(sFile, ".")
  1416.  
  1417. <:#288,11520>endif
  1418.  
  1419. <:#288,11520>*fn = sFile
  1420.  
  1421. @Function@<:#384,11520>End Function
  1422.  
  1423. @Function@<:#384,11520>Function FileNameFromPath(pn)
  1424.  
  1425. <:#288,11520>bkslpos = 1
  1426.  
  1427. <:#288,11520>bkslpos = InStr(1,pn, "\")
  1428.  
  1429. <:#288,11520>While bkslpos <;> 0
  1430.  
  1431. @Outline3@<:#288,11520>bkslpos = InStr(1 ,pn, "\")
  1432.  
  1433. @Outline3@<:#288,11520>pn = Right$(pn, Len(pn) - bkslpos )
  1434.  
  1435. <:#288,11520>Wend
  1436.  
  1437. <:#288,11520>return pn
  1438.  
  1439. @Function@<:#384,11520>End Function
  1440.  
  1441. @Function@<:#384,11520>DIALOG    GetName
  1442.  
  1443. <:#288,11520>-2134376448    4    45    97    120    59    ""    ""    "Lotus Ami Pro"
  1444.  
  1445. <:#576,11520>3    8    111    9    1000    1342177280    "static"    "New name for Ami Pro document?"    0 
  1446.  
  1447. <:#288,11520>3    20    111    12    8000    1350631552    "edit"    ""    0 
  1448.  
  1449. <:#288,11520>15    38    39    15    1    1342373889    "button"    "&OK"    0 
  1450.  
  1451. <:#288,11520>60    38    39    15    2    1342373888    "button"    "&Cancel"    0 
  1452.  
  1453. @Function@<:#384,11520>END DIALOG
  1454.  
  1455. @Function@<:#384,11520>DIALOG    FileExists
  1456.  
  1457. <:#288,11520>-2134376448    3    30    73    240    59    ""    ""    "Lotus Ami Pro"
  1458.  
  1459. <:#576,11520>6    14    228    21    1000    1342177281    "static"    "{Placeholder} already exists.  Do you want to overwrite it?"    0 
  1460.  
  1461. <:#288,11520>126    38    33    15    7    1342373889    "button"    "&No"    0 
  1462.  
  1463. <:#288,11520>81    38    33    15    6    1342373888    "button"    "&Yes"    0 
  1464.  
  1465. @Function@<:#384,11520>END DIALOG
  1466.  
  1467. >
  1468.  
  1469. [Embedded]
  1470. 00022123
  1471. >
  1472. [macsum] 8
  1473. Main 0 1 30 31
  1474. Error 5274 1 2 247
  1475. ChopExtension 6659 1 5 269
  1476. AddBackslash 7021 1 2 287
  1477. AddPeriod 7142 1 2 294
  1478. FileNameFromPath 7260 1 2 301
  1479. GetName 7465 0 -1 310
  1480. FileExists 7738 0 -1 317
  1481. [macse]
  1482. 14 Main
  1483. 0 20 "{0}" 6 ","
  1484. 13
  1485. 8 2
  1486. 6 2
  1487. 7 "P"
  1488. 18 0
  1489. 11 00000142
  1490. 0 3 "Preview not available for this filter." "Lotus Ami Pro"
  1491. 5 -1
  1492. 15
  1493. 9
  1494. 0 32 2
  1495. 0 296 1
  1496. 0 20 "{0}" 2 ","
  1497. 13
  1498. 8 3
  1499. 0 286 "Filters" "{3}" "AMIPRO2.INI"
  1500. 13
  1501. 8 4
  1502. 6 4
  1503. 7 ""
  1504. 18 0
  1505. 11 00000831
  1506. 0 287 "Filters" "WordPerfect 6.0" "w4w48f.dll,0,w4w48t.dll,0" "AMIPRO2.INI"
  1507. 0 287 "Filters" "Word for Windows 6.0" "w4w49f.dll,0,w4w44t.dll,1" "AMIPRO2.INI"
  1508. 0 287 "Filters" "Q&A Write" "w4w23f.dll,0,w4w23t.dll,0" "AMIPRO2.INI"
  1509. 0 287 "Filters" "XyWrite III " "w4w17f.dll,0,w4w17t.dll,0" "AMIPRO2.INI"
  1510. 0 287 "Filters" "XyWrite III Plus" "w4w17f.dll,1,w4w17t.dll,1" "AMIPRO2.INI"
  1511. 0 287 "Filters" "XyWrite IV" "w4w17f.dll,3,w4w17t.dll,3" "AMIPRO2.INI"
  1512. 0 287 "Filters" "Ami Pro" "w4w33f.dll,1,w4w33t.dll,1" "AMIPRO2.INI"
  1513. 0 286 "Filters" "{3}" "AMIPRO2.INI"
  1514. 13
  1515. 8 4
  1516. 0 20 "{0}" 3 ","
  1517. 13
  1518. 8 6
  1519. 0 774 "Temp"
  1520. 13
  1521. 8 7
  1522. 6 7
  1523. 7 ""
  1524. 18 0
  1525. 11 00000928
  1526. 0 1288
  1527. 13
  1528. 8 7
  1529. 16 AddBackslash &7
  1530. 6 6
  1531. 7 "I"
  1532. 18 0
  1533. 11 00003059
  1534. 0 20 "{0}" 4 ","
  1535. 13
  1536. 5 128
  1537. 4 0
  1538. 8 8
  1539. 0 20 "{0}" 5 ","
  1540. 13
  1541. 7 "I"
  1542. 18 0
  1543. 11 00001076
  1544. 5 8
  1545. 8 9
  1546. 0 20 "{4}" 1 ","
  1547. 13
  1548. 8 10
  1549. 0 20 "{4}" 2 ","
  1550. 13
  1551. 8 11
  1552. 0 297 "{10}" "w4wf" "HCCCCJ"
  1553. 13
  1554. 8 12
  1555. 6 12
  1556. 5 0
  1557. 18 0
  1558. 11 00001283
  1559. 0 16 "Error loading " "{10}"
  1560. 13
  1561. 8 13
  1562. 0 3 "{13}" "Lotus Ami Pro"
  1563. 10 00003046
  1564. 0 20 "{0}" 1 ","
  1565. 13
  1566. 8 14
  1567. 16 FileNameFromPath "{14}"
  1568. 13
  1569. 8 15
  1570. 16 AddPeriod &15
  1571. 0 13 1 "{15}" "."
  1572. 13
  1573. 0 806 "{15}" [X]
  1574. 13
  1575. 8 15
  1576. 0 807 "{15}" 8
  1577. 13
  1578. 8 16
  1579. 0 16 "{7}" "~" "{16}" "tmp"
  1580. 13
  1581. 8 16
  1582. 7 ""
  1583. 8 17
  1584. 0 284 "{10},w4wf,HCCCCJ" "{14}" "{16}" "{11}" "{17}" "{5}"
  1585. 13
  1586. 8 18
  1587. 0 298 "{12}"
  1588. 6 18
  1589. 5 0
  1590. 18 1
  1591. 11 00001880
  1592. 6 10
  1593. 7 "w4w49f.dll"
  1594. 18 0
  1595. 11 00001732
  1596. 5 16
  1597. 6 8
  1598. 3 0
  1599. 6 9
  1600. 3 0
  1601. 2 102 1 "{14}" [X] "Word for Windows 2.0"
  1602. 10 00001867
  1603. 6 10
  1604. 7 "w4w48f.dll"
  1605. 18 0
  1606. 11 00001850
  1607. 5 16
  1608. 6 8
  1609. 3 0
  1610. 6 9
  1611. 3 0
  1612. 2 102 1 "{14}" [X] "WordPerfect 5.x"
  1613. 10 00001867
  1614. 16 Error "{18}"
  1615. 10 00003046
  1616. 6 12
  1617. 5 0
  1618. 18 0
  1619. 11 00001991
  1620. 0 16 "Error loading " "{10}"
  1621. 13
  1622. 8 13
  1623. 0 3 "{13}" "Lotus Ami Pro"
  1624. 10 00003046
  1625. 16 FileNameFromPath "{15}"
  1626. 13
  1627. 8 19
  1628. 16 AddPeriod &19
  1629. 0 13 1 "{19}" "."
  1630. 13
  1631. 0 806 "{19}" [X]
  1632. 13
  1633. 0 16 [X] "SAM"
  1634. 13
  1635. 8 19
  1636. 0 268
  1637. 13
  1638. 8 20
  1639. 16 AddBackslash &20
  1640. 0 16 "{20}" "{19}"
  1641. 13
  1642. 8 19
  1643. 0 259 "{19}" "r"
  1644. 13
  1645. 8 21
  1646. 6 21
  1647. 5 0
  1648. 18 1
  1649. 11 00002780
  1650. 0 260 "{21}"
  1651. 0 18 "{19}"
  1652. 13
  1653. 0 16 [X] " already exists.  Do you want to overwrite it?"
  1654. 13
  1655. 8 22
  1656. 0 31 1000 "{22}"
  1657. 0 26 "." "FileExists"
  1658. 13
  1659. 8 23
  1660. 6 23
  1661. 5 7
  1662. 18 0
  1663. 11 00002756
  1664. 0 26 "." "GetName"
  1665. 13
  1666. 8 24
  1667. 6 24
  1668. 5 0
  1669. 18 0
  1670. 11 00002511
  1671. 10 00003046
  1672. 10 00002743
  1673. 0 27 8000
  1674. 13
  1675. 8 25
  1676. 16 ChopExtension &25
  1677. 0 16 "{25}" ".SAM"
  1678. 13
  1679. 8 25
  1680. 0 808 1 "{25}" "\"
  1681. 13
  1682. 5 0
  1683. 18 0
  1684. 11 00002703
  1685. 0 16 "{20}" "{25}"
  1686. 13
  1687. 8 19
  1688. 0 259 "{19}" "r"
  1689. 13
  1690. 8 21
  1691. 10 00002743
  1692. 6 25
  1693. 8 19
  1694. 0 259 "{19}" "r"
  1695. 13
  1696. 8 21
  1697. 10 00002767
  1698. 5 0
  1699. 8 21
  1700. 10 00002214
  1701. 0 297 "w4w33t.dll" "w4wt" "HCCCCJ"
  1702. 13
  1703. 8 12
  1704. 7 "1"
  1705. 8 26
  1706. 0 284 "w4w33t.dll,w4wt,HCCCCJ" "{16}" "{19}" "{26}" "{17}" "{5}"
  1707. 13
  1708. 8 18
  1709. 0 298 "{12}"
  1710. 6 18
  1711. 5 0
  1712. 18 1
  1713. 11 00002989
  1714. 16 Error "{18}"
  1715. 10 00003046
  1716. 0 296 0
  1717. 5 1
  1718. 6 8
  1719. 3 0
  1720. 6 9
  1721. 3 0
  1722. 2 102 1 "{19}" [X] ""
  1723. 10 00005262
  1724. 0 286 "Filters" "Ami Pro" "AMIPRO2.INI"
  1725. 13
  1726. 8 27
  1727. 0 20 "{0}" 1 ","
  1728. 13
  1729. 8 19
  1730. 0 259 "{19}" "r"
  1731. 13
  1732. 8 21
  1733. 6 21
  1734. 5 0
  1735. 18 1
  1736. 11 00003375
  1737. 0 18 "{19}"
  1738. 13
  1739. 0 16 [X] " already exists.  Do you want to overwrite it?"
  1740. 13
  1741. 8 22
  1742. 0 31 1000 "{22}"
  1743. 0 26 "." "FileExists"
  1744. 13
  1745. 8 23
  1746. 6 23
  1747. 5 7
  1748. 18 0
  1749. 11 00003375
  1750. 6 1
  1751. 15
  1752. 9
  1753. 16 FileNameFromPath "{19}"
  1754. 13
  1755. 8 15
  1756. 16 ChopExtension &15
  1757. 16 AddPeriod &15
  1758. 0 34 0 0
  1759. 13
  1760. 8 21
  1761. 6 21
  1762. 5 0
  1763. 18 1
  1764. 0 267
  1765. 13
  1766. 7 ""
  1767. 18 0
  1768. 1 2
  1769. 11 00004418
  1770. 16 FileNameFromPath "{15}"
  1771. 13
  1772. 8 28
  1773. 16 AddPeriod &28
  1774. 0 13 1 "{28}" "."
  1775. 13
  1776. 0 806 "{28}" [X]
  1777. 13
  1778. 0 16 [X] "SAM"
  1779. 13
  1780. 8 28
  1781. 0 268
  1782. 13
  1783. 8 20
  1784. 16 AddBackslash &20
  1785. 0 16 "{20}" "{28}"
  1786. 13
  1787. 8 28
  1788. 0 259 "{28}" "r"
  1789. 13
  1790. 8 21
  1791. 6 21
  1792. 5 0
  1793. 18 1
  1794. 11 00004319
  1795. 0 260 "{21}"
  1796. 0 18 "{28}"
  1797. 13
  1798. 0 16 [X] " already exists.  Do you want to overwrite it?"
  1799. 13
  1800. 8 22
  1801. 0 31 1000 "{22}"
  1802. 0 26 "." "FileExists"
  1803. 13
  1804. 8 23
  1805. 6 23
  1806. 5 7
  1807. 18 0
  1808. 11 00004295
  1809. 0 26 "." "GetName"
  1810. 13
  1811. 8 24
  1812. 6 24
  1813. 5 0
  1814. 18 0
  1815. 11 00004050
  1816. 6 1
  1817. 15
  1818. 9
  1819. 10 00004282
  1820. 0 27 8000
  1821. 13
  1822. 8 25
  1823. 16 ChopExtension &25
  1824. 0 16 "{25}" ".SAM"
  1825. 13
  1826. 8 25
  1827. 0 808 1 "{25}" "\"
  1828. 13
  1829. 5 0
  1830. 18 0
  1831. 11 00004242
  1832. 0 16 "{20}" "{25}"
  1833. 13
  1834. 8 28
  1835. 0 259 "{28}" "r"
  1836. 13
  1837. 8 21
  1838. 10 00004282
  1839. 6 25
  1840. 8 28
  1841. 0 259 "{28}" "r"
  1842. 13
  1843. 8 21
  1844. 10 00004306
  1845. 5 0
  1846. 8 21
  1847. 10 00003754
  1848. 0 291 6
  1849. 2 104 1 "{28}" 32 "" ""
  1850. 13
  1851. 8 21
  1852. 6 21
  1853. 5 1
  1854. 18 1
  1855. 11 00004405
  1856. 6 1
  1857. 15
  1858. 9
  1859. 10 00004435
  1860. 0 267
  1861. 13
  1862. 8 28
  1863. 0 13 1 "{15}" "."
  1864. 13
  1865. 0 806 "{15}" [X]
  1866. 13
  1867. 8 15
  1868. 0 20 "{27}" 1 ","
  1869. 13
  1870. 8 10
  1871. 0 20 "{27}" 2 ","
  1872. 13
  1873. 8 11
  1874. 0 20 "{4}" 3 ","
  1875. 13
  1876. 8 29
  1877. 0 20 "{4}" 4 ","
  1878. 13
  1879. 8 30
  1880. 0 297 "{10}" "w4wf" "HCCCCJ"
  1881. 13
  1882. 8 12
  1883. 6 12
  1884. 5 0
  1885. 18 0
  1886. 11 00004751
  1887. 0 16 "Error loading " "{10}"
  1888. 13
  1889. 8 13
  1890. 0 3 "{13}" "Lotus Ami Pro"
  1891. 10 00005253
  1892. 0 807 "{15}" 7
  1893. 13
  1894. 8 16
  1895. 16 AddPeriod &16
  1896. 0 16 "{7}" "~" "{16}" "TMP"
  1897. 13
  1898. 8 16
  1899. 7 ""
  1900. 8 17
  1901. 0 284 "{10},w4wf,HCCCCJ" "{28}" "{16}" "{30}" "{17}" "{5}"
  1902. 13
  1903. 8 18
  1904. 0 298 "{12}"
  1905. 6 18
  1906. 5 0
  1907. 18 1
  1908. 11 00004977
  1909. 16 Error "{18}"
  1910. 6 12
  1911. 5 0
  1912. 18 0
  1913. 11 00005082
  1914. 0 16 "Error loading " "{10}"
  1915. 13
  1916. 8 13
  1917. 0 3 "{13}" "Ami Pro"
  1918. 10 00005253
  1919. 0 297 "{29}" "w4wt" "HCCCCJ"
  1920. 13
  1921. 8 12
  1922. 0 284 "{29},w4wt,HCCCCJ" "{16}" "{19}" "{30}" "{17}" "{5}"
  1923. 13
  1924. 8 18
  1925. 6 18
  1926. 5 0
  1927. 18 1
  1928. 11 00005239
  1929. 16 Error "{18}"
  1930. 0 298 "{12}"
  1931. 0 296 0
  1932. 6 1
  1933. 15
  1934. 9
  1935. 14 Error
  1936. 5 1
  1937. 6 0
  1938. 18 0
  1939. 11 00000087
  1940. 7 "Error opening user file."
  1941. 8 2
  1942. 10 00001346
  1943. 5 2
  1944. 6 0
  1945. 18 0
  1946. 11 00000158
  1947. 7 "Error during read."
  1948. 8 2
  1949. 10 00001346
  1950. 5 3
  1951. 6 0
  1952. 18 0
  1953. 11 00000241
  1954. 7 "Error opening conversion file."
  1955. 8 2
  1956. 10 00001346
  1957. 5 4
  1958. 6 0
  1959. 18 0
  1960. 11 00000313
  1961. 7 "Error during write."
  1962. 8 2
  1963. 10 00001346
  1964. 5 5
  1965. 6 0
  1966. 18 0
  1967. 11 00000393
  1968. 7 "Invalid data in conversion."
  1969. 8 2
  1970. 10 00001346
  1971. 5 6
  1972. 6 0
  1973. 18 0
  1974. 11 00000475
  1975. 7 "Error opening exception file."
  1976. 8 2
  1977. 10 00001346
  1978. 5 7
  1979. 6 0
  1980. 18 0
  1981. 11 00000557
  1982. 7 "Error writing exception file."
  1983. 8 2
  1984. 10 00001346
  1985. 5 8
  1986. 6 0
  1987. 18 0
  1988. 11 00000633
  1989. 7 "Error obtaining memory."
  1990. 8 2
  1991. 10 00001346
  1992. 5 9
  1993. 6 0
  1994. 18 0
  1995. 11 00000709
  1996. 7 "Error invalid document."
  1997. 8 2
  1998. 10 00001346
  1999. 5 10
  2000. 6 0
  2001. 18 0
  2002. 11 00000792
  2003. 7 "Error out of space on output."
  2004. 8 2
  2005. 10 00001346
  2006. 5 11
  2007. 6 0
  2008. 18 0
  2009. 11 00000887
  2010. 7 "Conversion document too large for target."
  2011. 8 2
  2012. 10 00001346
  2013. 5 12
  2014. 6 0
  2015. 18 0
  2016. 11 00000980
  2017. 7 "Warning - Possible error in conversion."
  2018. 8 2
  2019. 10 00001346
  2020. 5 13
  2021. 6 0
  2022. 18 0
  2023. 11 00001066
  2024. 7 "Conversion canceled by the user."
  2025. 8 2
  2026. 10 00001346
  2027. 5 14
  2028. 6 0
  2029. 18 0
  2030. 11 00001144
  2031. 7 "Incorrect option format."
  2032. 8 2
  2033. 10 00001346
  2034. 5 15
  2035. 6 0
  2036. 18 0
  2037. 11 00001212
  2038. 7 "Unknown error."
  2039. 8 2
  2040. 10 00001346
  2041. 5 16
  2042. 6 0
  2043. 18 0
  2044. 11 00001287
  2045. 7 "Fatal internal error."
  2046. 8 2
  2047. 10 00001346
  2048. 5 17
  2049. 6 0
  2050. 18 0
  2051. 11 00001346
  2052. 7 "Error during seek."
  2053. 8 2
  2054. 0 3 "{2}" "Lotus Ami Pro"
  2055. 6 1
  2056. 15
  2057. 9
  2058. 14 ChopExtension
  2059. 27 0
  2060. 8 2
  2061. 0 14 "{2}"
  2062. 13
  2063. 8 3
  2064. 5 0
  2065. 8 4
  2066. 6 4
  2067. 5 0
  2068. 18 0
  2069. 11 00000339
  2070. 0 15 "{2}" "{3}" 1
  2071. 13
  2072. 8 5
  2073. 6 5
  2074. 7 "\"
  2075. 18 0
  2076. 11 00000172
  2077. 5 1
  2078. 8 4
  2079. 10 00000306
  2080. 6 5
  2081. 7 "."
  2082. 18 0
  2083. 11 00000267
  2084. 6 3
  2085. 5 1
  2086. 3 1
  2087. 0 806 "{2}" [X]
  2088. 13
  2089. 8 2
  2090. 5 1
  2091. 8 4
  2092. 10 00000306
  2093. 6 3
  2094. 5 1
  2095. 18 0
  2096. 11 00000306
  2097. 5 1
  2098. 8 4
  2099. 6 3
  2100. 5 1
  2101. 3 1
  2102. 8 3
  2103. 10 00000060
  2104. 6 2
  2105. 28 0
  2106. 6 1
  2107. 15
  2108. 9
  2109. 14 AddBackslash
  2110. 27 0
  2111. 8 2
  2112. 0 807 "{2}" 1
  2113. 13
  2114. 7 "\"
  2115. 18 1
  2116. 11 00000098
  2117. 0 16 "{2}" "\"
  2118. 13
  2119. 8 2
  2120. 6 2
  2121. 28 0
  2122. 6 1
  2123. 15
  2124. 9
  2125. 14 AddPeriod
  2126. 27 0
  2127. 8 2
  2128. 0 807 "{2}" 1
  2129. 13
  2130. 7 "."
  2131. 18 1
  2132. 11 00000095
  2133. 0 16 "{2}" "."
  2134. 13
  2135. 8 2
  2136. 6 2
  2137. 28 0
  2138. 6 1
  2139. 15
  2140. 9
  2141. 14 FileNameFromPath
  2142. 5 1
  2143. 8 2
  2144. 0 808 1 "{0}" "\"
  2145. 13
  2146. 8 2
  2147. 6 2
  2148. 5 0
  2149. 18 3
  2150. 11 00000181
  2151. 0 808 1 "{0}" "\"
  2152. 13
  2153. 8 2
  2154. 0 14 "{0}"
  2155. 13
  2156. 6 2
  2157. 3 1
  2158. 0 807 "{0}" [X]
  2159. 13
  2160. 8 0
  2161. 10 00000059
  2162. 6 0
  2163. 15
  2164. 9
  2165. 6 1
  2166. 15
  2167. 9
  2168. DIALOG GetName
  2169. -2134376448 4 45 97 120 59 "" "" "Lotus Ami Pro" 
  2170. 3 8 111 9 1000 1342177280 "static" "New name for Ami Pro document?" 0 
  2171. 3 20 111 12 8000 1350631552 "edit" "" 0 
  2172. 15 38 39 15 1 1342373889 "button" "&OK" 0 
  2173. 60 38 39 15 2 1342373888 "button" "&Cancel" 0 
  2174. DIALOG FileExists
  2175. -2134376448 3 30 73 240 59 "" "" "Lotus Ami Pro" 
  2176. 6 14 228 21 1000 1342177281 "static" "{Placeholder} already exists.  Do you want to overwrite it?" 0 
  2177. 126 38 33 15 7 1342373889 "button" "&No" 0 
  2178. 81 38 33 15 6 1342373888 "button" "&Yes" 0 
  2179. 00022148
  2180.