23 lines
592 B
ObjectPascal
23 lines
592 B
ObjectPascal
unit uIEditorResultadoPedidosConArticulo;
|
|
|
|
interface
|
|
|
|
uses
|
|
uIEditorPedidosProveedor, uBizPedidosProveedor, uGUIBase;
|
|
|
|
type
|
|
IEditorResultadoPedidosConArticulo = interface(IEditorPedidosProveedor)
|
|
['{40985D74-84EB-4FFF-B7D2-4CE36AE7AC24}']
|
|
function GetPedidosProveedorSeleccionados: IBizPedidoProveedor;
|
|
property PedidosProveedorSeleccionados: IBizPedidoProveedor read GetPedidosProveedorSeleccionados;
|
|
|
|
procedure SetMensaje (const AValue: String);
|
|
function GetMensaje: String;
|
|
property Mensaje : String read GetMensaje write SetMensaje;
|
|
end;
|
|
|
|
|
|
implementation
|
|
|
|
end.
|