Home RAP
New Blog Posts: Merging Reports - Part 1 and Part 2

whats wrong with the following pass-through

edited December 2004 in RAP
I've created a function, and installed a package which contains
this module.

When i double click on my report, go to RAP and then to Functions,
i have Delphi IDE Error: Could not compile program: InsertPipeline.

And there are no functions loaded in CodeToolbox window.

Please suggest whats wrong. Basically i need to be able to do
Insert/Post operations on pipeline from RAP...

Thanx alot.

unit uRAPFunc2;

interface

uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
Forms, Dialogs, raFunc, ppRTTI, ppDB, ppDBPipe;

type
TraPipelineFunction = class(TraSystemFunction)
public
class function Category: String; override;
end;

TraInsertFunction = class(TraPipelineFunction)
public
procedure ExecuteFunction(aParams: TraParamList); override;

class function GetSignature: String; override;
class function IsFunction: Boolean; override;

end;

implementation

class function TraPipelineFunction.Category: String;
begin
Result := 'Pipeline';
end;

class function TraInsertFunction.GetSignature: String;
begin
Result := 'procedure InsertPipeline(aPipeline: TppDBPipeLine)';
end;

procedure TraInsertFunction.ExecuteFunction(aParams: TraParamList);
var
aPipeLine: TppDBPipeLine;
begin
GetParamValue(0, aPipeLine);
aPipeLine.Insert
end;

class function TraInsertFunction.IsFunction: Boolean;
begin
Result := False;
end;

initialization
raRegisterFunction('InsertPipeline', TraInsertFunction);

finalization
raUnRegisterFunction('InsertPipeline');

end.

Comments

  • edited December 2004
    nevermind, got it working. i missed ';' in signature.

This discussion has been closed.