commexport.pas

来自「县级供电企业电费核算源码, 在客户处正常运行8年以上, Delphi 5开发,数」· PAS 代码 · 共 20 行

unit CommExport;

interface
	procedure p_TransferProvide();//计算所有变压器的

implementation
uses
	Export_DM;
procedure p_TransferProvide();//计算所有变压器的
Begin
	With DM_Export Do
    Begin
    	sp_TransferProvide.Prepare();
        sp_TransferProvide.ExecProc();
    	sp_TransferProvide.UnPrepare();
    End;
End;

end.