home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / commercial / acp / profesnal / !Entprise / SalesData / Forms / InvoiceImp < prev    next >
Text File  |  1993-12-01  |  6KB  |  146 lines
  1. {
  2. define style "BaseStyle";
  3.  font Trinity.Medium;
  4.  fontsize 14pt;
  5.  spaceabove 0pt;
  6.  spacebelow 0pt;
  7.  leftmargin 1.8pt;
  8.  rightmargin 0pt;
  9.  returnmargin 1.8pt;
  10.  condframethrow 0pt;
  11.  rulewidth 0pt;
  12.  ruleoffset 0pt;
  13.  fontaspect 100%;
  14.  fontcolour rgb=(0,0,0);
  15.  linecolour rgb=(0,0,0);
  16.  rulecolour rgb=(0,0,0);
  17.  justify left;
  18.  underline 0;
  19.  strikeout off;
  20.  script off;
  21.  hyphenate off;
  22.  leader "";
  23.  locktolinespace off;
  24.  ruleaboveoffset 0pt;
  25.  rulecontrol 0;
  26.  vertrulewidth 1pt;
  27.  ruleleftmargin 0pt;
  28.  rulerightmargin 0pt;
  29.  tabs 72pt,144pt,216pt,288pt,360pt,432pt,504pt,576pt,648pt}{
  30. define style "Main Heading";
  31.  font Homerton.Bold;
  32.  fontsize 24pt;
  33.  condframethrow 16.8pt;
  34.  locktolinespace off;
  35.  contents 1;
  36.  shortcut 385}{
  37. define style "Sub-Heading";
  38.  font Homerton.Medium;
  39.  fontsize 18pt;
  40.  condframethrow 16.8pt;
  41.  locktolinespace off;
  42.  contents 2;
  43.  shortcut 386}{
  44. define style "Italic";
  45.  font Trinity.Medium.Italic;
  46.  locktolinespace off;
  47.  shortcut 387}{
  48. define style "Bold";
  49.  font Trinity.Bold;
  50.  locktolinespace off;
  51.  shortcut 388}{
  52. define ruler "1in indent";
  53.  leftmargin 72pt;
  54.  rightmargin 0pt;
  55.  returnmargin 72pt;
  56.  locktolinespace off;
  57.  shortcut 393;
  58.  tabs 144pt,216pt,288pt,360pt,432pt,504pt,576pt}{
  59. define ruler "Hanging indent";
  60.  leftmargin 72pt;
  61.  returnmargin 48pt;
  62.  locktolinespace off;
  63.  shortcut 458;
  64.  tabs 72pt,144pt,216pt,288pt,360pt,432pt,504pt,576pt}{
  65. define style "Table";
  66.  leftmargin 70.9pt;
  67.  returnmargin 70.9pt;
  68.  rulewidth 1pt;
  69.  ruleoffset 0pt;
  70.  rulecolour rgb=(0,0,0);
  71.  locktolinespace off;
  72.  ruleaboveoffset 0pt;
  73.  rulecontrol 6;
  74.  vertrulewidth 1pt;
  75.  ruleleftmargin 57.5pt;
  76.  rulerightmargin 467.7pt;
  77.  shortcut 459;
  78.  tabs vertrule 56.7pt,vertrule 155.9pt,170.1pt,vertrule 255.1pt,269.3pt,vertrule 354.3pt,368.5pt,vertrule 467.7pt}{
  79. define ruler "RulerItems";
  80.  leftmargin 0pt;
  81.  rightmargin 0pt;
  82.  returnmargin 0pt;
  83.  locktolinespace off;
  84.  tabs 36.4pt,96pt,right 313.2pt,decimal 378.8pt,right 421.2pt,decimal 476.4pt,right 518pt}{
  85. define ruler "Ruler2";
  86.  leftmargin 0pt;
  87.  rightmargin 0pt;
  88.  returnmargin 0pt;
  89.  locktolinespace off;
  90.  tabs 31pt,367pt}{
  91. define ruler "Ruler3";
  92.  leftmargin 0pt;
  93.  rightmargin 0pt;
  94.  returnmargin 0pt;
  95.  locktolinespace off;
  96.  tabs 28.8pt,112.8pt,312pt,412pt}{
  97. define style "Typewriter";
  98.  font Corpus.Medium;
  99.  fontsize 12pt;
  100.  locktolinespace off}!{justify centre}                  ***   {justify}{justify centre}Micro Trader Invoice Form, for use with Impression only. ***{justify}
  101. #INSERTS [ ]    ! Redefine Insert item delimiters.
  102. #SCREEN  The following line defines the on screen invoice format:-
  103. !  [I0:>2] [I10:>8] [I11:<24] [I1:>4] [I2:>11] [I3:>3] [I5:>12] [I6:<1]
  104.  
  105. {fontsize 24pt}{font Trinity.Bold.Italic}{justify centre}[I33]{justify}{font}{fontsize}
  106. {"Ruler2" on}{font Trinity.Medium}{"Italic" on}{fontsize 18pt}{"Italic" off}{font}{font Trinity.Bold.Italic}{justify centre}[SY0]{justify}{"Ruler2" off}{fontsize}{font}{font Trinity.Medium}{"Ruler2" on}
  107. {tab}{"Italic" on}{fontsize 18pt}To:-{"Ruler2" off}{font}{"Italic" off}{fontsize}{"Ruler2" on}{font Trinity.Medium}
  108. {tab}{"Typewriter" on}{font}{"Ruler2" off}[I41]{"Typewriter" off}{"Ruler2" on}{font Trinity.Medium}{tab}[SY1]
  109. {tab}{"Typewriter" on}{font}[I42]{"Typewriter" off}{font Trinity.Medium}{tab}[SY2] 
  110. {tab}{"Typewriter" on}{font}[I43]{"Typewriter" off}{font Trinity.Medium}{tab}[SY3]
  111. {tab}{"Typewriter" on}{font}[I44]{"Typewriter" off}{font Trinity.Medium}{tab}[SY4]
  112. {tab}{"Typewriter" on}{font}[I45]{"Typewriter" off}{font Trinity.Medium}{tab}[SY5]
  113. {tab}{tab}Tel:  [SY6]
  114. {tab}{tab}Fax:  [SY7]{"Ruler2" off}{font}
  115. {"Ruler3" on}{underline 1}                                                                                                                                                     
  116. {underline}{tab}{"Italic" on}Account No:{tab}{"Typewriter" on}{"Italic" off}[SL0]{"Typewriter" off}{font Corpus.Medium}{tab}{font}{"Italic" on}Invoice Date{"Italic" off}{font Corpus.Medium}:{tab}{"Typewriter" on}{font}[I29]  {"Typewriter" off}
  117. {"Italic" on}{tab}Order No:{tab}{"Typewriter" on}{"Italic" off}[I38]{"Typewriter" off}{font Corpus.Medium}{tab}{font}{"Italic" on}Date of Issue:{tab}{"Typewriter" on}{"Italic" off}[SY22]{"Typewriter" off}{"Italic" on}        {"Italic" off}
  118. {tab}{"Italic" on}Invoice No:{tab}{"Typewriter" on}{"Italic" off}[I28]{"Typewriter" off}{font Corpus.Medium}{tab}{"Italic" on}{font}Vat reg. No:{"Italic" off} {tab}{"Typewriter" on}[SY8]{"Typewriter" off}
  119. {underline 1}                                                                                                                                                     
  120. {underline}
  121. {"Ruler3" off}{"Italic" on}{underline 1}{"RulerItems" on}{"Bold" on}{fontsize 12pt}{font Homerton.Bold}Item{underline}  {underline 1}Stock No.{underline}   {underline 1}Description of Item{underline}                         {underline 1}Qty{underline}          {underline 1}Item Price{underline}    {underline 1}Disc%{underline}     {underline 1}Total{underline}  {underline 1}Vat{font}{fontsize}{"Bold" off}{underline}{"Italic" off}
  122. {"Typewriter" on}
  123. #lines = 0
  124. #SELECT  I 1
  125. #WHILE  I
  126. [I0]{tab}[I10]{tab}[I11]{tab}[I1]{tab}[I2]{tab}[I3]{tab}[I5]{tab}[I6]{fontsize 12pt}
  127. {fontsize}#lines & 1
  128. #NEXT I
  129. #LOOP
  130. #WHILE lines < 20
  131. #lines & 1
  132.  
  133. #LOOP
  134. {"RulerItems" off}{underline 1}{"Typewriter" off}                                                                                                                                                    
  135. {underline}{"Ruler3" on}
  136. {"Ruler3" off}{"RulerItems" on}#IF !(I35=0)
  137.                                                                           Trade discount at {"Typewriter" on}[I34]{"Typewriter" off} %{tab}{"Typewriter" on}[I35]{"Typewriter" off}
  138. #ENDIF
  139.    VAT Rates: {tab}code 0   {"Typewriter" on}[SY10]{"Typewriter" off} %{tab}{tab}Goods total:{tab}{"Typewriter" on}[I30]{"Typewriter" off}
  140.                      {tab}code 1   {"Typewriter" on}[SY11]{"Typewriter" off} %{tab}{tab}   VAT total:{tab}{"Typewriter" on}[I31]{"Typewriter" off}
  141. {"RulerItems" off}{"RulerItems" on}{tab}{tab}{"Bold" on}{tab}{tab}{underline 1}Invoice total:{"Bold" off}{tab}{"Typewriter" on}[I32]{"Typewriter" off}
  142. {underline}
  143. {"RulerItems" off}#IF !(I36=0)
  144. Note:    {justify centre} A discount of {"Typewriter" on}[I36]{"Typewriter" off} %  ({"Typewriter" on}[I37]{"Typewriter" off})  may be deducted if this invoice is paid in full within  {"Typewriter" on}[SL13]{"Typewriter" off} days of the above invoice date.{justify}
  145. #ENDIF{tab}
  146.