Prvni verze

_custom/Kdynium/uHeOObj_Custom.pas

@@ -0,0 +1,40 @@
+unit uHeOObj_Custom;
+{$RTTI EXPLICIT METHODS([vcPublic, vcPublished]) FIELDS([vcPrivate, vcProtected, vcPublic, vcPublished]) PROPERTIES([vcPublic, vcPublished])}
+
+
+interface
+{$I 'GlobalDefs.inc'}
+
+uses
+  System.Generics.Collections,
+  MVCFramework.Serializer.Commons,
+  MVCFramework.ActiveRecord,
+  MVCFramework.Nullables,
+{$IFDEF SWAGGER}
+  MVCFramework.Swagger.Commons,
+{$ENDIF}
+  helTabsBIDs,
+  uHeoObj_Base;
+
+const
+  tblPlanNasazLisu = '[dbo].[_hdc_TabPlanNasazeniLisu]';
+  tblPlanNasazLisuR = '[dbo].[_hdc_TabPlanNasazeniLisuR]';
+  tblPlanNasazLisuVstr = '[dbo].[_hdc_TabPlanNasazeniLisuVstr]';
+  tblPlanNasazLisuZm = '[dbo].[_hdc_TabPlanNasazeniLisuZmetky]';
+
+
+type
+  [MVCNameCase(ncLowerCase)]
+  TKDYPlanLisu = class(THeliosObjekty)
+   private
+    FIndexZmeny: NullableInt32;
+   public
+    [MVCColumn('Cislo', true)] // is PrimaryKey
+    property IndexZmeny: NullableInt32 read FIndexZmeny write FIndexZmeny;
+  end;
+
+
+implementation
+
+
+end.