Editare Script funcții

Top  Previous  Next

Editare Script funcții

BrowseBlueLeft BrowseBlueRight

 

 

EditareScriptFunctii

 

 Left, Right, Up, Down: Integer; //lungimile de falt la feronerie si dimensiunile ochiului în care se află profilul pentru profile

   LeftActive, RightActive, UpActive, DownActive: Integer; //lungimile de falt (doar la feronerie)

   ActiveHandleHeight: Integer;//înăltimea de jos de la falt (v11) (doar la feronerie)

   HandleSideLength: Integer;//faltul pe latura manerului (indisponibil la domeniul XY al setului) (v11) (doar la feronerie)

   SashPrHeight: Double;  //(doar la feronerie)

   SashPrWidth: Double;   //(doar la feronerie)

   SashCode: String;   //(doar la feronerie)

   FramePrHeight: Double;

   FramePrWidth: Double;  

   FrameCode: String;

   FrameType: Integer;//TipProfilSimplu

   DownFrameCode: String;

   ThresholdCode: String;

   PrSeries: String;

   PrSubSeries: String;

   PrBaseColor: String;//v11

   PrBaseColorCode: String;//v11

   PrIntAplColor: String;//v11

   PrIntAplColorCode: String;//v11

   PrExtAplColor: String;//v11

   PrExtAplColorCode: String;//v11

   PrRabbetAplColor: String;//v11

   PrRabbetAplColorCode: String;//v11

   PrExtPlatingColor: String;//v11

   PrPosition: Integer; //ProfilePosUp, ProfilePosDown, ...

   OutOpening: Boolean;  //la feronerie este al cercevelei iar în rest al ferestrei

   HardwareColor: String;

   HardwareFixedColor: String;

   ArticleColor: String;

   HasFalseMullion: Boolean;//doar la feronerie si la profilele de cercevea

   //v11

   WeightGr: Integer; //greutatea termopanului (doar la feronerie)

   KgPerSqm: Double; //greutatea termopanului (doar la feronerie)

   ActiveOpeningSet: String; //doar la feronerie

   HasActiveOpening: Boolean; //doar la feronerie si la profilele de cercevea

   FalseMullionCode: String; //doar la feronerie si la profilele de cercevea

   DrainageCapsCode: String; //doar la feronerie

//Pentru funcțiile apelate de termopan

   GlassHeight: Double;

   GlassWidth: Double;

//Pentru functiile apelate din profile

   PrLength: Double;

   PrArchHeight: Double;//ia si valori negative pentru bolta în interior

   //SteelLength: Double;//Lungimea aproximativă a armăturii (PrLength - 2 * C_Otel)

   WindowQty: Integer;//numărul de ferestre final (înmultit deja cu PanelQty)

   PanelQty: Integer;//numarul de panouri

   CallerQty: Double;//cantitea totală (înmultit deja cu CallerPcs); la profile este lungimea totala

   CallerPcs: Double;//la profile este numarul de bucati de profil

   CallerPos: Integer;

 

//Consum si debitare

function WA_AddCutItem(

 Code: String;

 Length: Double;

 NumberOfPieces: Double = 1;

 NumberOfCutedPieces: Integer = 0;

 Angle1: Double = 90; //-1 pentru a prelua unghiul profilului apelant

 Angle2: Double = 90; //-1 pentru a prelua unghiul profilului apelant

 SourceTableType: Integer = 0;  //TTipTabelScriptFunctii = (Profile, Placare, Feronerie, Geam, Manopera, ManoperaMontaj)

 ColorBase: String = '';

 ColorAplInt: String = '';

 ColorAplExt: String = '';

 ColorAplRabbet: String = '';

 OptimizationNeeded: Boolean = False //nu se ține cont decât la accesorii, placare și dacă este găsită culoarea (altfel este setat automat în funcție de culoare)

 ): Double

 

//Consum

function WA_AddItem(

 Code: String;

 Quantity: Double;

 SourceTableType: Integer = 0;  //TTipTabelScriptFunctii = (Profile, Placare, Feronerie, Geam, Manopera, ManoperaMontaj)

 ColorBase: String = '';

 ColorAplInt: String = '';

 ColorAplExt: String = '';

 ColorAplRabbet: String = '';

 ): Double

 

//Consum

//Debitare doar la profile de fereastra

function ProfilExp(

   Cod: String;

   Culoare: String = '''';

   Catitate: Double = 1;

   NrBuc: Double = 1;

   PozProfil: String = '''';

   U1: Double = -1; //-1 pentru a prelua unghiul profilului apelant

   U2: Double = -1; //-1 pentru a prelua unghiul profilului apelant

   SubSerie: String = '''';

   UBeta1: Double = 90;

   UBeta2: Double = 90): Boolean

 

//Consum (pentru apelul funcțiilor interne)

function ExecFunc(

   'FunctionName: String;

   'Param1: String;

   'Param2: String = '''';

   'Param3: String = '''';

   'Param4: String = '''';

   'Param5: String = '''';

   'Param6: String = '''';

   'Param7: String = '''';

   'Param8: String = '''';

   'Param9: String = '''';

   'Param10: String = ''''): Boolean

 

//După apelul funcțiilor WA_AddCutItem si WA_AddItem poziționarea cursorului în aceste tabele poate fi schimbată

//deoarece sunt aceleasi tabele cu care lucrează aceste funcții

function cdsProfile: TDSClientDataSet;

function cdsColor: TDSClientDataSet;

function cdsPlatingColor: TDSClientDataSet;

function cdsHardware: TDSClientDataSet;

function cdsGlass: TDSClientDataSet;