<?xml version="1.0" encoding="utf-8" standalone="no"?>
<TfrxReport Version="6.1.3" DotMatrixReport="False" EngineOptions.DoublePass="True" EngineOptions.NewSilentMode="simReThrow" IniFile="\Software\eStream\SQL Account\4\Fast Reports" PreviewOptions.Buttons="167935" PreviewOptions.Zoom="1" PreviewOptions.PictureCacheInFile="True" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="41631.3627038542" ReportOptions.Description.Text="Datamap=TdvSLIV&#13;&#10;GUID={B2F6B3F9-FD6B-4968-8FDD-0F986A87CB12}" ReportOptions.Name="Sales Invoice 7 (GST 1)" ReportOptions.LastChange="43272.3924689583" ScriptLanguage="PascalScript" ScriptText.Text="// Use ItemCode ST-R &#38; ST-T as indicator&#13;&#10;const MaxInt = 2147483647;&#13;&#10;var lSQL : String;&#13;&#10;    ANos : Integer;&#13;&#10;&#13;&#10;function StringReplace(const S, OldPattern, NewPattern: string;&#13;&#10;  iReplaceAll: boolean=true; iIgnoreCase :boolean=true): string;&#13;&#10;var&#13;&#10;  SearchStr, Patt, NewStr: string;&#13;&#10;  Offset: Integer;&#13;&#10;begin&#13;&#10;// Usage StringReplace(&#60;Main.&#34;DOB&#34;&#62;,'/','')&#13;&#10;  if iIgnoreCase then begin&#13;&#10;    SearchStr := UpperCase(S);&#13;&#10;    Patt := UpperCase(OldPattern);&#13;&#10;  end else begin&#13;&#10;    SearchStr := S;&#13;&#10;    Patt := OldPattern;&#13;&#10;  end;&#13;&#10;  NewStr := S;&#13;&#10;  Result := '';&#13;&#10;  while SearchStr &#60;&#62; '' do begin&#13;&#10;    Offset := Pos(Patt, SearchStr);&#13;&#10;    if Offset = 0 then begin&#13;&#10;      Result := Result + NewStr;&#13;&#10;      Break;&#13;&#10;    end;&#13;&#10;    Result := Result + Copy(NewStr, 1, Offset - 1) + NewPattern;&#13;&#10;    NewStr := Copy(NewStr, Offset + Length(OldPattern), MaxInt);&#13;&#10;    if not iReplaceAll then begin&#13;&#10;      Result := Result + NewStr;&#13;&#10;      Break;&#13;&#10;    end;&#13;&#10;    SearchStr := Copy(SearchStr, Offset + Length(Patt), MaxInt);&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure GetEMailTpl;&#13;&#10;var D  : TfrxDataSet;&#13;&#10;   lFN : String;&#13;&#10;begin&#13;&#10;  lFN := Trim(Report.ReportOptions.Name);&#13;&#10;  lFN := StringReplace(lFN,'.fr3','');&#13;&#10;  D := Report.GetDataSet('plEMailTpl');&#13;&#10;  D.First;&#13;&#10;  While not D.Eof do begin&#13;&#10;    if Trim(D.Value('ReportName')) = lFN then&#13;&#10;      Break;&#13;&#10;    D.Next;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;function GetPassword:String;&#13;&#10;begin&#13;&#10;  if Trim(&#60;Document_Company.&#34;Remark&#34;&#62;) &#60;&#62; '' then&#13;&#10;    Result := &#60;Document_Company.&#34;Remark&#34;&#62; else&#13;&#10;    Result := &#60;plEMailTpl.&#34;PDFPassWord&#34;&#62;;&#13;&#10;end;&#13;&#10;&#13;&#10;function GetFldInfo(const AStr:String):String;&#13;&#10;var D : TfrxDataSet;&#13;&#10;    nStr : String;&#13;&#10;    lSL,lPL : TStringList;&#13;&#10;    i, j : integer;&#13;&#10;begin&#13;&#10;  nStr := AStr;&#13;&#10;  lSL := TStringList.Create;&#13;&#10;  lPL := TStringList.Create;&#13;&#10;  with lPL do begin //Available Pipeline&#13;&#10;    Add('Main');&#13;&#10;    Add('Profile');&#13;&#10;    Add('plEMailTpl');&#13;&#10;  end;&#13;&#10;  try&#13;&#10;    for j:=0 to lPL.Count -1 do begin&#13;&#10;      D := Report.GetDataSet(lPL[j]);&#13;&#10;      D.GetFieldList(lSL);&#13;&#10;      for i:=0 to lSL.Count -1 do begin&#13;&#10;        if D.IsBlobField(lSL[i]) then&#13;&#10;          nStr := StringReplace(nStr, '&#60;'+ lPL[j] + '.' + lSL[i] + '&#62;',D.Value(lSL[i])) else&#13;&#10;         nStr := StringReplace(nStr, '&#60;'+ lPL[j] + '.' + lSL[i] + '&#62;',D.DisplayText(lSL[i]));&#13;&#10;      end;&#13;&#10;    end;&#13;&#10;    Result := nStr;&#13;&#10;  finally&#13;&#10;    lSL.Free;&#13;&#10;    lPL.Free;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;//For E-Mail Client (Batch)&#13;&#10;procedure OnGetEmailSettings(EmailSettings: TStrings);&#13;&#10;var vEmail, vName: Variant;&#13;&#10;begin&#13;&#10;  GetEMailTpl;&#13;&#10;  vEmail := Trim(&#60;Document_CompanyBranch.&#34;Email&#34;&#62;);&#13;&#10;  vName := Trim(&#60;Main.&#34;CompanyName&#34;&#62;);&#13;&#10;&#13;&#10;  if (vName &#60;&#62; '' ) and (vEmail &#60;&#62; '') then begin&#13;&#10;    EmailSettings.Values['Recipients'] := vEmail;&#13;&#10;    EmailSettings.Values['CC']         := &#60;plEMailTpl.&#34;CC&#34;&#62;;&#13;&#10;    EmailSettings.Values['BCC']        := &#60;plEMailTpl.&#34;BCC&#34;&#62;;&#13;&#10;    EmailSettings.Values['Subject']    := GetFldInfo(&#60;plEMailTpl.&#34;Subject&#34;&#62;);&#13;&#10;    EmailSettings.Values['Body']       := GetFldInfo(RichTextToPlainText(&#60;plEMailTpl.&#34;Body&#34;&#62;));&#13;&#10;    if Trim(&#60;plEMailTpl.&#34;PDFFileName&#34;&#62;) &#60;&#62; '' then&#13;&#10;      EmailSettings.Values['FileName']    := GetFldInfo(&#60;plEMailTpl.&#34;PDFFileName&#34;&#62;);&#13;&#10;    if Trim(GetPassword) &#60;&#62; '' then&#13;&#10;      EmailSettings.Values['PDFPassword'] := GetPassword;&#13;&#10;  end;&#13;&#10;  //ID uses for display on progress dialog&#13;&#10;  EmailSettings.Values['ID']        := vName;&#13;&#10;end;&#13;&#10;&#13;&#10;//For E-Mail (Native)&#13;&#10;function SQL_Email_GetInfo(Info: Integer): string;&#13;&#10;var vEmail, vName: Variant;&#13;&#10;begin&#13;&#10;  GetEMailTpl;&#13;&#10;  Result := '';&#13;&#10;  vEmail := Trim(&#60;Document_CompanyBranch.&#34;Email&#34;&#62;);&#13;&#10;  vName := Trim(&#60;Main.&#34;CompanyName&#34;&#62;);&#13;&#10;&#13;&#10;  if (vName &#60;&#62; '' ) and (vEmail &#60;&#62; '') then begin&#13;&#10;    case Info of&#13;&#10;      SQL_Email_Address: Result := vEmail;&#13;&#10;      SQL_Email_Subject: Result := GetFldInfo(&#60;plEMailTpl.&#34;Subject&#34;&#62;);&#13;&#10;      SQL_Email_Content: Result := GetFldInfo(RichTextToPlainText(&#60;plEMailTpl.&#34;Body&#34;&#62;));&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;function StrToFloatDef(const lFld:Variant):string;&#13;&#10;begin&#13;&#10;  if Trim(lFld) &#60;&#62; '' then&#13;&#10;    Result := lFld else&#13;&#10;    Result := '0';&#13;&#10;end;&#13;&#10;&#13;&#10;function StrToFltDef(const lFld:Variant):Extended;&#13;&#10;begin&#13;&#10;  if Trim(lFld) &#60;&#62; '' then&#13;&#10;    Result := lFld else&#13;&#10;    Result := 0.00;&#13;&#10;end;&#13;&#10;&#13;&#10;function VarToFloatDef(const lFld:Variant):Integer;&#13;&#10;begin&#13;&#10;  if Trim(lFld) &#60;&#62; '' then&#13;&#10;    Result := lFld else&#13;&#10;    Result := 0;&#13;&#10;end;&#13;&#10;&#13;&#10;function GetTotal(const lFld:String):Variant;&#13;&#10;var D : TfrxDataSet;&#13;&#10;    V : Variant;&#13;&#10;    s : string;&#13;&#10;begin&#13;&#10;  D := Report.GetDataSet('Document_Detail');&#13;&#10;  V := 0;&#13;&#10;  D.First;&#13;&#10;  While not D.Eof do begin&#13;&#10;    V := V + D.Value(lFld);&#13;&#10;    D.Next;&#13;&#10;  end;&#13;&#10;  Result := V;&#13;&#10;end;&#13;&#10;&#13;&#10;function GetSN(const lCode:String):String;&#13;&#10;var D : TfrxDataSet;&#13;&#10;    s : string;&#13;&#10;    i : integer;&#13;&#10;begin&#13;&#10;  Result := '';&#13;&#10;  D := Report.GetDataSet('Document_SerialNumber');&#13;&#10;  i := 1;&#13;&#10;  s := '';&#13;&#10;  D.First;&#13;&#10;  While not D.Eof do begin&#13;&#10;    if Trim(D.DisplayText('Dtlkey')) = Trim(lCode) then begin&#13;&#10;      if i = 1 then&#13;&#10;        s := D.Value('SerialNumber') else&#13;&#10;        s := s + ', ' + D.Value('SerialNumber');&#13;&#10;    end;&#13;&#10;    inc(i);&#13;&#10;    D.Next;&#13;&#10;  end;&#13;&#10;  if Trim(s) &#60;&#62; '' then&#13;&#10;    Result := 'Serial No :- ' + s;&#13;&#10;end;&#13;&#10;&#13;&#10;function GetSubTotal(const lFld,lItemCode:String; lSeq:Variant):Variant;&#13;&#10;var D : TfrxDataSet;&#13;&#10;    V : Variant;&#13;&#10;begin&#13;&#10;  D := Report.GetDataSet('plDoc_Detail');&#13;&#10;  V := 0;&#13;&#10;  D.First;&#13;&#10;  While not D.Eof do begin&#13;&#10;    if Trim(D.DisplayText('Seq')) &#60;&#62; lSeq then begin&#13;&#10;      if Trim(D.DisplayText('ItemCode')) &#60;&#62; 'ST-R' then&#13;&#10;        V := V + D.Value(lFld);&#13;&#10;      if Trim(D.DisplayText('ItemCode')) = lItemCode then&#13;&#10;        V := 0;&#13;&#10;    end else&#13;&#10;      Break;&#13;&#10;    D.Next;&#13;&#10;  end;&#13;&#10;  Result := V;&#13;&#10;end;&#13;&#10;&#13;&#10;function FormatSQLDate(D: TDateTime): String;&#13;&#10;var AFormat: string;&#13;&#10;begin&#13;&#10;  AFormat := 'dd mmm yyyy'; //'dd/mmm/yyyy' if can't&#13;&#10;  Result := QuotedStr(FormatDateTime(AFormat, D));&#13;&#10;//If yr output for TxQuery use below coding&#13;&#10;//  AFormat :='dd/mm/yyyy';&#13;&#10;//  Result := '#'+FormatDateTime(AFormat, D)+'#';&#13;&#10;end;&#13;&#10;&#13;&#10;procedure SetUp;&#13;&#10;var SQL : String;&#13;&#10;begin&#13;&#10;  SQL := 'SELECT B.Description As ReportName, B.Description2 As Subject, B.Description3 As Body, '+&#13;&#10;         'A.Address1 As CC, A.Address2 As BCC, B.Remark1 As PDFPassWord, B.Remark2 As PDFFileName ' +&#13;&#10;         'FROM SL_QT A ' +&#13;&#10;         'INNER JOIN SL_QTDTL B ON (A.Dockey=B.Dockey) ' +&#13;&#10;         'WHERE A.DocNo=''EMAIL'' ';&#13;&#10;  AddDataSet('plEMailTpl', ['ReportName', 'Subject', 'Body', 'PDFPassWord', 'PDFFileName', 'CC', 'BCC'])&#13;&#10;  .GetDBData(SQL);&#13;&#10;&#13;&#10;  SQL := 'SELECT DocKey, ItemCode, UOM, UnitPrice, Disc, MAX(Seq) Seq, Description, Description3, ' +&#13;&#10;		       'SUM(CAST(Qty AS REAL)) Qty, SUM(CAST(Amount AS REAL)) Amount, SUM(CAST(AmountWithTax AS REAL)) AmountWithTax,  '+&#13;&#10;         'SUM(CAST(LocalAmount AS REAL)) LocalAmount, SUM(CAST(LocalAmountWithTax AS REAL)) LocalAmountWithTax,  '+&#13;&#10;         'Tax, Sum(CAST(TaxAmt AS REAL)) TaxAmt, Sum(CAST(LocalTaxAmt AS REAL)) LocalTaxAmt ' +&#13;&#10;         'FROM Document_Detail ' +&#13;&#10;         'GROUP BY DocKey, ItemCode, UOM, UnitPrice, Disc, Tax ';&#13;&#10;  AddDataSet('MergeItemCode', ['Dockey', 'ItemCode', 'UOM', 'UnitPrice', 'Disc', 'Seq', 'Description',&#13;&#10;                               'Description3', 'LocalAmount', 'LocalAmountWithTax',&#13;&#10;                               'Qty', 'Amount', 'AmountWithTax', 'Tax', 'TaxAmt','LocalTaxAmt'])&#13;&#10;  .GetLocalData(SQL)&#13;&#10;  .SetDisplayFormat(['LocalAmount', 'LocalAmountWithTax', 'Amount', 'AmountWithTax',&#13;&#10;                     'TaxAmt','LocalTaxAmt'], &#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;)&#13;&#10;  .SetDisplayFormat(['Qty'],&#60;Option.&#34;StockQuantityDisplayFormat&#34;&#62;)&#13;&#10;  .SetDisplayFormat(['UnitPrice'],&#60;Option.&#34;StockPriceDisplayFormat&#34;&#62;)&#13;&#10;  .LinkTo('Main', 'Dockey', 'Dockey;Seq');&#13;&#10;&#13;&#10;  SQL := 'SELECT Dockey, Count(DISTINCT FromDocKey) Nos FROM Document_Detail ' +&#13;&#10;         'WHERE FromDocKey IS NOT NULL ' +&#13;&#10;         'GROUP BY Dockey';&#13;&#10;  AddDataSet('FromDocCount', ['Nos'])&#13;&#10;  .GetLocalData(SQL)&#13;&#10;  .LinkTo('Main', 'Dockey', 'Dockey');&#13;&#10;&#13;&#10;  SQL := 'SELECT Dockey, Amount, LocalAmount FROM Document_Detail ' +&#13;&#10;         'WHERE ItemCode=''RTN5Cents'' ';&#13;&#10;  AddDataSet('AdjRound', ['Dockey', 'Amount', 'LocalAmount'])&#13;&#10;  .GetLocalData(SQL)&#13;&#10;  .SetDisplayFormat(['Amount, LocalAmount'],&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;)&#13;&#10;  .LinkTo('Main', 'Dockey', 'Dockey');&#13;&#10;&#13;&#10;  SQL := 'SELECT DocKey, ItemCode, Seq, ' +&#13;&#10;		       'CAST(Qty AS REAL) Qty, CAST(Amount AS REAL) Amount, CAST(AmountWithTax AS REAL) AmountWithTax,  '+&#13;&#10;         'CAST(LocalAmount AS REAL) LocalAmount, CAST(LocalAmountWithTax AS REAL) LocalAmountWithTax,  '+&#13;&#10;         'CAST(TaxAmt AS REAL) TaxAmt, CAST(LocalTaxAmt AS REAL) LocalTaxAmt ' +&#13;&#10;         'FROM Document_Detail ' +&#13;&#10;         'ORDER BY Dockey,Seq ';&#13;&#10;  AddDataSet('plDoc_Detail', ['Dockey', 'ItemCode', 'Seq',&#13;&#10;                              'LocalAmount', 'LocalAmountWithTax',&#13;&#10;                              'Qty', 'Amount', 'AmountWithTax',&#13;&#10;                              'TaxAmt','LocalTaxAmt'])&#13;&#10;  .GetLocalData(SQL)&#13;&#10;  .LinkTo('Main', 'Dockey', 'Dockey');&#13;&#10;end;&#13;&#10;&#13;&#10;procedure GroupFooter1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if Engine.FreeSpace &#60; (GroupFooter1.Height + PageFooter1.Height + 30) then Engine.NewPage;&#13;&#10;    Engine.CurY := Engine.PageHeight - GroupFooter1.Height - PageFooter1.Height - 60;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure SetStyle(const lMemo:TfrxMemoView; lType:Integer);&#13;&#10;begin&#13;&#10;  if lType = 1 then begin // Set&#13;&#10;    lMemo.Frame.Typ := 12;&#13;&#10;    lMemo.Frame.BottomLine.Style := fsDouble;&#13;&#10;//    lMemo.AutoWidth := False;&#13;&#10;    Child1.Height := 15;&#13;&#10;  end else begin // Reset&#13;&#10;    lMemo.Frame.Typ := 0;&#13;&#10;    lMemo.Frame.BottomLine.Style := 0;&#13;&#10;//    lMemo.AutoWidth := True;&#13;&#10;    Child1.Height := 0;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure ShowMemo(const B:Boolean);&#13;&#10;begin&#13;&#10;  MmNos.Visible   := B;&#13;&#10;  MmNos.Printable := B;&#13;&#10;  MmQty.Visible   := B;&#13;&#10;  MmQty.Printable := B;&#13;&#10;  MmUOM.Visible   := B;&#13;&#10;  MmUOM.Printable := B;&#13;&#10;  MmUnitPrice.Visible   := B;&#13;&#10;  MmUnitPrice.Printable := B;&#13;&#10;  MmDisc.Visible   := B;&#13;&#10;  MmDisc.Printable := B;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DetailData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  ShowMemo(True);&#13;&#10;  SetStyle(MmSubTotal,0);&#13;&#10;  SetStyle(MmAmount,0);&#13;&#10;  SetStyle(MmTaxAmt,0);&#13;&#10;  SetStyle(MmSubTotalL,0);&#13;&#10;  if &#60;Document_Detail.&#34;ItemCode&#34;&#62; &#60;&#62; 'ST-R' then begin&#13;&#10;    MmSubTotal.Text  := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, StrToFltDef(&#60;Document_Detail.&#34;Amount&#34;&#62;));&#13;&#10;    MmAmount.Text    := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, StrToFltDef(&#60;Document_Detail.&#34;LocalAmount&#34;&#62;));&#13;&#10;    MmTaxAmt.Text    := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, StrToFltDef(&#60;Document_Detail.&#34;LocalTaxAmt&#34;&#62;));&#13;&#10;    MmSubTotalL.Text := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, StrToFltDef(&#60;Document_Detail.&#34;AmountWithTax&#34;&#62;));&#13;&#10;  end;&#13;&#10;  if &#60;Document_Detail.&#34;ItemCode&#34;&#62; = 'ST-R' then begin&#13;&#10;    ShowMemo(False);&#13;&#10;    SetStyle(MmSubTotal,1);&#13;&#10;    SetStyle(MmAmount,1);&#13;&#10;    SetStyle(MmTaxAmt,1);&#13;&#10;    SetStyle(MmSubTotalL,1);&#13;&#10;&#13;&#10;    MmSubTotal.Text  := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetSubTotal('Amount','ST-R', &#60;Document_Detail.&#34;Seq&#34;&#62;));&#13;&#10;    MmAmount.Text    := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetSubTotal('LocalAmount','ST-R', &#60;Document_Detail.&#34;Seq&#34;&#62;));&#13;&#10;    MmTaxAmt.Text    := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetSubTotal('LocalTaxAmt','ST-R', &#60;Document_Detail.&#34;Seq&#34;&#62;));&#13;&#10;    MmSubTotalL.Text := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetSubTotal('AmountWithTax','ST-R', &#60;Document_Detail.&#34;Seq&#34;&#62;));&#13;&#10;  end;&#13;&#10;  if &#60;Document_Detail.&#34;ItemCode&#34;&#62; = 'ST-T' then begin&#13;&#10;    ShowMemo(False);&#13;&#10;    SetStyle(MmSubTotal,1);&#13;&#10;    SetStyle(MmAmount,1);&#13;&#10;    SetStyle(MmTaxAmt,1);&#13;&#10;    SetStyle(MmSubTotalL,1);&#13;&#10;&#13;&#10;    MmSubTotal.Text  := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetSubTotal('Amount','ST-T', &#60;Document_Detail.&#34;Seq&#34;&#62;));&#13;&#10;    MmAmount.Text    := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetSubTotal('LocalAmount','ST-T', &#60;Document_Detail.&#34;Seq&#34;&#62;));&#13;&#10;    MmTaxAmt.Text    := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetSubTotal('LocalTaxAmt','ST-T', &#60;Document_Detail.&#34;Seq&#34;&#62;));&#13;&#10;    MmSubTotalL.Text := FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetSubTotal('AmountWithTax','ST-T', &#60;Document_Detail.&#34;Seq&#34;&#62;));&#13;&#10;  end;&#13;&#10;  if (&#60;Document_Detail.&#34;ItemCode&#34;&#62; &#60;&#62; 'ST-R') and (&#60;Document_Detail.&#34;ItemCode&#34;&#62; &#60;&#62; 'ST-T') then begin&#13;&#10;    Inc(ANos);&#13;&#10;    MmNos.Text := IntToStr(ANos);&#13;&#10;  end;&#13;&#10;//  DetailData1.Visible := &#60;Option.&#34;MergeSameItemCode&#34;&#62; = False;&#13;&#10;//  DetailData2.Visible := &#60;Option.&#34;MergeSameItemCode&#34;&#62; = True;&#13;&#10;  // For Print Count 20&#13;&#10;  //if TfrxDetailData(Sender).Visible and (&#60;Line#&#62; mod 20 = 1) and (&#60;Line#&#62; &#62; 1) then Engine.NewPage;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure GroupHeader2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var D, DD, FDN, FDD: String;&#13;&#10;begin&#13;&#10;   FDN:= &#60;Document_Detail.&#34;FromDocNo&#34;&#62;;&#13;&#10;   FDD:= &#60;Document_Detail.&#34;FromDocDate&#34;&#62;;&#13;&#10;   If Trim(FDN) &#60;&#62; '' then&#13;&#10;      D := 'From Doc No. : ' + FDN + ';   ' else&#13;&#10;      D := '';&#13;&#10;   If Trim(FDD) &#60;&#62; '0' Then&#13;&#10;      DD := 'From Doc Date : ' + FDD else&#13;&#10;      DD := '';&#13;&#10;  GroupHeader2.Visible := (VarToFloatDef(&#60;FromDocCount.&#34;Nos&#34;&#62;) &#62; 1) and (&#60;Option.&#34;MergeSameItemCode&#34;&#62; = False);&#13;&#10;  Document_DetailFromDocNo.Text := D + DD;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;procedure DetailData1OnAfterCalcHeight(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;// Example Stop position on 9.5 inch * 96 = 912&#13;&#10;  if TfrxDetailData(Sender).Visible and (Engine.CurY + DetailData1.Height &#62;= 912) then Engine.NewPage;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Page1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  ShiftRelative([MmDesc, RichDesc3, RichSN]);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure GroupHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  ANos := 0;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure MmTaxRateOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;{  if (&#60;Main.&#34;TaxDate&#34;&#62; &#60; '01 Jun 2018') or&#13;&#10;     (GetTotal('TaxAmt') &#60;&#62; 0)then&#13;&#10;    MmTaxRate.Text := 'GST Amt @ 6% (RM)' else&#13;&#10;    MmTaxRate.Text := 'GST Amt @ 0% (RM)'; }&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;  if &#60;Main.&#34;PrintCount&#34;&#62; &#60;&#62; 0 then begin&#13;&#10;    if MessageDlg ('Print Count is ' + IntToStr(&#60;Main.&#34;PrintCount&#34;&#62;)+#13 +&#13;&#10;                   'Print Duplicate Copy?', mtInformation, mbYes + mbNo, 0) =  mrYes then begin&#13;&#10;      MmDuplicate.Visible   := True;&#13;&#10;      MmDuplicate.Printable := True;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;end.">
  <Datasets>
    <item DataSet="Main" DataSetName="Main"/>
    <item DataSet="Document_Detail" DataSetName="Document_Detail"/>
    <item DataSet="Document_SerialNumber" DataSetName="Document_SerialNumber"/>
    <item DataSet="Parameter" DataSetName="Parameter"/>
    <item DataSet="Document_Agent" DataSetName="Document_Agent"/>
    <item DataSet="Document_Area" DataSetName="Document_Area"/>
    <item DataSet="Document_Project" DataSetName="Document_Project"/>
    <item DataSet="Document_StockGroup" DataSetName="Document_StockGroup"/>
    <item DataSet="Document_Location" DataSetName="Document_Location"/>
    <item DataSet="Document_Currency" DataSetName="Document_Currency"/>
    <item DataSet="Document_Terms" DataSetName="Document_Terms"/>
    <item DataSet="Document_ItemCompany" DataSetName="Document_ItemCompany"/>
    <item DataSet="Document_Company" DataSetName="Document_Company"/>
    <item DataSet="Document_CompanyBranch" DataSetName="Document_CompanyBranch"/>
    <item DataSet="Document_DocProject" DataSetName="Document_DocProject"/>
    <item DataSet="Document_CompanyCategory" DataSetName="Document_CompanyCategory"/>
    <item DataSet="Document_Shipper" DataSetName="Document_Shipper"/>
    <item DataSet="Option" DataSetName="Option"/>
    <item DataSet="Profile" DataSetName="Profile"/>
    <item DataSet="User" DataSetName="User"/>
    <item DataSetName="plEMailTpl"/>
    <item DataSetName="MergeItemCode"/>
    <item DataSetName="FromDocCount"/>
    <item DataSetName="AdjRound"/>
    <item DataSetName="plDoc_Detail"/>
  </Datasets>
  <Variables>
    <item Name=" RBVariables"/>
    <item Name="ReportVarFromDocDate" Value="''"/>
    <item Name="ReportVarFromDocNo" Value="''"/>
    <item Name="ReportvSerialNo" Value="''"/>
    <item Name="ReportVariable4" Value="''"/>
    <item Name="ReportMemo13" Value="''"/>
    <item Name="ReportVarDeposit" Value="''"/>
    <item Name="ReportVarPayAmt" Value="''"/>
    <item Name="ReportVariable3" Value="''"/>
  </Variables>
  <TfrxDataPage Name="DataPage1" Height="1000" Left="0" Top="0" Width="1000"/>
  <TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" PaperWidth="215.9" PaperHeight="279.4" PaperSize="1" LeftMargin="9.906" RightMargin="6.35" TopMargin="6.35" BottomMargin="0" ColumnWidth="0" ColumnPositions.Text="" DataSetName="plSQL_2" Frame.Typ="0" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="" OnBeforePrint="Page1OnBeforePrint">
    <TfrxGroupHeader Name="GroupHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="366.61441" Left="0" Top="19.2" Width="754.56048732" OnBeforePrint="GroupHeader1OnBeforePrint" Condition="Main.&#34;DocNo&#34;" ReprintOnNewPage="True" ResetPageNumbers="True" StartNewPage="True">
      <TfrxMemoView Name="Memo20" AllowVectorExport="True" ShiftMode="smDontShift" Left="585.82715" Top="302.3624" Width="151.1812" Height="37.7953" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="15" Frame.Width="2" ParentFont="False" Text=""/>
      <TfrxMemoView Name="Label1" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="120.94496" Width="196.53556" Height="26.45671" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="Tax Invoice"/>
      <TfrxLineView Name="Line1" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="147.40167" Width="725.66976" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxMemoView Name="Label3" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="151.1812" Width="393.07112" Height="11.33859" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Billing Address"/>
      <TfrxMemoView Name="Label5" AllowVectorExport="True" ShiftMode="smDontShift" Left="404.40971" Top="151.1812" Width="332.59864" Height="11.33859" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Delivery Address"/>
      <TfrxMemoView Name="DBTxtBrchName" AllowVectorExport="True" ShiftMode="smDontShift" Left="404.40971" Top="166.29932" Width="332.59864" Height="15.11812" StretchMode="smActualHeight" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-13" Highlight.Font.Name="Tahoma" Highlight.Font.Style="0" Highlight.Condition="&#60;Main.&#34;BranchName&#34;&#62; = 'BILLING'" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="[Main.&#34;BranchName&#34;]"/>
      <TfrxMemoView Name="lbDOTel" AllowVectorExport="True" ShiftMode="smDontShift" Left="404.40971" Top="268.34663" Width="37.7953" Height="15.11812" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Tel"/>
      <TfrxMemoView Name="lbDOFax" AllowVectorExport="True" ShiftMode="smDontShift" Left="404.40971" Top="283.46475" Width="37.7953" Height="15.11812" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Fax"/>
      <TfrxLineView Name="Line2" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="302.3624" Width="725.66976" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxMemoView Name="DBText9" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="166.29932" Width="393.07112" Height="15.11812" StretchMode="smActualHeight" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;CompanyName&#34;]"/>
      <TfrxMemoView Name="Label17" AllowVectorExport="True" ShiftMode="smDontShift" Left="94.48825" Top="306.14193" Width="113.3859" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Sales Executive"/>
      <TfrxMemoView Name="Label19" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="306.14193" Width="83.14966" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Customer Account"/>
      <TfrxMemoView Name="Label21" AllowVectorExport="True" ShiftMode="smDontShift" Left="207.87415" Top="306.14193" Width="60.47248" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" Highlight.ApplyFill="False" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Condition="&#60;Main.&#34;CurrencyCode&#34;&#62; = '----'" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="Currency Rate"/>
      <TfrxMemoView Name="Label23" AllowVectorExport="True" ShiftMode="smDontShift" Left="442.20501" Top="306.14193" Width="71.81107" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Name"/>
      <TfrxMemoView Name="Label25" AllowVectorExport="True" ShiftMode="smDontShift" Left="585.82715" Top="306.14193" Width="71.81107" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Doc No."/>
      <TfrxMemoView Name="Label27" AllowVectorExport="True" ShiftMode="smDontShift" Left="657.63822" Top="306.14193" Width="79.37013" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="Date"/>
      <TfrxLineView Name="Line4" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="340.1577" Width="725.66976" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxMemoView Name="Label29" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="343.93723" Width="30.23624" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="No"/>
      <TfrxMemoView Name="Label31" AllowVectorExport="True" ShiftMode="smDontShift" Left="41.57483" Top="343.93723" Width="226.7718" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" VAlign="vaCenter" Text="Description"/>
      <TfrxMemoView Name="Label33" AllowVectorExport="True" ShiftMode="smDontShift" Left="268.34663" Top="343.93723" Width="79.37013" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Qty"/>
      <TfrxMemoView Name="Label37" AllowVectorExport="True" ShiftMode="smDontShift" Left="404.40971" Top="343.93723" Width="37.7953" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Discount"/>
      <TfrxMemoView Name="Label39" AllowVectorExport="True" ShiftMode="smDontShift" Left="347.71676" Top="343.93723" Width="56.69295" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Price/Unit"/>
      <TfrxMemoView Name="Label41" AllowVectorExport="True" ShiftMode="smDontShift" Left="442.20501" Top="343.93723" Width="71.81107" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Sub Total"/>
      <TfrxMemoView Name="DBText23" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="321.26005" Width="83.14966" Height="15.11812" StretchMode="smActualHeight" DataField="Code" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;Code&#34;]"/>
      <TfrxMemoView Name="DBText24" AllowVectorExport="True" ShiftMode="smDontShift" Left="585.82715" Top="321.26005" Width="71.81107" Height="15.11812" StretchMode="smActualHeight" DataField="DocNo" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;DocNo&#34;]"/>
      <TfrxMemoView Name="DBText27" AllowVectorExport="True" ShiftMode="smDontShift" Left="207.87415" Top="321.26005" Width="60.47248" Height="15.11812" StretchMode="smActualHeight" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" Highlight.ApplyFill="False" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Condition="&#60;Main.&#34;CurrencyCode&#34;&#62; = '----'" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="[Main.&#34;CurrencyRate&#34;]"/>
      <TfrxMemoView Name="DBText28" AllowVectorExport="True" ShiftMode="smDontShift" Left="657.63822" Top="321.26005" Width="79.37013" Height="15.11812" StretchMode="smActualHeight" DataField="DocDate" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Main.&#34;DocDate&#34;]"/>
      <TfrxMemoView Name="DBText34" AllowVectorExport="True" ShiftMode="smDontShift" Left="442.20501" Top="321.26005" Width="71.81107" Height="15.11812" StretchMode="smActualHeight" DataField="Code" DataSet="User" DataSetName="User" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[User.&#34;Code&#34;]"/>
      <TfrxMemoView Name="DBText35" AllowVectorExport="True" ShiftMode="smDontShift" Left="94.48825" Top="321.26005" Width="113.3859" Height="15.11812" StretchMode="smActualHeight" DataField="Agent" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;Agent&#34;]"/>
      <TfrxMemoView Name="Label67" AllowVectorExport="True" ShiftMode="smDontShift" Left="514.01608" Top="306.14193" Width="71.81107" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Page No "/>
      <TfrxMemoView Name="lbIVTel" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="268.34663" Width="30.23624" Height="15.11812" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Tel"/>
      <TfrxMemoView Name="lbIVFax" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="283.46475" Width="30.23624" Height="15.11812" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Fax"/>
      <TfrxMemoView Name="lbIVAttn" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="249.44898" Width="30.23624" Height="15.11812" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Attn"/>
      <TfrxMemoView Name="DBText16" AllowVectorExport="True" ShiftMode="smDontShift" Left="41.57483" Top="249.44898" Width="362.83488" Height="15.11812" StretchMode="smActualHeight" DataField="Attention" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;Attention&#34;]"/>
      <TfrxMemoView Name="lbDOAttn" AllowVectorExport="True" ShiftMode="smDontShift" Left="404.40971" Top="249.44898" Width="37.7953" Height="15.11812" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Attn"/>
      <TfrxMemoView Name="DBText1" AllowVectorExport="True" ShiftMode="smDontShift" Left="442.20501" Top="249.44898" Width="294.80334" Height="15.11812" StretchMode="smActualHeight" DataField="DAttention" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;DAttention&#34;]"/>
      <TfrxMemoView Name="DBText7" AllowVectorExport="True" ShiftMode="smDontShift" Left="442.20501" Top="268.34663" Width="294.80334" Height="15.11812" StretchMode="smActualHeight" DataField="DPhone1" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;DPhone1&#34;]"/>
      <TfrxMemoView Name="DBText8" AllowVectorExport="True" ShiftMode="smDontShift" Left="442.20501" Top="283.46475" Width="294.80334" Height="15.11812" StretchMode="smActualHeight" DataField="DFax1" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;DFax1&#34;]"/>
      <TfrxPictureView Name="DBImage3" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="11.33859" Width="105.82684" Height="105.82684" DataField="Logo" DataSet="Profile" DataSetName="Profile" Frame.Typ="0" HightQuality="False" Transparent="False" TransparentColor="16777215"/>
      <TfrxRichView Name="DBRichText2" AllowVectorExport="True" ShiftMode="smDontShift" Left="117.16543" Top="11.33859" Width="619.84292" Height="109.60637" AllowExpressions="False" DataField="Note" DataSet="Profile" DataSetName="Profile" Frame.Typ="0" GapX="2" GapY="1" PropData="0852696368456469740AA60000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6E6F7569636F6D7061745C6465666C616E67313033337B5C666F6E7474626C7B5C66305C666E696C5C666368617273657430205461686F6D613B7D7D0D0A7B5C2A5C67656E657261746F722052696368656432302031302E302E31363239397D5C766965776B696E64345C756331200D0A5C706172645C66305C667331365C7061720D0A7D0D0A00"/>
      <TfrxMemoView Name="DBText15" AllowVectorExport="True" ShiftMode="smDontShift" Left="41.57483" Top="268.34663" Width="362.83488" Height="15.11812" StretchMode="smActualHeight" DataField="Phone1" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;Phone1&#34;]"/>
      <TfrxMemoView Name="DBText17" AllowVectorExport="True" ShiftMode="smDontShift" Left="41.57483" Top="283.46475" Width="362.83488" Height="15.11812" StretchMode="smActualHeight" DataField="Fax1" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;Fax1&#34;]"/>
      <TfrxMemoView Name="lbDODate" AllowVectorExport="True" ShiftMode="smDontShift" Left="268.34663" Top="306.14193" Width="79.37013" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" Highlight.ApplyFill="False" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-8" Highlight.Font.Name="Tahoma" Highlight.Font.Style="0" Highlight.Condition="(VarToFloatDef(&#60;FromDocCount.&#34;Nos&#34;&#62;) &#62; 1) or (VarToFloatDef(&#60;Document_Detail.&#34;FromDocDate&#34;&#62;) = 0)" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="From Doc Date"/>
      <TfrxMemoView Name="lbDoNo" AllowVectorExport="True" ShiftMode="smDontShift" Left="347.71676" Top="306.14193" Width="94.48825" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" Highlight.ApplyFill="False" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-8" Highlight.Font.Name="Tahoma" Highlight.Font.Style="0" Highlight.Condition="(VarToFloatDef(&#60;FromDocCount.&#34;Nos&#34;&#62;) &#62; 1) or (VarToFloatDef(&#60;Document_Detail.&#34;FromDocDate&#34;&#62;) = 0)" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="From Doc No"/>
      <TfrxMemoView Name="VarFromDocDate" AllowVectorExport="True" ShiftMode="smDontShift" Left="268.34663" Top="321.26005" Width="79.37013" Height="15.11812" StretchMode="smActualHeight" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" Highlight.ApplyFill="False" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-12" Highlight.Font.Name="Tahoma" Highlight.Font.Style="0" Highlight.Condition="(VarToFloatDef(&#60;FromDocCount.&#34;Nos&#34;&#62;) &#62; 1) or (VarToFloatDef(&#60;Document_Detail.&#34;FromDocDate&#34;&#62;) = 0)" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="[Document_Detail.&#34;FromDocDate&#34;]"/>
      <TfrxMemoView Name="VarFromDocNo" AllowVectorExport="True" ShiftMode="smDontShift" Left="347.71676" Top="321.26005" Width="94.48825" Height="15.11812" StretchMode="smActualHeight" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" Highlight.ApplyFill="False" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-12" Highlight.Font.Name="Tahoma" Highlight.Font.Style="0" Highlight.Condition="(VarToFloatDef(&#60;FromDocCount.&#34;Nos&#34;&#62;) &#62; 1) or (VarToFloatDef(&#60;Document_Detail.&#34;FromDocDate&#34;&#62;) = 0)" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="[Document_Detail.&#34;FromDocNo&#34;]"/>
      <TfrxMemoView Name="Memo1" AllowVectorExport="True" ShiftMode="smDontShift" Left="514.01608" Top="343.93723" Width="71.81107" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total Excl. GST&#13;&#10;(SGD)"/>
      <TfrxMemoView Name="MmTaxRate" AllowVectorExport="True" ShiftMode="smDontShift" Left="585.82715" Top="342.93723" Width="56.69295" Height="22.67718" OnBeforePrint="MmTaxRateOnBeforePrint" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="GST Amt @ 7% (SGD)"/>
      <TfrxMemoView Name="Memo4" AllowVectorExport="True" ShiftMode="smDontShift" Left="642.5201" Top="343.93723" Width="71.81107" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total Incl. GST &#13;&#10;(SGD)"/>
      <TfrxSysMemoView Name="SysMmPage" AllowVectorExport="True" ShiftMode="smDontShift" Left="514.01608" Top="321.26005" Width="71.81107" Height="15.11812" StretchMode="smActualHeight" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[PAGE] of [TOTALPAGES]"/>
      <TfrxMemoView Name="Memo8" AllowVectorExport="True" ShiftMode="smDontShift" Left="714.33117" Top="343.93723" Width="22.67718" Height="22.67718" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Tax"/>
      <TfrxMemoView Name="DBText3" AllowVectorExport="True" ShiftMode="smDontShift" Left="404.40971" Top="181.41744" Width="332.59864" Height="64.25201" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;DAddress1&#34;]&#13;&#10;[Main.&#34;DAddress2&#34;]&#13;&#10;[Main.&#34;DAddress3&#34;]&#13;&#10;[Main.&#34;DAddress4&#34;]"/>
      <TfrxMemoView Name="DBText10" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="181.41744" Width="393.07112" Height="64.25201" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;Address1&#34;]&#13;&#10;[Main.&#34;Address2&#34;]&#13;&#10;[Main.&#34;Address3&#34;]&#13;&#10;[Main.&#34;Address4&#34;]"/>
      <TfrxMemoView Name="MmDuplicate" AllowVectorExport="True" ShiftMode="smDontShift" Left="585.82715" Top="120.94496" Width="151.1812" Height="26.45671" Visible="False" Visibility="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-16" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="Duplicate Copy"/>
    </TfrxGroupHeader>
    <TfrxGroupFooter Name="GroupFooter1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="192" Left="0" Top="604.8" Width="754.56048732" OnBeforePrint="GroupFooter1OnBeforePrint" Stretched="True">
      <TfrxMemoView Name="Memo13" AllowVectorExport="True" Left="11.33859" Top="3.77953" Width="574.48856" Height="34.01577" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Document_Currency.&#34;Description&#34;] : [CurrencyToEngWord(&#60;Main.&#34;DocAmt&#34;&#62;)] ONLY"/>
      <TfrxMemoView Name="DBTxtInvAmt" AllowVectorExport="True" ShiftMode="smDontShift" Left="442.20501" Top="41.57483" Width="71.81107" Height="15.11812" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetTotal('Amount'))]"/>
      <TfrxMemoView Name="Label10" AllowVectorExport="True" ShiftMode="smDontShift" Left="94.48825" Top="41.57483" Width="173.85838" Height="15.11812" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="Total Amount Due"/>
      <TfrxLineView Name="Line3" AllowVectorExport="True" ShiftMode="smDontShift" Left="268.34663" Top="37.7953" Width="468.66172" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxLineView Name="Line5" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="64.25201" Width="725.66976" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxMemoView Name="Label43" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="68.03154" Width="83.14966" Height="11.33859" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Payment Terms"/>
      <TfrxMemoView Name="Label51" AllowVectorExport="True" ShiftMode="smDontShift" Left="585.82715" Top="68.03154" Width="128.50402" Height="11.33859" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="Total Payable ([Document_Currency.&#34;Symbol&#34;])"/>
      <TfrxMemoView Name="DBText29" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="79.37013" Width="83.14966" Height="18.89765" DataField="Terms" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;Terms&#34;]"/>
      <TfrxMemoView Name="lbRef1" AllowVectorExport="True" ShiftMode="smDontShift" Left="207.87415" Top="68.03154" Width="139.84261" Height="11.33859" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" Highlight.ApplyFill="False" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-8" Highlight.Font.Name="Tahoma" Highlight.Font.Style="0" Highlight.Condition="Trim(&#60;Main.&#34;DocRef1&#34;&#62;) = ''" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="Ref 1 "/>
      <TfrxMemoView Name="DBText101" AllowVectorExport="True" ShiftMode="smDontShift" Left="347.71676" Top="79.37013" Width="166.29932" Height="18.89765" DataField="DocRef2" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;DocRef2&#34;]"/>
      <TfrxMemoView Name="lbRef2" AllowVectorExport="True" ShiftMode="smDontShift" Left="347.71676" Top="68.03154" Width="166.29932" Height="11.33859" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" Highlight.ApplyFill="False" Highlight.Font.Charset="1" Highlight.Font.Color="16777215" Highlight.Font.Height="-8" Highlight.Font.Name="Tahoma" Highlight.Font.Style="0" Highlight.Condition="Trim(&#60;Main.&#34;DocRef2&#34;&#62;) = ''" Highlight.FillType="ftBrush" Highlight.Frame.Typ="0" ParentFont="False" Text="Ref 2 "/>
      <TfrxMemoView Name="DBText14" AllowVectorExport="True" ShiftMode="smDontShift" Left="207.87415" Top="79.37013" Width="139.84261" Height="18.89765" DataField="DocRef1" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Main.&#34;DocRef1&#34;]"/>
      <TfrxMemoView Name="VarPayAmt" AllowVectorExport="True" ShiftMode="smDontShift" Left="585.82715" Top="79.37013" Width="128.50402" Height="18.89765" DataField="DocAmt" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Main.&#34;DocAmt&#34;]"/>
      <TfrxLineView Name="Line6" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="102.04731" Width="725.66976" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxMemoView Name="Label61" AllowVectorExport="True" ShiftMode="smDontShift" Left="207.87415" Top="109.60637" Width="525.35467" Height="18.89765" StretchMode="smActualHeight" AutoWidth="True" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="Authorised Signature&#13;&#10;[Profile.&#34;CompanyName&#34;] ([Profile.&#34;RegisterNo&#34;])"/>
      <TfrxLineView Name="Line7" AllowVectorExport="True" ShiftMode="smDontShift" Left="11.33859" Top="173.85838" Width="725.66976" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxMemoView Name="Memo9" AllowVectorExport="True" ShiftMode="smDontShift" Left="585.82715" Top="41.57483" Width="56.69295" Height="15.11812" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetTotal('LocalTaxAmt'))]"/>
      <TfrxMemoView Name="Memo11" AllowVectorExport="True" ShiftMode="smDontShift" Left="642.5201" Top="41.57483" Width="71.81107" Height="15.11812" DataField="LocalDocAmt" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Main.&#34;LocalDocAmt&#34;]"/>
      <TfrxMemoView Name="Memo12" AllowVectorExport="True" ShiftMode="smDontShift" Left="514.01608" Top="41.57483" Width="71.81107" Height="15.11812" DataSet="Main" DataSetName="Main" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetTotal('LocalAmount'))]"/>
      <TfrxMemoView Name="Memo14" AllowVectorExport="True" ShiftMode="smDontShift" Left="514.01608" Top="68.03154" Width="71.81107" Height="11.33859" StretchMode="smActualHeight" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="GST Amount ([Document_Currency.&#34;Symbol&#34;])"/>
      <TfrxMemoView Name="Memo15" AllowVectorExport="True" Left="514.01608" Top="79.37013" Width="71.81107" Height="18.89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[FormatFloat(&#60;Option.&#34;AccountingValueDisplayFormat&#34;&#62;, GetTotal('TaxAmt'))]"/>
    </TfrxGroupFooter>
    <TfrxMasterData Name="MasterData1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="0" Left="0" Top="412.8" Width="754.56048732" ColumnWidth="0" ColumnGap="0" DataSet="Main" DataSetName="Main" RowCount="0" Stretched="True"/>
    <TfrxDetailData Name="DetailData1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Height="49.73859" Left="0" ParentFont="False" Top="470.4" Width="754.56048732" OnAfterCalcHeight="DetailData1OnAfterCalcHeight" OnBeforePrint="DetailData1OnBeforePrint" Child="Child1" ColumnWidth="0" ColumnGap="0" DataSet="Document_Detail" DataSetName="Document_Detail" RowCount="0" Stretched="True">
      <TfrxMemoView Name="Memo7" AllowVectorExport="True" Left="714.33117" Top="0" Width="22.67718" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataField="Tax" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Document_Detail.&#34;Tax&#34;]"/>
      <TfrxMemoView Name="MmQty" AllowVectorExport="True" Left="268.34663" Top="0" Width="41.57483" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataField="Qty" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Document_Detail.&#34;Qty&#34;]"/>
      <TfrxMemoView Name="MmUnitPrice" AllowVectorExport="True" Left="347.71676" Top="0" Width="56.69295" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataField="UnitPrice" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Document_Detail.&#34;UnitPrice&#34;]"/>
      <TfrxMemoView Name="MmUOM" AllowVectorExport="True" Left="309.92146" Top="0" Width="37.7953" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataField="UOM" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Document_Detail.&#34;UOM&#34;]"/>
      <TfrxMemoView Name="MmDisc" AllowVectorExport="True" Left="404.40971" Top="0" Width="37.7953" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataField="DISC" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Document_Detail.&#34;DISC&#34;]"/>
      <TfrxMemoView Name="MmSubtotal" AllowVectorExport="True" Left="442.20501" Top="0" Width="71.81107" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text=""/>
      <TfrxMemoView Name="MmSubTotalL" AllowVectorExport="True" Left="642.5201" Top="0" Width="71.81107" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text=""/>
      <TfrxMemoView Name="MmTaxAmt" AllowVectorExport="True" Left="585.82715" Top="0" Width="56.69295" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text=""/>
      <TfrxMemoView Name="MmAmount" AllowVectorExport="True" Left="514.01608" Top="0" Width="71.81107" Height="11.33859" StretchMode="smMaxHeight" AllowExpressions="False" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text=""/>
      <TfrxRichView Name="RichDesc3" AllowVectorExport="True" Left="41.57483" Top="11.33859" Width="226.7718" Height="11.33859" StretchMode="smActualHeight" Frame.Typ="0" GapX="2" GapY="0" PropData="0852696368456469740AED0000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6E6F7569636F6D7061745C6465666C616E67313033337B5C666F6E7474626C7B5C66305C666E696C5C666368617273657430205461686F6D613B7D7D0D0A7B5C636F6C6F7274626C203B5C726564305C677265656E305C626C7565303B7D0D0A7B5C2A5C67656E657261746F722052696368656432302031302E302E31363239397D5C766965776B696E64345C756331200D0A5C706172645C6366315C66305C66733138205B446F63756D656E745F44657461696C2E224465736372697074696F6E33225D5C7061720D0A7D0D0A00"/>
      <TfrxMemoView Name="MmDesc" AllowVectorExport="True" Left="41.57483" Top="0" Width="226.7718" Height="11.33859" StretchMode="smMaxHeight" DataField="Description" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" GapY="0" ParentFont="False" Text="[Document_Detail.&#34;Description&#34;]"/>
      <TfrxRichView Name="RichSN" AllowVectorExport="True" Left="41.57483" Top="22.67718" Width="226.7718" Height="11.33859" StretchMode="smActualHeight" Frame.Typ="0" GapX="2" GapY="0" PropData="0852696368456469740AF00000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6E6F7569636F6D7061745C6465666C616E67313033337B5C666F6E7474626C7B5C66305C666E696C5C666368617273657430205461686F6D613B7D7D0D0A7B5C636F6C6F7274626C203B5C726564305C677265656E305C626C7565303B7D0D0A7B5C2A5C67656E657261746F722052696368656432302031302E302E31363239397D5C766965776B696E64345C756331200D0A5C706172645C6366315C66305C66733138205B476574534E283C446F63756D656E745F44657461696C2E2244746C4B6579223E295D5C7061720D0A7D0D0A00"/>
      <TfrxMemoView Name="MmNos" AllowVectorExport="True" Left="11.33859" Top="0" Width="30.23624" Height="11.33859" StretchMode="smActualHeight" AllowExpressions="False" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" Text=""/>
    </TfrxDetailData>
    <TfrxPageFooter Name="PageFooter1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" Height="28.8" Left="0" ParentFont="False" Top="854.4" Width="754.56048732"/>
    <TfrxGroupHeader Name="GroupHeader2" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="11.33859" Left="0" Top="432" Width="754.56048732" OnBeforePrint="GroupHeader2OnBeforePrint" Condition="Document_Detail.&#34;FromDocNo&#34;" Stretched="True">
      <TfrxMemoView Name="Document_DetailFromDocNo" AllowVectorExport="True" Left="11.33859" Top="0" Width="502.67749" Height="11.33859" StretchMode="smActualHeight" DataSet="Document_Detail" DataSetName="Document_Detail" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="4" Frame.Typ="0" ParentFont="False" WordWrap="False" Text="From Doc No.: [Document_Detail.&#34;FromDocNo&#34;];    From Doc Date : [Document_Detail.&#34;FromDocDate&#34;]"/>
    </TfrxGroupHeader>
    <TfrxGroupFooter Name="GroupFooter2" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="0" Left="0" Top="585.6" Width="754.56048732" Stretched="True"/>
    <TfrxChild Name="Child1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="18.8976378" Left="0" Top="547.2" Width="754.56048732" ToNRows="0" ToNRowsMode="rmCount"/>
  </TfrxReportPage>
</TfrxReport>
