Procedure RightJustify(StIn:String;Var StOut:String;
                           Margin:Byte;JType:JustifyFormats);

    This  procedure  takes  a  string  of  length  <=  margin  and  right
    justifies the text.  This very database  had been processed with this
    procedure.  It is common for  paragraphs  to be right justified.  All
    the lines  except  the  last  line  of  a  paragraph  should be right
    justified.

    JType is one of the following:

         LeftText
         CentreText
         RightText
         OutSideText

    This determines whether  the  text  is  justified  from the left, the
    centre, the right  or  from  the  outside  (left  and  right  edges).
    Using  CentreText  or   OutSideText   is  recommended  otherwise  the
    text looks a little odd.