Fast Report - Get Data Directly from DB: Difference between revisions

From eStream Software
Line 50: Line 50:
begin
begin
   //Get RefCost*Qty
   //Get RefCost*Qty
  s := Format('SELECT Code, RefCost FROM ST_ITEM_UOM WHERE Code=%s AND UOM=%s ',
// Coming soon...
              [QuotedStr(<Document_Detail."ItemCode">),
              QuotedStr(<Document_Detail."UOM">)]);
  V := MemDSCache.GetSQLValue(s, 'Code', <Document_Detail."ItemCode">, 'RefCost');
 
  if V <> null then
    V := V * <Document_Detail."Qty"> else
    V := 0;                     
  Memo18.Text := FormatFloat(<Option."AccountingValueDisplayFormat">, V);
end;
end;
</syntaxhighlight>
</syntaxhighlight>

Revision as of 03:16, 11 November 2015

Introduction

Sometime in the report you might wanted some extra information but you not able to select in the report design. So you had to self query to get the extra information.

There are 2 ways to Get the data directly from Database

  • Simple Query
  • Advance Query

Simple Query

Example 1 - Get Shelf Field from Maintain Item

Below is Example are doing following actions

  • At Sales Invoice to get Shelf field from Maintain Item

Last Script Update : 11 Nov 2015

Steps

FR-DirectDB-01.jpg
01. Click the Red A Icon.
02. Click on the place to be print/shown.
03. Click on Events tab
04. Double Click OnBeforePrint
05. Enter below script
procedure Memo18OnBeforePrint(Sender: TfrxComponent);
var s : string;
    V : Variant;                            
begin
  //Get Shelf From ST_Item
// Coming Soon....
end;
10. Save the report.

Example 2 - Get RefCost Field from Maintain Item

Below is Example are doing following actions

  • Sales Invoice to get RefCost field from Maintain Item
  • Use RefCost * Qty in Sales Invoice

Last Script Update : 11 Nov 2015

Steps

01. Click the Red A Icon.
02. Click on the place to be print/shown.
03. Click on Events tab
04. Double Click OnBeforePrint
05. Enter below script
procedure Memo18OnBeforePrint(Sender: TfrxComponent);
var s : string;
    V : Variant;                            
begin
  //Get RefCost*Qty
// Coming soon...
end;
10. Save the report.

Advance Query

  • Coming Soon....

See also