home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a044 / 3.ddi / CARET / INVOICE.RET < prev    next >
Encoding:
Text File  |  1993-08-31  |  9.7 KB  |  122 lines
  1. {\rtf1\ansi
  2. {\*\demo}
  3. {\fonttbl{\f0\fswiss Arial;}{\f1\froman Times New Roman;}}
  4. {\colortbl\red0\green0\blue0;\red128\green0\blue0;\red0\green128\blue0;\red128\green128\blue0;\red0\green0\blue128;\red128\green0\blue128;\red0\green128\blue128;\red128\green128\blue128;\red192\green192\blue192;\red255\green0\blue0;\red0\green255\blue0;\red255\green255\blue0;\red0\green0\blue255;\red255\green0\blue255;\red0\green255\blue255;}
  5. {\info{\author CA-RET}{\title Report title}}
  6. {\*\vrwvern1\vrwsubn0}
  7. \paperw12240 \paperh15840 \margl1530 \margr1530 \margt1440 \margb1440
  8. {\*\vrwcol table1{\col0 0 1170 180}{\col1 1350 2430 180}{\col2 3960 90 180}{\col3 4230 1260 180}{\col4 5670 2430 180}{\col5 8280 450 180}}
  9. {\*\vrwcol table2{\col0 0 720 180}{\col1 900 1260 180}{\col2 2340 2880 180}{\col3 5400 1170 180}{\col4 6750 990 180}{\col5 7920 810 180}}
  10. {\*\vrwcol table3{\col0 0 1710 180}{\col1 1890 2700 180}{\col2 4770 2340 180}{\col3 7290 1890 180}}
  11. {\*\vrwcol table4{\col0 0 3510 180}{\col1 3690 3150 180}{\col2 7020 1710 180}}
  12. {\*\ctrcol}
  13. \sectd \linex0 \pard
  14. {\*\vrwvar {\v0 _date{\expcr12 SystemDate()}\dat}
  15. {\v1 _pagenumber{\expcr12 PageNumber()}\int}
  16. {\v2 CUST_NAME\colnum2\colnam CUST_NAME\len26\txt}
  17. {\v3 ADDRESS\colnum3\colnam ADDRESS\len26\txt}
  18. {\v4 CITY\colnum4\colnam CITY\len26\txt}
  19. {\v5 STATE\colnum5\colnam STATE\len3\txt}
  20. {\v6 ZIP\colnum6\colnam ZIP\len6\txt}
  21. {\v7 ORDER_NUM\colnum9\colnam ORDER_NUM\len8\flt}
  22. {\v8 ORDER_DATE\colnum8\colnam ORDER_DATE\len8\dat}
  23. {\v9 QTY\colnum16\colnam QTY\len8\flt}
  24. {\v10 PART_NUM\colnum15\colnam PART_NUM\len8\flt}
  25. {\v11 PRICE\colnum19\colnam PRICE\len8\flt}
  26. {\v12 total{\expcr9 PRICE*QTY}\flt}
  27. {\v13 CNT{\expcr23 RunningCount(order_num)}\flt}
  28. {\v14 total_order{\expcr23 Sum( total, ORDER_NUM )}\flt}
  29. {\v15 TPS{\expcr21 Sum( QTY, ORDER_NUM )}\flt}
  30. {\v16 CUST_ID\colnum1\colnam CUST_ID\len8\flt}
  31. {\v17 SHIP_NAME\colnum12\colnam SHIP_NAME\len26\txt}
  32. {\v18 SHIP_ADDR\colnum10\colnam SHIP_ADDR\len26\txt}
  33. {\v19 SHIP_CITY\colnum11\colnam SHIP_CITY\len21\txt}
  34. {\v20 SHIP_STATE\colnum13\colnam SHIP_STATE\len3\txt}
  35. {\v21 SHIP_ZIP\colnum14\colnam SHIP_ZIP\len6\txt}
  36. {\v22 DESC\colnum17\colnam DESC\len51\txt}
  37. {\v23 handling_charge{\expcr15 .05*total_order}\flt}
  38. {\v24 tax_rate{\expcr26 if(state="NY",.0825,.0525)}\flt}
  39. {\v25 tax{\expcr20 tax_rate*total_order}\flt}
  40. {\v26 order_total{\expcr35 total_order + handling_charge + tax}\flt}
  41. {\v27 invoice_date{\expcr12 ORDER_DATE+7}\dat}
  42. {\v28 CUST_ID_2\colnum7\colnam CUST_ID\len8\flt}
  43. {\v29 PART_NUM_2\colnum18\colnam PART_NUM\len8\flt}
  44. {\*\vrwqry \qrynam QUERY1\inptyp3 {\*\qrytbl SAMPLES\\CARET\\INVOICE.DBF}
  45. {\*\qrytbl SAMPLES\\CARET\\INVDTL.DBF}
  46. {\*\qrytbl SAMPLES\\CARET\\INVPART.DBF}
  47. {\*\qrytbl SAMPLES\\CARET\\CUST.DBF}
  48. {\*\qrylnk LINK1        INVOICE ORDER_NUM       INVDTL  ORDER_NUM}
  49. {\*\qrylnk LINK2        INVOICE CUST_ID CUST    CUST_ID}
  50. {\*\qrylnk LINK3        INVDTL  PART_NUM        INVPART PART_NUM}
  51. {\*\qrycol CUST_ID      3 }
  52. {\*\qrycol CUST_NAME    3 }
  53. {\*\qrycol ADDRESS      3 }
  54. {\*\qrycol CITY 3 }
  55. {\*\qrycol STATE        3 }
  56. {\*\qrycol ZIP  3 }
  57. {\*\qrycol CUST_ID      0 }
  58. {\*\qrycol ORDER_DATE   0 }
  59. {\*\qrycol ORDER_NUM    0 }
  60. {\*\qrycol SHIP_ADDR    0 }
  61. {\*\qrycol SHIP_CITY    0 }
  62. {\*\qrycol SHIP_NAME    0 }
  63. {\*\qrycol SHIP_STATE   0 }
  64. {\*\qrycol SHIP_ZIP     0 }
  65. {\*\qrycol PART_NUM     1 }
  66. {\*\qrycol QTY  1 }
  67. {\*\qrycol DESC 2 }
  68. {\*\qrycol PART_NUM     2 }
  69. {\*\qrycol PRICE        2 }
  70. {\*\qryord ORDER_NUM    0 0 }
  71. {\map CUST_NAME\mapcol CUST_NAME\maptbl CUST\mapnum2}
  72. {\map ADDRESS\mapcol ADDRESS\maptbl CUST\mapnum3}
  73. {\map CITY\mapcol CITY\maptbl CUST\mapnum4}
  74. {\map STATE\mapcol STATE\maptbl CUST\mapnum5}
  75. {\map ZIP\mapcol ZIP\maptbl CUST\mapnum6}
  76. {\map ORDER_NUM\mapcol ORDER_NUM\maptbl INVOICE\mapnum9}
  77. {\map ORDER_DATE\mapcol ORDER_DATE\maptbl INVOICE\mapnum8}
  78. {\map QTY\mapcol QTY\maptbl INVDTL\mapnum16}
  79. {\map PART_NUM\mapcol PART_NUM\maptbl INVDTL\mapnum15}
  80. {\map PRICE\mapcol PRICE\maptbl INVPART\mapnum19}
  81. {\map CUST_ID\mapcol CUST_ID\maptbl CUST\mapnum1}
  82. {\map SHIP_NAME\mapcol SHIP_NAME\maptbl INVOICE\mapnum12}
  83. {\map SHIP_ADDR\mapcol SHIP_ADDR\maptbl INVOICE\mapnum10}
  84. {\map SHIP_CITY\mapcol SHIP_CITY\maptbl INVOICE\mapnum11}
  85. {\map SHIP_STATE\mapcol SHIP_STATE\maptbl INVOICE\mapnum13}
  86. {\map SHIP_ZIP\mapcol SHIP_ZIP\maptbl INVOICE\mapnum14}
  87. {\map DESC\mapcol DESC\maptbl INVPART\mapnum17}
  88. {\map CUST_ID_2\mapcol CUST_ID\maptbl INVOICE\mapnum7}
  89. {\map PART_NUM_2\mapcol PART_NUM\maptbl INVPART\mapnum18}
  90. }
  91. {\*\vrwsct {\BCK15524 \nstlev1 }
  92. \pard\plain\ql \par\pard\plain\ql \par\pard\plain\ql \par\pard\plain\ql \par\pard\plain\ql 
  93. {\*\vrwsct {\PHD2020 \txthgt \nstlev1 }
  94. \pard\plain\qc {\cf4\b\i\f0\fs36 ACE COMPUTER COMPANY}\par\pard\plain\qc {\cf4\b\i\f1\fs20 18 Industrial Park Road}\par\pard\plain\qc {\cf4\b\i\f1\fs20 Lexington, MA  02173}\par\pard\plain\qc {\cf4\b\i\f1\fs20 (617) 862-1111}\par\pard\plain\ql \par\pard\plain\qc {\cf9\b\f0\fs36 Invoice}\par\pard\plain\qr {\f0\fs20 Page }{\f0\fs20 {\*\varref _pagenumber}}
  95. {\*\vrwgrf {\vrwbmp 810 0 1774 964 SAMPLES\\CARET\\ACE.BMP}}
  96. {\*\vrwsct {\GHD3129 \txthgt \rptbrk \rstpagno \nstlev1 {\grpvbllst ORDER_NUM}}
  97. \pard\plain\ql \par\pard\plain\trowd \trgaph90\trleft-90\cellx1260\cellx3870\cellx4140\cellx5580\cellx8190\cellx8820
  98. {\*\vrwcoldef1}
  99. \intbl \ql {\b\f0\fs20 Sold To:}\cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref CUST_NAME\trmblk}}{\*\brdwid18}\brdrt\brdrl\brdrr\brdrs\brdrw18\cell\pard\plain\intbl \ql \cell\pard\plain\intbl \ql {\b\f0\fs20 Ship To:}\cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref SHIP_NAME\trmblk}}{\*\brdwid18}\brdrt\brdrl\brdrr\brdrs\brdrw18\cell\pard\plain\intbl \ql \cell\pard\plain\row
  100. \pard \intbl \ql {\f0\fs20   }\cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref ADDRESS\trmblk}}{\*\brdwid18}\brdrl\brdrr\brdrs\brdrw18\cell\pard\plain\intbl \ql \cell\pard\plain\intbl \ql \cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref SHIP_ADDR\trmblk}}{\*\brdwid18}\brdrl\brdrr\brdrs\brdrw18\cell\pard\plain\intbl \ql \cell\pard\plain\row
  101. \pard \intbl \ql \cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref CITY\trmblk}}{\f1\fs20 , }{\f1\fs20 {\*\varref STATE\trmblk}}{\f1\fs20  }{\f1\fs20 {\*\varref ZIP\trmblk}}{\*\brdwid18}\brdrb\brdrl\brdrr\brdrs\brdrw18\cell\pard\plain\intbl \ql \cell\pard\plain\intbl \ql \cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref SHIP_CITY\trmblk}}{\f1\fs20 , }{\f1\fs20 {\*\varref SHIP_STATE\trmblk}}{\f1\fs20  }{\f1\fs20 {\*\varref SHIP_ZIP\trmblk}}{\*\brdwid18}\brdrb\brdrl\brdrr\brdrs\brdrw18\cell\pard\plain\intbl \ql \cell\pard\plain\row
  102. \pard \ql \par\pard\plain\ql \par\pard\plain\trowd \trgaph90\trleft-90\cellx1260\cellx3870\cellx4140\cellx5580\cellx8190\cellx8820
  103. {\*\vrwcoldef1}
  104. \intbl \qr {\f0\fs20 Order #}\cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref ORDER_NUM}}\cell\pard\plain\intbl \ql \cell\pard\plain\intbl \ql \cell\pard\plain\intbl \ql \cell\pard\plain\intbl \ql \cell\pard\plain\row
  105. \pard \intbl \qr {\f0\fs20 Date:}\cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref ORDER_DATE}}\cell\pard\plain\intbl \ql \cell\pard\plain\intbl \qr {\f0\fs20 Invoice Date:}\cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref invoice_date}}\cell\pard\plain\intbl \ql \cell\pard\plain\row
  106. \pard \ql \par\pard\plain\ql \par\pard\plain\trowd \trgaph90\trleft-90\cellx810\cellx2250\cellx5310\cellx6660\cellx7830\cellx8820
  107. {\*\vrwcoldef2}
  108. \intbl \qc {\f0\fs20 Item}{\*\brdwid18}\brdrt\brdrb\brdrl\brdrr\brdrs\brdrw18\cell\pard\plain\intbl \ql {\f0\fs20 Part #}{\*\brdwid18}\brdrt\brdrb\brdrl\brdrs\brdrw18\cell\pard\plain\intbl \ql {\f0\fs20 Description}{\*\brdwid18}\brdrt\brdrb\brdrl\brdrs\brdrw18\cell\pard\plain\intbl \qr {\f0\fs20 Quantity}{\*\brdwid18}\brdrt\brdrb\brdrl\brdrs\brdrw18\cell\pard\plain\intbl \qr {\f0\fs20 Price}{\*\brdwid18}\brdrt\brdrb\brdrl\brdrs\brdrw18\cell\pard\plain\intbl \qr {\f0\fs20 Total }{\*\brdwid18}\brdrt\brdrb\brdrl\brdrr\brdrs\brdrw18\cell\pard\plain\row
  109. \pard \intbl \qr \cell\pard\plain\intbl \qr \cell\pard\plain\intbl \qr \cell\pard\plain\intbl \qr \cell\pard\plain\intbl \qr \cell\pard\plain\intbl \qr \cell\row
  110. {\*\vrwsct {\BDY471 \keptgr \txthgt \kepnxt \nstlev1 }
  111. \pard\plain\intbl \qc {\f1\fs20 {\*\varref CNT}}\par\pard\plain\intbl \qc \cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref PART_NUM}}\cell\pard\plain\intbl \ql {\f1\fs20 {\*\varref DESC}}\par\pard\plain\intbl \ql \cell\pard\plain\intbl \qr {\f1\fs20 {\*\varref QTY}}\cell\pard\plain\intbl \qr {\f1\fs20 {\*\varref PRICE\pic #,##0.00 }}\cell\pard\plain\intbl \qr {\f1\fs20 {\*\varref total\pic #,##0.00 }}\cell\row
  112. {\*\vrwsct {\GFT2102 \pagbrk \rplpagftr \nstlev1 {\grpvbllst ORDER_NUM}}
  113. \pard\plain\trowd \trgaph90\trleft-90\cellx3600\cellx6930\cellx8820
  114. {\*\vrwcoldef4}
  115. \intbl \qr {\b\f0\fs20 Total Items Ordered:  }{\b\f0\fs20 {\*\varref TPS}}{\*\brdwid18}\brdrt\brdrs\brdrw18\cell\pard\plain\intbl \qr {\b\f0\fs20 Order Total:}{\*\brdwid18}\brdrt\brdrs\brdrw18\cell\pard\plain\intbl \qr {\b\f0\fs20  }{\b\ul\f0\fs20 {\*\varref total_order\pic #,##0.00 }}{\*\brdwid18}\brdrt\brdrs\brdrw18\cell\pard\plain\row
  116. \pard \intbl \qr \cell\pard\plain\intbl \qr {\f0\fs20 Shipping and handling:}\cell\pard\plain\intbl \qr {\f0\fs20 {\*\varref handling_charge\pic #,##0.00 }}\cell\pard\plain\row
  117. \pard \intbl \qr \cell\pard\plain\intbl \qr {\f0\fs20 Sales tax (}{\f0\fs20 {\*\varref tax_rate\pic 0.00% }}{\f0\fs20 ):}\cell\pard\plain\intbl \qr {\ul\f0\fs20 {\*\varref tax\pic #,##0.00 }}\cell\pard\plain\row
  118. \pard \intbl \qr {\b\f0\fs20  }\cell\pard\plain\intbl \qr {\b\f0\fs20 Total Due:}\cell\pard\plain\intbl \qr {\b\f0\fs20  }{\b\f0\fs20 {\*\varref order_total\pic $#,##0.00 }}\cell\pard\plain\row
  119. \pard \intbl \ql {\f0\fs20  }{\*\brdwid18}\brdrb\brdrs\brdrw18\cell\pard\plain\intbl \qr {\f0\fs20 Terms: 0% Net 30}{\*\brdwid18}\brdrb\brdrs\brdrw18\cell\pard\plain\intbl \ql {\*\brdwid18}\brdrb\brdrs\brdrw18\cell\pard\plain\row
  120. \pard \qc 
  121. }
  122.