Export data to MS Word


You can export data from your database to a Microsoft Office Word document.
To export data from your database to MSWord, you must create a script file (*.cd). 
In the file you must have the query that will call the data from the tables you want, and the commands that will export the data to MSWord.
Let’s take a few moments to walk through the process, step-by-step.


1. Open the application.
2. Right click and select "Developer".

3. Select “Scripts” and then select “Create”
4. In the window you must write your code. T
he example below shows the code for exporting 
    a customer’s order into MSWord.

proc exp_order()

       order_id
= Input(“Parameter”;”Order’s number:”;””)
       cust_id  
= Input(“Parameter”;”Customer’s code:”;””)

      
start_sql “C_ORD” “KOSMOS”
              SELECT
              CUSTOMER.NAME, ORDER.DATE, ORDER.NUMBER,
              ORDER.AMOUNT, ORDER.QUANTITY
              FROM
              CUSTOMER, ORDER
              WHER
              (CUSTOMER.CUSTOMER = ORDER.CUSTOMER)
              AND (ORDER.NUMBER =: N)
              AND (CUSTOMER.CODE =: C)
      
end_sql

      
call RunEmbSQL(“C_ORD”;order_id;cust_id)

       q
= QueryByName(“C_ORD”)

       dat    
= TGetFld(q;”DATE”)
       num  
= TGetFld(q;”NUMBER”)
       name
= TGetFld(q;”NAME”)
       amnt  
= TGetFld(q;”AMOUNT”)
       qnt     
= TGetFld(q;”QUANTITY”)
       dat, num, name, amnt and qnt is the variables that I want to send to word

       
call DisconnectWord()      this command closes ms word
       call OpenWordDoc("C:\KOSMOS\ORDER.DOC")   this command opens the word file (this file must be created, the data is always exported into an existing excel file)
       call FixVarsForWord()
       call SendVarsToWordDoc1("ORDER.DOC")   these two commands send the variables to word
       call ShowWord()   this command opens the word and the file

       call FreeEmbSQL(“C_ORD”)

end

5. Save changes and close the window.
6. You must create a document with the name order.doc into the folder c:\kosmos.
    In the document you must call the variables with a word’s command, DOCVRIABLE.
    You can use the DocVariable field to retrieve the value of a variable after it has been
    set to display within a Word document.
     -- On the
 Insert menu, click Field
     -- In the
 Categories box, select Document Automation.
     -- In the
 Field names list, select DocVariable.
     -- In the
 New Name box, under Field properties, type the name of the document variable.
     -- Click
 OK.
    For example {DOCVARIABLE “
dat” \* MERGEFORMAT}
7. Call the procedure. 
    (You can call the procedure from the menu or with a button. 
     The command you use is  "call procedure name()".
     For example "call exp_order()"   )