Conference vaxuum::document_ft

 Following the Interoffice Memo, the jump to a standard Digital letter
 format was a small one. Hence, find underneath the dutch Digital letter
 design, taken from the standard LETTER environment. Again, you may
 want to edit the \decheaderlines which now contain our dutch office address.
 We like fanmail, but would not like to deprive you of yours.

 The DOC$DESIGNS.DAT file needs another line, defining e.g. DECLETTER
 which uses the TAG$LETTER definitions and the DECLETTER.DESIGN design file.
 (We've modified the TAG$LETTER.STT file to replace the "Date:" text by
 "Utrecht," as a proper date header when <MEMO_DATE> is used.

 For the Digital logo in the left margin, you need the DIGITAL14.TFM and .NFT
 from IJSAPL::DOC$LN03_FONTS:  directory.

Theo
---------------------------------------------DECLETTER.DESIGN----------------

%
% File: DECLETTER.DESIGN
%    Based on
% File: TEX$LETTER.DESIGN
%
%   Author:   Theo de Klerk
%   Date:     87 07 22
%
%++
% Facility:
%   VAX DOCUMENT
%
% Abstract:
%   This file specifies design parameters for the VAX DOCUMENT standard
%   doctype DECLETTER (simple DEC business letters and memos).
%
% No headings are supported other than \mainhead and \chead
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\global\def\SDMLdoctype{LETTER}

% Set overall page layout parameters
% Calculate vertical and horizontal page size
%
              
\parskip=0pt  
\parindent=0pt 
\raggedbottom 
%
\hsize=15cm
\hoffset=15mm   % left margin 4cm from edge
                % to center text on 8 1/2" x 11" paper

% Calculate and set \vsize:
% image area    =60.5pc
% \headeroffset = 2.5pc
% header depth  = 1.5pc
% \footeroffset = 2.5pc
%
% image area - \headeroffset - header depth - \footeroffset = \vsize
% 60.5pc       - 2.5           - 1.5pc        - 2.5           = 54pc

%\vsize=50pc  
\vsize=26cm
\voffset=-11mm         % start 11mm from top edge

\headeroffset=-2.5pc   % from header baseline to top of text (or rule) 
\footeroffset=2.5pc    % from bottom of page to footer baseline           
\def\footnoterule{}    % no footnote  rule
\setfootnotefont{\sixpoint}   % in small letters

% Page text body dimensions
%
\physicalpagewidth=\hsize  % capture original value of \hsize
\gutterwidth=0pc           % 
\blockindent=1.75pc        % 
\setblockindents{0pc}      % first level indent, 0 = no gutter;
                           % rest at increments of \blockindent value
% this uses the default:
\leptwidth=\blockindent 


%  hyphenation:
%
%  Do not hyphenate CAPITALIZED words. Otherwise comment out \uchyph
%  The definitions below are copied from SOFTWARE.REFERENCE which should
%  not hyphenate
%  set \tolerance and \pretolerance both to 10000 to inhibit hyphenation
%  (but justified text         which    may      look    like    Runoff)

%  skip first pass - hyphenate immediately
\pretolerance=-1

\tolerance=1000
\uchyph=-1
\doublehyphendemerits=20000
\finalhyphendemerits=25000

% Load doctype/device-dependent font definition file
% and establish normal text (body text) font
% 
\input DOC$$DEVICE_FONTS:

\def\normaltextfontspecs{\tenpoint\setbaselineskip{12pt}\raggedrightspacing}%
              
% Fonts and formats for running heads 
%            
\def\runheadfont{\ninepoint}% 
\setheaderfont{\runheadfont}        

% Specify the position and format of running heads.
% Both even and odd pages set 'Page n' at the top
%

\def\rightheaderline{%    
  \hbox to \physicalpagewidth{\hss \headerfont \strut \rightheader}%    
}   

\def\leftheaderline{%    
  \hbox to \physicalpagewidth{\hss \headerfont \strut \rightheader}%    
}   
\setrightheader{Page \number\pageno}
\setleftheader{Page \number\pageno}
\omitnextheader
% No footers
\def\rightfooterline{}
\def\leftfooterline{}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Special definitions
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% The next part defines the digital logo, that is found
% in DOC$LN03_FONTS:DIGITAL14.TFM and .NFT
%
% It should be included in the TEX file pointed to by DOC$LOCAL_ELEMENTS 
% usually in DOC$ROOT:[LOCAL.FORMATS]CUP$LOCAL_ELEMENTS.TEX
% It is included on IJSAPL in CUP$IJSAPL_ELEMENTS.TEX, but included here
% too to make it independent of all this
%
\def\normaldeclogo{ %
  \iflnthree \readfont\digitalxiv{digital14}
              {\digitalxiv \vrule width 0pt height 16pt
               d\kern4pt i\kern4pt g\kern4pt
               i\kern4pt t\kern4pt a\kern4pt l\kern4pt }
  \else  \declogo \fi                % remainder takes standard logo
}

%
%  Include standard footnote - don't know how to get rid of the bar
%
\footnote{}{Handelsregister KvK Utrecht 51562 - Bank A.B.N. Utrecht account
no. 55.50.28.399 - Postrekening van de bank 1412 \block{1}
Op alle aanbiedingen en afleveringen zijn onze Algemene Verkoopsvoorwaarden,
zoals gedeponeerd bij de Kamer van Koophandel, Utrecht, 
\block{1} onder nummer 535, van toepassing}
%

% start writing header lines
\def\decheaderlines{%
   \hbox to \hsize{%
     \vbox{%
        \hbox{\ninepoint\rm Digital Equipment bv}%
        \hbox{\ninepoint\rm Europalaan 44 -- 3526 KS Utrecht}%
        \hbox{\ninepoint\rm Postbus 9064 -- 3506 GB Utrecht}%
        \hbox{\ninepoint\rm Nederland}%
        \hbox{\ninepoint\rm Telefoon (030) 839111}%
        \hbox{\ninepoint\rm Telex 40370 dec nl}%
       }%  end vbox
     }%   end hbox
}    % end \decheaderlines

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% We don't want FROM - its always from Digital - make it identical no
% "No action"
%
\def\fromaddress#1#2#3#4#5{}

%%%%%%%%%%%%%%%%%%%%
% \toaddress#1#2#3#4#5
%
\newtoks\nullarg\nullarg={0arg}
\newtoks\checkarg
\def\toaddress#1#2#3#4#5{
  \decheaderlines   % output header address
  \squashprevdepth
  \vskipbb{25mm}
  \hbox to \hsize
     {\hbox to 0pt{\kern-3cm \normaldeclogo\hss}%   chicklet logo in margin
%TDK--->      \kern0pt\hbox to 0pt{\block{1}#1}%  use whatever is needed - no indent
      \hbox to 0pt{#1}%                             use whatever is needed - no indent
     }\par
  \ifx0#2\else\block{1}#2\par\fi
  \ifx0#3\else\block{1}#3\par\fi
  \ifx0#4\else\block{1}#4\par\fi
  \ifx0#5\else\block{1}#5\par\fi
}
%%%%%%%%%%%%%%%%%%%%
% \salutation
% 
\def\salutation#1{\par
   \vskipbb{24pt}\block{1}#1\par
   \vskipbb{24pt}\firstelementtrue}

%%%%%%%%%%%%%%%%%%%%
% \closing
%  #1 is the name
%  #2 through #5 are optional information placed beneath room for signature
%
\def\closing#1#2#3#4#5{\squashprevdepth
  \neverbreak
  \vbox{%keep this all together
     \vskipbb{36pt}
     \hbox to \hsize{\hskip 20pc #1\hfil}% adjust this as needed
     \ifx0#2\else
      \vskipbb{48pt}
      \hbox to \hsize{\hskip 20pc #2\hfil}% adjust this as needed
      \ifx0#3\else\par
        \hbox to \hsize{\hskip 20pc #3\hfil}% adjust this as needed
        \ifx0#4\else\par
          \hbox to \hsize{\hskip 20pc #4\hfil}% adjust this as needed
          \ifx0#5\else\par
            \hbox to \hsize{\hskip 20pc #5\hfil}% adjust this as needed
          \fi
        \fi
      \fi
     \fi
     }
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% MEMO definitions
%
\def\memoheaderfont{\fourteenssbf}
\def\memokeywordfont{\tenpointss\bf}
\def\memoheader{%
   \centerline{\memoheaderfont INTEROFFICE MEMORANDUM}\par
   \vskipbb{36pt}\firstelementtrue}

%%%%%%%%%%%%%%%%%%%%
% \memoto#1#2#3#4#5
%
\def\memoto#1#2#3#4#5{\squashprevdepth
  \vskipbb{24pt}
  \hangblockafterturnaround{1}%
    \hbox to 3.5pc{\memokeywordfont To:\hfil}\turnaround #1
  \if 0#2\else\newline #2\fi
  \if 0#3\else\newline #3\fi
  \if 0#4\else\newline #4\fi
  \if 0#5\else\newline #5\fi\par
}

%%%%%%%%%%%%%%%%%%%%
% \memofrom#1#2#3#4#5
%
\def\memofrom#1#2#3#4#5{\squashprevdepth
  \vskipbb{24pt}
  \hangblockafterturnaround{1}%
     \hbox to 3.5pc{\memokeywordfont From:\hfil}\turnaround #1
  \ifx0#2\else\newline #2\fi
  \ifx0#3\else\newline #3\fi
  \ifx0#4\else\newline #4\fi
  \ifx0#5\else\newline #5\fi\par\firstelementtrue
}

%%%%%%%%%%%%%%%%%%%%
% \memoline#1#2
%
\def\memoline#1#2{\squashprevdepth
  \vskipbb{12pt}
%removed---  \hangblockafterturnaround{1}%
%removed---    \hbox to 3.5pc{\memokeywordfont #1\hfil}\turnaround #2
    \hbox to \hsize{\hskip 20pc \memokeywordfont #1  #2 \hfil }%
    \par
}


%%%%%%%%%%%%%%%%%%%%
% \subject#1
%
\def\subject#1{\squashprevdepth
    \vskipbb{24pt}
    \hangblockafterturnaround{1}%
     \hbox to 4.5pc{\memokeywordfont Subject:\hfil}\turnaround #1\par
     \vskipbb{24pt}\firstelementtrue}

%%%%%%%%%%%%%%%%%%%%
% \singlecc
%
\def\singlecc#1{%
   \vskipbb{24pt}
   \block{1}%
   \hbox to 3.5pc{\memokeywordfont cc:\hfil}#1\par
}
%%%%%%%%%%%%%%%%%%%%
% \cclist and \cc
%
\def\cclist{\vskipbb{24pt}
   \hangblockafterturnaround{1}%
     \hbox to 3.5pc{\memokeywordfont cc:\hfil}\turnaround}

%%%%%%%%%%%%%%%%%%%%
% \cc
%   #1 is the name
%   #2 = 1, first name (no \newline in front of it)
%
\def\cc#1#2{%
   \if 1#2\else\newline\fi #1}

\def\endcclist{\par}

%%%%%%%%%%%%%%%%%%%%
% \distlist
%
\def\distlist{\par
  \vskipbb{40pt}\hbox{\memokeywordfont DISTRIBUTION:}
  \vskipbb{24pt}\spacingasis}

\def\enddistlist{\endspacingasis}

% Paragraphs in text
%
\paravskip=18pt   
\cparavskip=18pt 

% Lists
%
\prelevskip=18pt               
\postlevskip=22pt             
%
% paragraphs inside lists
\listparavskip=18pt

%
% unnumbered lists
\betulevskip=18pt             

%
% numbered lists
\let\numfont=\normaltextfontspecs %\tenssbf                 % for numbers only
\betnlevskip=18pt        


% Centered headings
%
\def\centeredheadfontspecs{\twelvepointss\bf}%
\preheadonevskip=26pt    % used in \mainhead as well
\postheadonevskip=22pt
%
\def\centeredhead#1#2{\par\squashprevdepth%
   \begingroup\centeredheadfontspecs
   \if 0#2\vskipbb{\preheadonevskip}%
     \else\vfill\supereject\fi
   \centerline{#1}\par\endgroup
   \neverbreak\vskipbb{\postheadonevskip}
}


% Unnumbered major heading
% if #2 = 1, this heading also forces a new page before printing
%
\def\mainheadfontspecs{\twelvepointss\bf}
\def\mainhead#1#2{\par\squashprevdepth
  \if 0#2%
  \window{80pt}                        % assure enough room left on page.
  \greatbreak                          % great place for a page break
                                       % (assuming \window didn't force one).
   \else\vfill\supereject\fi
   \begingroup\mainheadfontspecs
     \vskipbb{\preheadonevskip}%
     \block{1}\rrag #1\par
   \endgroup
  \neverbreak                          % horrible place for page break
  \vskipbb{\postheadonevskip}%
}                


% Subordinate headings
%
% subhead level 1
\def\subheadonefontspecs{\tenpointss\bf}%
\presubheadonevskip=22pt
\postsubheadonevskip=14pt            % vertical skip following <subhead1>

% subhead level 2
\def\subheadtwofontspecs{\tenpointss\bf}%
\presubheadtwovskip=18pt% 


% Monospaced examples
%
% code examples
%
\let\codexamplefont=\ninepointmono            % for code example text
\precodexamplevskip=15pt
\codexampleindent=1.75pc                     % must be in blockindent units
\let\codexampleintextfont=\tenit             % code fragments in text
\asisinterlinepenalty=2000                   % be tolerant of page breaking

% default macro for \setwidecodexample is not appropriate
% for this document style; there is no extra horizontal space
% available on the page. Make it do the same as \setfullwidthpageexample:
%
\def\setwidecodexample{%
  \sevenpointmono}%


% references to keyboard keys
\def\codexamplekeyfont{\sevenmn}%      use monospaced font in monospaced zones
\def\keyfont{\eightss}%                use sans serif font in text zones

% references to TeX
\def\texstufffont{\ninepointmono}%


% Figures and Examples, Formal
%
%  captions
%
\def\captionfontspecs{\tenpoint\bf}%
\precaptionvskip=18pt
\postcaptionruleht=1pt
\captorulebb=10pt
\postinsertruleht=1pt

%


% Notes in text body
%     
\noteformattype=\centerednote
%
\def\notefontspecs{\tenpoint\bf}%
\def\notewordfontspecs{\tenpoint\bf}%
\uppercasenotewordtrue
%
\prenotewordvskip=20pt
\prenotevskip=18pt
\notemargin=1.5pc              % decrease left and right margins for note 
\def\notedelim{}%                no delimiter on the noteword

% Footnotes in text
%
\setfootnotefont{\tenpoint\rm}
\def\footnotepar{\hangpar{1pc}}%


% Footnotes in table body
%
\def\tablefnotefontspecs{\eightpointss}%
\tablefnoteruleht=.5pt

% Tables
%     
\let\tablefontspecs=\ninepointss          
\normaltablerowvskip=14pt
\innertablevskip=13pt             % table font point size, plus 4pts
\tableparavskip=13pt
%
%  table column headings
%
\let\tableheadfontspecs=\ninepointss      
\tableheadlead=12pt     
\tablepostheadvskip=12pt 
\postheadedtablevskip=22pt
\preheadedtablevskip=18pt 
\tableheadruleht=1pt


% Formal tables, addt'l parameters
%
\def\tablecaptionfont{\tenpoint\bf}%
\tablecaptionlead=10pt   
\tablecaptionruleht=0pt
\endformaltableruleht=1pt
\tablepostcaptionvskip=8pt
\postformaltablevskip=22pt
\preformaltablevskip=18pt


% Qualifier/parameter definition lists
%
\def\pqitemfontspecs{\tenpointss\bf}%
\def\pqnonefontspecs{\normaltextfontspecs}%
\prepqdeflistvskip=\paravskip           % skip when there is no heading 
\prepqitemvskip=22pt                    % skip for items after the first
\prepqdefvskip=13pt                     % skip between item(s) and definition
\prepqnonevskip=18pt                    % skip when 'None' is to be output

%
% \pqdeflisthead
% #1 = text
% #2 = block indent
%    this macro checks context (if reference, use \templateheadone)
%
\def\pqdeflisthead#1#2{%
   \ifreferencecontext
   \templateheadone{#1}\else
   \subheadone{#2}{#1}\fi
   \global\firstelementfalse
}


% \setlpdesign
% 
%   modifies some page dimensions for output on the line printer
\global\def\setlpdesign{%
   \gutterwidth=0pt%          override LPCHARS default setting
   \hsize=32pc% decrease slightly
   \physicalpagewidth=\hsize% reset for new value
   \setblockindents{0pc}%
   \vsize=40pc
   \postsubheadonevskip=18pt% vertical skip following <subhead1>
}

  

    
    Theo's problem with the paragraph indention is a result of using
    
    \blockindent=0pt
    
    (I'm sure this isn't the intention; the blockindent value tells
    how much space between successive indent levels.) Further, there
    is no \setblockindents, so the XXX_MEMO design is getting the
    blockindent levels set in TEX$REPORT, but those values are not in
    synch with the above. This \blockindent=0 should be removed and
    the paragraphs will line up.
    
    Using \vsize=27cm produces correct results on the LN03. I'm sure
    the other problems are a result of the LN01S restrictions.
    
     

 I've just come to the same conclusion comparing my DECmemo with DECletter.
 I only used LN03's so I'm still unsure whether the \vsize=27cm doesn't
 give me any problems anymore. It sure did upto now and I could not see
 why.

Theo