Module WmlFormat_mixin.pkg

     1//****************************************************************************//
     2//                                                                            //
     3// $File name  : WmlFormat_Mixin.PKG                                          //
     4// $File title : WML conversion functions                                     //
     5// $Author     : John Tuohy                                                   //
     6//                                                                            //
     7// Confidential Trade Secret.                                                 //
     8// Copyright 2000 Data Access Corporation, Miami FL, USA                      //
     9// All Rights reserved                                                        //
    10// DataFlex is a registered trademark of Data Access Corporation.             //
    11// $Rev History                                                               //
    12//                                                                            //
    13//                                                                            //
    14// $Rev History                                                               //
    15//   10/2/00 jjt - created                                                    //
    16//                                                                            //
    17//****************************************************************************//
    18use VDFBase.pkg
    19
    20//  Helper functions for Wml
    21//
    22{ ClassLibrary=Common }
    23Class WmlFormat_mixin is a Mixin
    24
    25   function WmlAnchor     string sDat returns String
    26       function_return ("" + sDat + "")
    27   End_function
    28
    29   function WmlBig        string sDat returns String
    30       function_return ("" + sDat + "")
    31   End_function
    32
    33   function WmlBold       string sDat returns String
    34       function_return ("" + sDat + "")
    35   End_function
    36
    37   function WmlItalics    string sDat returns String
    38       function_return ("" + sDat + "")
    39   End_function
    40
    41   function WmlLink string sURL string sDat string sTitle returns String
    42       If (Num_Arguments>=3) ;
    43          function_return ('+ sURL + '" title="' + sTitle + '">' + sDat + '')
    44       else ;
    45          function_return ('+ sURL + '">' + sDat + '')
    46   End_function
    47
    48   function WmlSmall      string sDat returns String
    49       function_return ("" + sDat + "")
    50   End_function
    51
    52   function WmlStrong     string sDat returns String
    53       function_return ("" + sDat + "")
    54   End_function
    55
    56   function WmlEm  string sDat returns String
    57       function_return ("" + sDat + "")
    58   End_function
    59
    60
    61end_class