Computer Buyer 1998 October/dpcb1098.iso/Business/Maxim/MAX5/data.z/MAXAMI.SMM

INI File | 1998-05-15 | 3KB | 418 lines

[ver]
    4
[sty]

[files]
[charset]
    82
    ANSI (Windows, IBM CP 1252)
[revisions]
    0
[prn]
    Apple LaserWriter II NTX
[port]
    LPT2:
[lang]
    1
[desc]
    Maximizer for Windows DDE Mail Merge Macro




    754858545
    1
    754858512
    0
    1
    0
    0
    0
    0






    1
[fopts]
    0
    1
    0
    0
[lnopts]
    2
    Body Text
    1
[docopts]
    5
    2
[GramStyle]

[tag]
    Body Text
    2
    [fnt]
        Arial
        240
        0
        16384
    [algn]
        1
        1
        216
        0
        0
    [spc]
        33
        273
        1
        0
        0
        1
        100
    [brk]
        4
    [line]
        8
        0
        1
        0
        1
        1
        1
        10
        10
        1
    [spec]
        0
        0

        0
        1
        1
        0
        16
        0
        0
    [nfmt]
        272
        1
        3
        .
        ,
        $
    Body Text
    0
    0
[tag]
    Body Single
    3
    [fnt]
        Times New Roman
        240
        0
        49152
    [algn]
        1
        1
        0
        0
        0
    [spc]
        33
        273
        1
        0
        0
        1
        100
    [brk]
        4
    [line]
        8
        0
        1
        0
        1
        1
        1
        10
        10
        1
    [spec]
        0
        0

        0
        1
        1
        0
        0
        0
        0
    [nfmt]
        280
        1
        2
        .
        ,
        $
    Body Single
    0
    0
[tag]
    Function
    4
    [fnt]
        Arial
        240
        0
        16385
    [algn]
        1
        1
        0
        0
        0
    [spc]
        33
        244
        1
        0
        0
        1
        100
    [brk]
        68
    [line]
        8
        0
        1
        0
        1
        1
        1
        10
        10
        1
    [spec]
        0
        1

        0
        1
        1
        0
        0
        0
        0
    [nfmt]
        272
        1
        3
        .
        ,
        $
    Body Text
    0
    0
[lay]
    Standard
    513
    [rght]
        15840
        12240
        1
        1440
        1440
        1
        1440
        1440
        0
        1
        0
        1
        0
        2
        1
        1440
        10800
        12
        1
        720
        1
        1440
        1
        2160
        1
        2880
        1
        3600
        1
        4320
        1
        5040
        1
        5760
        1
        6480
        1
        7200
        1
        7920
        1
        8640
    [hrght]
    [lyfrm]
        1
        11200
        0
        0
        12240
        1440
        0
        1
        3
        1 0 0 0 0 0 0
        0
        0
        1
    [frmlay]
        1440
        12240
        1
        1440
        72
        1
        792
        1440
        0
        1
        0
        1
        1
        0
        1
        1440
        10800
        1
        3
        9360
    [txt]
>
    [frght]
    [lyfrm]
        1
        13248
        0
        14400
        12240
        15840
        0
        1
        3
        1 0 0 0 0 0 0
        0
        0
        2
    [frmlay]
        15840
        12240
        1
        1440
        792
        1
        14472
        1440
        0
        1
        0
        1
        1
        0
        1
        1440
        10800
        2
        2
        4680
        3
        9360
    [txt]
>
[elay]
[l1]
    0
[pg]
    1
    15 0 0 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
[edoc]
FUNCTION MAXAMI1()

MaxChan=DDEInitiate("MAXWIN","CurrentRecord")

Number=DDEReceive$(MaxChan,"GetListCount")

Note$=Query$("Enter Message to Log to Notes")

FilePrint(1,1,9999,1537)

While Number<;>1

    DDEPoke(MaxChan,"InsertMailMergeNote",Note$)

    Number=Number - 1

    DDEExecute(MaxChan,"<[><[>ScrollList(LineDown)]]")

    FilePrint(1,1,9999,1537)

Wend

DDEPoke(MaxChan,"InsertMailMergeNote",Note$)

DDETerminate(MaxChan)

END FUNCTION


>

[Embedded]
00002849
>
[macsum] 1
MAXAMI1 0 0 4 0
[macse]
14 MAXAMI1
0 8 "MAXWIN" "CurrentRecord"
13
8 1
0 10 "{1}" "GetListCount"
13
8 2
0 1 "Enter Message to Log to Notes"
13
8 3
2 111 1 1 1 9999 1537
6 2
5 1
18 3
11 00000320
0 35 "{1}" "InsertMailMergeNote" "{3}"
6 2
5 1
3 1
8 2
0 11 "{1}" "[[ScrollList(LineDown)]]"
2 111 1 1 1 9999 1537
10 00000156
0 35 "{1}" "InsertMailMergeNote" "{3}"
0 9 "{1}"
6 0
15
9
00002874