PageRenderTime 76ms CodeModel.GetById 28ms RepoModel.GetById 0ms app.codeStats 0ms

/HRManager/__history/CONJUCTIONUnit.dfm.~3~

https://github.com/oista/NPO
Unknown | 4993 lines | 4992 code | 1 blank | 0 comment | 0 complexity | 22b4946c261a7338d4db9ff1382c9992 MD5 | raw file
  1. inherited CONJUCTION: TCONJUCTION
  2. Caption = #1057#1086#1074#1084#1077#1089#1090#1080#1090#1077#1083#1080' '
  3. ClientHeight = 661
  4. ClientWidth = 1140
  5. ExplicitWidth = 1148
  6. ExplicitHeight = 695
  7. PixelsPerInch = 96
  8. TextHeight = 13
  9. inherited Panel1: TPanel
  10. Top = 620
  11. Width = 1140
  12. ExplicitTop = 620
  13. ExplicitWidth = 1140
  14. inherited Button1: TButton
  15. Left = 977
  16. ExplicitLeft = 977
  17. end
  18. inherited Button2: TButton
  19. Left = 1058
  20. ExplicitLeft = 1058
  21. end
  22. end
  23. inherited Panel2: TPanel
  24. Left = 33
  25. Width = 1107
  26. Height = 620
  27. ExplicitLeft = 33
  28. ExplicitWidth = 1107
  29. ExplicitHeight = 620
  30. inherited Splitter1: TSplitter
  31. Height = 620
  32. ExplicitHeight = 596
  33. end
  34. inherited Panel3: TPanel
  35. Width = 1104
  36. Height = 620
  37. ExplicitWidth = 1104
  38. ExplicitHeight = 620
  39. inherited Splitter2: TSplitter
  40. Top = 320
  41. Width = 1104
  42. Height = 0
  43. ExplicitLeft = 0
  44. ExplicitTop = 365
  45. ExplicitWidth = 728
  46. ExplicitHeight = 0
  47. end
  48. inherited Panel5: TPanel
  49. Top = 320
  50. Width = 1104
  51. Height = 300
  52. ExplicitTop = 320
  53. ExplicitWidth = 1104
  54. ExplicitHeight = 300
  55. object PageControl2: TPageControl
  56. Left = 0
  57. Top = 0
  58. Width = 1104
  59. Height = 300
  60. ActivePage = TabSheet2
  61. Align = alClient
  62. TabOrder = 0
  63. object TabSheet2: TTabSheet
  64. Caption = #1056#1072#1073'. '#1084#1077#1089#1090#1072
  65. object VrDbGrid1: TVrDbGrid
  66. AlignWithMargins = True
  67. Left = 3
  68. Top = 34
  69. Width = 1090
  70. Height = 235
  71. Margins.Top = 0
  72. ScrollBars = ssHorizontal
  73. ShowCheckBoxes = True
  74. CheckFieldName = 'ID'
  75. CheckedRowsColoured = True
  76. CheckedRowsColour = clYellow
  77. MultiSelect = True
  78. ColouredRows = True
  79. CrmEvnColor = clInfoBk
  80. CrmOddColor = clWindow
  81. SortChangeEnable = True
  82. Align = alClient
  83. DataSource = DataSource2
  84. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  85. TabOrder = 0
  86. TitleFont.Charset = DEFAULT_CHARSET
  87. TitleFont.Color = clWindowText
  88. TitleFont.Height = -11
  89. TitleFont.Name = 'Tahoma'
  90. TitleFont.Style = []
  91. Columns = <
  92. item
  93. Expanded = False
  94. FieldName = 'ID'
  95. Visible = False
  96. SortMode = smNone
  97. end
  98. item
  99. Expanded = False
  100. FieldName = 'DCODE'
  101. Width = 43
  102. Visible = True
  103. SortMode = smNone
  104. end
  105. item
  106. Expanded = False
  107. FieldName = 'INDATE'
  108. Width = 74
  109. Visible = True
  110. SortMode = smNone
  111. end
  112. item
  113. Expanded = False
  114. FieldName = 'CITEZENID'
  115. Visible = False
  116. SortMode = smNone
  117. end
  118. item
  119. Expanded = False
  120. FieldName = 'STRUCTUREID'
  121. Visible = False
  122. SortMode = smNone
  123. end
  124. item
  125. Expanded = False
  126. FieldName = 'JOBTITLE'
  127. Width = 450
  128. Visible = True
  129. SortMode = smNone
  130. end
  131. item
  132. Expanded = False
  133. FieldName = 'QUALIFICATION'
  134. Width = 75
  135. Visible = True
  136. SortMode = smNone
  137. end
  138. item
  139. Expanded = False
  140. FieldName = 'WORKUNITTYPE'
  141. Width = 141
  142. Visible = True
  143. SortMode = smNone
  144. end
  145. item
  146. Expanded = False
  147. FieldName = 'CATEGORYNUMB'
  148. Visible = False
  149. SortMode = smNone
  150. end
  151. item
  152. Expanded = False
  153. FieldName = 'AMOUNT'
  154. Width = 45
  155. Visible = True
  156. SortMode = smNone
  157. end
  158. item
  159. Expanded = False
  160. FieldName = 'SALARY'
  161. Width = 85
  162. Visible = True
  163. SortMode = smNone
  164. end
  165. item
  166. Expanded = False
  167. FieldName = 'AGREEMENTDATE'
  168. Visible = True
  169. SortMode = smNone
  170. end
  171. item
  172. Expanded = False
  173. FieldName = 'CONTRACT'
  174. Visible = True
  175. SortMode = smNone
  176. end
  177. item
  178. Expanded = False
  179. FieldName = 'CODE'
  180. Visible = False
  181. SortMode = smNone
  182. end
  183. item
  184. Expanded = False
  185. FieldName = 'CONDITION'
  186. Visible = False
  187. SortMode = smNone
  188. end
  189. item
  190. Expanded = False
  191. FieldName = 'WORKTYPE'
  192. Visible = False
  193. SortMode = smNone
  194. end
  195. item
  196. Expanded = False
  197. FieldName = 'RATECODE'
  198. Visible = False
  199. SortMode = smNone
  200. end>
  201. end
  202. object GridPanel6: TGridPanel
  203. AlignWithMargins = True
  204. Left = 3
  205. Top = 3
  206. Width = 1090
  207. Height = 28
  208. Align = alTop
  209. BevelOuter = bvNone
  210. ColumnCollection = <
  211. item
  212. SizeStyle = ssAbsolute
  213. Value = 152.000000000000000000
  214. end
  215. item
  216. Value = 100.000000000000000000
  217. end>
  218. ControlCollection = <
  219. item
  220. Column = -1
  221. Row = -1
  222. end
  223. item
  224. Column = 0
  225. Control = PKDBEditButtons6
  226. Row = 0
  227. end
  228. item
  229. Column = 1
  230. Control = PKDBFindPanel6
  231. Row = 0
  232. end>
  233. RowCollection = <
  234. item
  235. Value = 100.000000000000000000
  236. end>
  237. TabOrder = 1
  238. object PKDBEditButtons6: TPKDBEditButtons
  239. Left = 0
  240. Top = 0
  241. Width = 150
  242. Height = 28
  243. TableName = 'HR_EMPLOYEE'
  244. PrimaryFieldName = 'ID'
  245. ParentFieldName = 'ID'
  246. Grid = VrDbGrid1
  247. Connection = DataModule1.ADConnection1
  248. UseTempTable = False
  249. EditDialogClassName = 'TEMPLOYEEDIT'
  250. DesignSize = (
  251. 150
  252. 28)
  253. end
  254. object PKDBFindPanel6: TPKDBFindPanel
  255. Left = 152
  256. Top = 0
  257. Width = 938
  258. Height = 27
  259. QuerysCollection = <
  260. item
  261. Query = ADQuery1
  262. QueryCaption = #1056#1072#1073#1086#1095#1080#1077' '#1084#1077#1089#1090#1072
  263. MainQuery = False
  264. FieldList = <
  265. item
  266. FieldName = 'ID'
  267. FieldCaption = 'ID'
  268. FieldType = ffNumber
  269. DisplayName = 'ID'
  270. end
  271. item
  272. FieldName = 'CITEZENID'
  273. FieldCaption = 'CITEZENID'
  274. FieldType = ffNumber
  275. DisplayName = 'CITEZENID'
  276. end
  277. item
  278. FieldName = 'STRUCTUREID'
  279. FieldCaption = 'STRUCTUREID'
  280. FieldType = ffNumber
  281. DisplayName = 'STRUCTUREID'
  282. end
  283. item
  284. FieldName = 'JOBTITLE'
  285. FieldCaption = #1044#1086#1083#1078#1085#1086#1089#1090#1100
  286. FieldType = ffString
  287. DisplayName = 'JOBTITLE'
  288. end
  289. item
  290. FieldName = 'QUALIFICATION'
  291. FieldCaption = #1050#1074#1072#1083#1080#1092'.'
  292. FieldType = ffString
  293. DisplayName = 'QUALIFICATION'
  294. end
  295. item
  296. FieldName = 'CATEGORYNUMB'
  297. FieldCaption = #1050#1072#1090#1077#1075'.'
  298. FieldType = ffNumber
  299. DisplayName = 'CATEGORYNUMB'
  300. end
  301. item
  302. FieldName = 'AMOUNT'
  303. FieldCaption = #1050#1086#1083'-'#1074#1086'.'
  304. FieldType = ffNumber
  305. DisplayName = 'AMOUNT'
  306. end
  307. item
  308. FieldName = 'SALARY'
  309. FieldCaption = #1057#1090#1072#1074#1082#1072'('#1054#1082#1083#1072#1076')'
  310. FieldType = ffNumber
  311. DisplayName = 'SALARY'
  312. end
  313. item
  314. FieldName = 'DCODE'
  315. FieldCaption = #1055#1086#1076#1088'.'
  316. FieldType = ffString
  317. DisplayName = 'DCODE'
  318. end
  319. item
  320. FieldName = 'CONTRACT'
  321. FieldCaption = #1050#1086#1085#1090#1088#1072#1082#1090
  322. FieldType = ffString
  323. DisplayName = 'CONTRACT'
  324. end
  325. item
  326. FieldName = 'CONDITION'
  327. FieldCaption = #1059#1089#1083#1086#1074#1080#1103' '#1090#1088#1091#1076#1072
  328. FieldType = ffString
  329. DisplayName = 'CONDITION'
  330. end
  331. item
  332. FieldName = 'WORKTYPE'
  333. FieldCaption = #1058#1080#1087' '#1088#1072#1073#1086#1090#1099
  334. FieldType = ffString
  335. DisplayName = 'WORKTYPE'
  336. end
  337. item
  338. FieldName = 'RATECODE'
  339. FieldCaption = #1057#1090#1072#1074#1082#1072
  340. FieldType = ffString
  341. DisplayName = 'RATECODE'
  342. end
  343. item
  344. FieldName = 'INDATE'
  345. FieldCaption = #1044#1072#1090#1072' '#1085#1072#1079#1085#1072#1095'.'
  346. FieldType = ffDate
  347. DisplayName = 'INDATE'
  348. end
  349. item
  350. FieldName = 'AGREEMENTDATE'
  351. FieldCaption = #8470' '#1076#1086#1075#1086#1074#1086#1088#1072
  352. FieldType = ffDate
  353. DisplayName = 'AGREEMENTDATE'
  354. end>
  355. end>
  356. DesignSize = (
  357. 938
  358. 27)
  359. end
  360. end
  361. end
  362. object TabSheet6: TTabSheet
  363. Caption = #1040#1090#1090#1077#1089#1090#1072#1094#1080#1103
  364. ImageIndex = 4
  365. object GridPanel5: TGridPanel
  366. AlignWithMargins = True
  367. Left = 3
  368. Top = 3
  369. Width = 1090
  370. Height = 28
  371. Align = alTop
  372. BevelOuter = bvNone
  373. ColumnCollection = <
  374. item
  375. SizeStyle = ssAbsolute
  376. Value = 152.000000000000000000
  377. end
  378. item
  379. Value = 100.000000000000000000
  380. end>
  381. ControlCollection = <
  382. item
  383. Column = -1
  384. Row = -1
  385. end
  386. item
  387. Column = 0
  388. Control = PKDBEditButtons5
  389. Row = 0
  390. end
  391. item
  392. Column = 1
  393. Control = PKDBFindPanel5
  394. Row = 0
  395. end>
  396. RowCollection = <
  397. item
  398. Value = 100.000000000000000000
  399. end>
  400. TabOrder = 0
  401. object PKDBEditButtons5: TPKDBEditButtons
  402. Left = 0
  403. Top = 0
  404. Width = 150
  405. Height = 28
  406. TableName = 'HR_ATESTATION'
  407. PrimaryFieldName = 'ID'
  408. ParentFieldName = 'ID'
  409. Grid = VrDbGrid4
  410. Connection = DataModule1.ADConnection1
  411. UseTempTable = False
  412. EditDialogClassName = 'TATESTATIONEDIT'
  413. DesignSize = (
  414. 150
  415. 28)
  416. end
  417. object PKDBFindPanel5: TPKDBFindPanel
  418. Left = 152
  419. Top = 0
  420. Width = 938
  421. Height = 27
  422. QuerysCollection = <
  423. item
  424. Query = ADQuery2
  425. QueryCaption = #1040#1090#1077#1089#1090#1072#1094#1080#1103
  426. MainQuery = False
  427. FieldList = <
  428. item
  429. FieldName = 'EVENTDATE'
  430. FieldCaption = #1044#1072#1090#1072' '#1072#1090#1090#1077#1089#1090#1072#1094#1080#1080
  431. FieldType = ffDate
  432. DisplayName = 'EVENTDATE'
  433. end
  434. item
  435. FieldName = 'DECISION'
  436. FieldCaption = #1056#1077#1096#1077#1085#1080#1077' '#1082#1086#1084#1080#1089#1089#1080#1080
  437. FieldType = ffString
  438. DisplayName = 'DECISION'
  439. end
  440. item
  441. FieldName = 'DOCNUMB'
  442. FieldCaption = #8470' '#1044#1086#1082'. ('#1087#1088#1086#1090#1086#1082#1086#1083#1072')'
  443. FieldType = ffString
  444. DisplayName = 'DOCNUMB'
  445. end
  446. item
  447. FieldName = 'DOCDATE'
  448. FieldCaption = #1044#1072#1090#1072' '#1076#1086#1082'-'#1090#1072'.'
  449. FieldType = ffDate
  450. DisplayName = 'DOCDATE'
  451. end
  452. item
  453. FieldName = 'REASON'
  454. FieldCaption = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  455. FieldType = ffString
  456. DisplayName = 'REASON'
  457. end>
  458. end>
  459. DesignSize = (
  460. 938
  461. 27)
  462. end
  463. end
  464. object VrDbGrid4: TVrDbGrid
  465. AlignWithMargins = True
  466. Left = 3
  467. Top = 34
  468. Width = 1090
  469. Height = 235
  470. Margins.Top = 0
  471. ScrollBars = ssHorizontal
  472. ShowCheckBoxes = True
  473. CheckFieldName = 'ID'
  474. CheckedRowsColoured = True
  475. CheckedRowsColour = clYellow
  476. MultiSelect = True
  477. ColouredRows = False
  478. CrmEvnColor = clInfoBk
  479. CrmOddColor = clWindow
  480. SortChangeEnable = True
  481. Align = alClient
  482. DataSource = DataSource3
  483. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  484. TabOrder = 1
  485. TitleFont.Charset = DEFAULT_CHARSET
  486. TitleFont.Color = clWindowText
  487. TitleFont.Height = -11
  488. TitleFont.Name = 'Tahoma'
  489. TitleFont.Style = []
  490. Columns = <
  491. item
  492. Expanded = False
  493. FieldName = 'ID'
  494. Visible = False
  495. SortMode = smNone
  496. end
  497. item
  498. Expanded = False
  499. FieldName = 'CITEZENID'
  500. Visible = False
  501. SortMode = smNone
  502. end
  503. item
  504. Expanded = False
  505. FieldName = 'EMPLOYEEID'
  506. Visible = False
  507. SortMode = smNone
  508. end
  509. item
  510. Expanded = False
  511. FieldName = 'EVENTDATE'
  512. Width = 101
  513. Visible = True
  514. SortMode = smNone
  515. end
  516. item
  517. Expanded = False
  518. FieldName = 'DECISION'
  519. Width = 332
  520. Visible = True
  521. SortMode = smNone
  522. end
  523. item
  524. Expanded = False
  525. FieldName = 'DOCNUMB'
  526. Width = 114
  527. Visible = True
  528. SortMode = smNone
  529. end
  530. item
  531. Expanded = False
  532. FieldName = 'DOCDATE'
  533. Width = 79
  534. Visible = True
  535. SortMode = smNone
  536. end
  537. item
  538. Expanded = False
  539. FieldName = 'REASON'
  540. Width = 1000
  541. Visible = True
  542. SortMode = smNone
  543. end>
  544. end
  545. end
  546. object TabSheet7: TTabSheet
  547. Caption = #1050#1074#1072#1083#1080#1092#1080#1082#1072#1094#1080#1103
  548. ImageIndex = 5
  549. object GridPanel2: TGridPanel
  550. AlignWithMargins = True
  551. Left = 3
  552. Top = 3
  553. Width = 1090
  554. Height = 28
  555. Align = alTop
  556. BevelOuter = bvNone
  557. ColumnCollection = <
  558. item
  559. SizeStyle = ssAbsolute
  560. Value = 152.000000000000000000
  561. end
  562. item
  563. Value = 100.000000000000000000
  564. end>
  565. ControlCollection = <
  566. item
  567. Column = -1
  568. Row = -1
  569. end
  570. item
  571. Column = 0
  572. Control = PKDBEditButtons2
  573. Row = 0
  574. end
  575. item
  576. Column = 1
  577. Control = PKDBFindPanel2
  578. Row = 0
  579. end>
  580. RowCollection = <
  581. item
  582. Value = 100.000000000000000000
  583. end>
  584. TabOrder = 0
  585. object PKDBEditButtons2: TPKDBEditButtons
  586. Left = 0
  587. Top = 0
  588. Width = 150
  589. Height = 28
  590. TableName = 'HR_SKILLUP'
  591. PrimaryFieldName = 'ID'
  592. ParentFieldName = 'ID'
  593. Grid = VrDbGrid5
  594. Connection = DataModule1.ADConnection1
  595. UseTempTable = False
  596. EditDialogClassName = 'TSKILLUPEDIT'
  597. DesignSize = (
  598. 150
  599. 28)
  600. end
  601. object PKDBFindPanel2: TPKDBFindPanel
  602. Left = 152
  603. Top = 0
  604. Width = 938
  605. Height = 27
  606. QuerysCollection = <
  607. item
  608. Query = ADQuery3
  609. QueryCaption = #1050#1074#1072#1083#1080#1092#1080#1082#1072#1094#1080#1103
  610. MainQuery = False
  611. FieldList = <
  612. item
  613. FieldName = 'INDATE'
  614. FieldCaption = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1086#1073#1091#1095#1077#1085#1080#1103
  615. FieldType = ffDate
  616. DisplayName = 'INDATE'
  617. end
  618. item
  619. FieldName = 'OUTDATE'
  620. FieldCaption = #1044#1072#1090#1072' '#1082#1086#1085#1094#1072' '#1086#1073#1091#1095#1077#1085#1080#1103
  621. FieldType = ffDate
  622. DisplayName = 'OUTDATE'
  623. end
  624. item
  625. FieldName = 'EDTYPE'
  626. FieldCaption = #1042#1080#1076' '#1087#1086#1074#1099#1096#1077#1085#1080#1103' '#1082#1074#1072#1083#1080#1092#1080#1082#1072#1094#1080#1080
  627. FieldType = ffString
  628. DisplayName = 'EDTYPE'
  629. end
  630. item
  631. FieldName = 'ORGANISATION'
  632. FieldCaption = #1054#1073#1088#1072#1079#1086#1074#1072#1090#1077#1083#1100#1085#1086#1077' '#1091#1095#1077#1088#1077#1078#1076#1077#1085#1080#1077
  633. FieldType = ffString
  634. DisplayName = 'ORGANISATION'
  635. end
  636. item
  637. FieldName = 'DOCTYPE'
  638. FieldCaption = #1044#1086#1082#1091#1084#1077#1085#1090
  639. FieldType = ffString
  640. DisplayName = 'DOCTYPE'
  641. end
  642. item
  643. FieldName = 'DOCNUMB'
  644. FieldCaption = #1057#1077#1088#1080#1103', '#1085#1086#1084#1077#1088' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  645. FieldType = ffString
  646. DisplayName = 'DOCNUMB'
  647. end
  648. item
  649. FieldName = 'DOCDATE'
  650. FieldCaption = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080' '
  651. FieldType = ffDate
  652. DisplayName = 'DOCDATE'
  653. end
  654. item
  655. FieldName = 'REASON'
  656. FieldCaption = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  657. FieldType = ffString
  658. DisplayName = 'REASON'
  659. end>
  660. end>
  661. DesignSize = (
  662. 938
  663. 27)
  664. end
  665. end
  666. object VrDbGrid5: TVrDbGrid
  667. AlignWithMargins = True
  668. Left = 3
  669. Top = 34
  670. Width = 1090
  671. Height = 235
  672. Margins.Top = 0
  673. ScrollBars = ssHorizontal
  674. ShowCheckBoxes = True
  675. CheckFieldName = 'ID'
  676. CheckedRowsColoured = True
  677. CheckedRowsColour = clYellow
  678. MultiSelect = True
  679. ColouredRows = False
  680. CrmEvnColor = clInfoBk
  681. CrmOddColor = clWindow
  682. SortChangeEnable = True
  683. Align = alClient
  684. DataSource = DataSource4
  685. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  686. TabOrder = 1
  687. TitleFont.Charset = DEFAULT_CHARSET
  688. TitleFont.Color = clWindowText
  689. TitleFont.Height = -11
  690. TitleFont.Name = 'Tahoma'
  691. TitleFont.Style = []
  692. Columns = <
  693. item
  694. Expanded = False
  695. FieldName = 'ID'
  696. Visible = False
  697. SortMode = smNone
  698. end
  699. item
  700. Expanded = False
  701. FieldName = 'CITEZENID'
  702. Visible = False
  703. SortMode = smNone
  704. end
  705. item
  706. Expanded = False
  707. FieldName = 'EMPLOYEEID'
  708. Visible = False
  709. SortMode = smNone
  710. end
  711. item
  712. Expanded = False
  713. FieldName = 'INDATE'
  714. Width = 124
  715. Visible = True
  716. SortMode = smNone
  717. end
  718. item
  719. Expanded = False
  720. FieldName = 'OUTDATE'
  721. Width = 118
  722. Visible = True
  723. SortMode = smNone
  724. end
  725. item
  726. Expanded = False
  727. FieldName = 'EDTYPE'
  728. Width = 236
  729. Visible = True
  730. SortMode = smNone
  731. end
  732. item
  733. Expanded = False
  734. FieldName = 'ORGANISATION'
  735. Width = 176
  736. Visible = True
  737. SortMode = smNone
  738. end
  739. item
  740. Expanded = False
  741. FieldName = 'DOCTYPE'
  742. Width = 71
  743. Visible = True
  744. SortMode = smNone
  745. end
  746. item
  747. Expanded = False
  748. FieldName = 'DOCNUMB'
  749. Width = 96
  750. Visible = True
  751. SortMode = smNone
  752. end
  753. item
  754. Expanded = False
  755. FieldName = 'DOCDATE'
  756. Width = 88
  757. Visible = True
  758. SortMode = smNone
  759. end
  760. item
  761. Expanded = False
  762. FieldName = 'REASON'
  763. Width = 1000
  764. Visible = True
  765. SortMode = smNone
  766. end>
  767. end
  768. end
  769. object TabSheet8: TTabSheet
  770. Caption = #1055#1077#1088#1077#1087#1086#1076#1075#1086#1090#1086#1074#1082#1072' '
  771. ImageIndex = 6
  772. object GridPanel7: TGridPanel
  773. AlignWithMargins = True
  774. Left = 3
  775. Top = 3
  776. Width = 1090
  777. Height = 28
  778. Align = alTop
  779. BevelOuter = bvNone
  780. ColumnCollection = <
  781. item
  782. SizeStyle = ssAbsolute
  783. Value = 152.000000000000000000
  784. end
  785. item
  786. Value = 100.000000000000000000
  787. end>
  788. ControlCollection = <
  789. item
  790. Column = -1
  791. Row = -1
  792. end
  793. item
  794. Column = 0
  795. Control = PKDBEditButtons7
  796. Row = 0
  797. end
  798. item
  799. Column = 1
  800. Control = PKDBFindPanel7
  801. Row = 0
  802. end>
  803. RowCollection = <
  804. item
  805. Value = 100.000000000000000000
  806. end>
  807. TabOrder = 0
  808. object PKDBEditButtons7: TPKDBEditButtons
  809. Left = 0
  810. Top = 0
  811. Width = 150
  812. Height = 28
  813. TableName = 'HR_RETRAINING'
  814. PrimaryFieldName = 'ID'
  815. ParentFieldName = 'ID'
  816. Grid = VrDbGrid6
  817. Connection = DataModule1.ADConnection1
  818. UseTempTable = False
  819. EditDialogClassName = 'TRETRAININGEDIT'
  820. DesignSize = (
  821. 150
  822. 28)
  823. end
  824. object PKDBFindPanel7: TPKDBFindPanel
  825. Left = 152
  826. Top = 0
  827. Width = 938
  828. Height = 27
  829. QuerysCollection = <
  830. item
  831. Query = ADQuery4
  832. QueryCaption = #1055#1077#1088#1077#1087#1086#1076#1075#1086#1090#1086#1074#1082#1072
  833. MainQuery = False
  834. FieldList = <
  835. item
  836. FieldName = 'INDATE'
  837. FieldCaption = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1086#1073#1091#1095#1077#1085#1080#1103
  838. FieldType = ffDate
  839. DisplayName = 'INDATE'
  840. end
  841. item
  842. FieldName = 'OUTDATE'
  843. FieldCaption = #1044#1072#1090#1072' '#1086#1082#1086#1085#1095#1072#1085#1080#1103' '#1086#1073#1091#1095#1077#1085#1080#1103
  844. FieldType = ffDate
  845. DisplayName = 'OUTDATE'
  846. end
  847. item
  848. FieldName = 'JOBTITLE'
  849. FieldCaption = #1057#1087#1077#1094#1080#1072#1083#1100#1085#1086#1089#1090#1100
  850. FieldType = ffString
  851. DisplayName = 'JOBTITLE'
  852. end
  853. item
  854. FieldName = 'DOCTYPE'
  855. FieldCaption = #1044#1086#1082#1091#1084#1077#1085#1090
  856. FieldType = ffString
  857. DisplayName = 'DOCTYPE'
  858. end
  859. item
  860. FieldName = 'DOCNUMB'
  861. FieldCaption = #8470' '#1044#1086#1082#1091#1084#1077#1085#1090#1072
  862. FieldType = ffString
  863. DisplayName = 'DOCNUMB'
  864. end
  865. item
  866. FieldName = 'DOCDATE'
  867. FieldCaption = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080' '
  868. FieldType = ffDate
  869. DisplayName = 'DOCDATE'
  870. end
  871. item
  872. FieldName = 'REASON'
  873. FieldCaption = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  874. FieldType = ffString
  875. DisplayName = 'REASON'
  876. end>
  877. end>
  878. DesignSize = (
  879. 938
  880. 27)
  881. end
  882. end
  883. object VrDbGrid6: TVrDbGrid
  884. AlignWithMargins = True
  885. Left = 3
  886. Top = 34
  887. Width = 1090
  888. Height = 235
  889. Margins.Top = 0
  890. ScrollBars = ssHorizontal
  891. ShowCheckBoxes = True
  892. CheckFieldName = 'ID'
  893. CheckedRowsColoured = True
  894. CheckedRowsColour = clYellow
  895. MultiSelect = True
  896. ColouredRows = True
  897. CrmEvnColor = clInfoBk
  898. CrmOddColor = clWindow
  899. SortChangeEnable = True
  900. Align = alClient
  901. DataSource = DataSource5
  902. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  903. TabOrder = 1
  904. TitleFont.Charset = DEFAULT_CHARSET
  905. TitleFont.Color = clWindowText
  906. TitleFont.Height = -11
  907. TitleFont.Name = 'Tahoma'
  908. TitleFont.Style = []
  909. Columns = <
  910. item
  911. Expanded = False
  912. FieldName = 'ID'
  913. Visible = False
  914. SortMode = smNone
  915. end
  916. item
  917. Expanded = False
  918. FieldName = 'CITEZENID'
  919. Visible = False
  920. SortMode = smNone
  921. end
  922. item
  923. Expanded = False
  924. FieldName = 'EMPLOYEEID'
  925. Visible = False
  926. SortMode = smNone
  927. end
  928. item
  929. Expanded = False
  930. FieldName = 'INDATE'
  931. Width = 70
  932. Visible = True
  933. SortMode = smNone
  934. end
  935. item
  936. Expanded = False
  937. FieldName = 'OUTDATE'
  938. Width = 88
  939. Visible = True
  940. SortMode = smNone
  941. end
  942. item
  943. Expanded = False
  944. FieldName = 'JOBTITLE'
  945. Width = 299
  946. Visible = True
  947. SortMode = smNone
  948. end
  949. item
  950. Expanded = False
  951. FieldName = 'DOCTYPE'
  952. Width = 100
  953. Visible = True
  954. SortMode = smNone
  955. end
  956. item
  957. Expanded = False
  958. FieldName = 'DOCNUMB'
  959. Width = 100
  960. Visible = True
  961. SortMode = smNone
  962. end
  963. item
  964. Expanded = False
  965. FieldName = 'DOCDATE'
  966. Width = 73
  967. Visible = True
  968. SortMode = smNone
  969. end
  970. item
  971. Expanded = False
  972. FieldName = 'REASON'
  973. Visible = True
  974. SortMode = smNone
  975. end>
  976. end
  977. end
  978. object TabSheet5: TTabSheet
  979. Caption = #1053#1072#1075#1088#1072#1076#1099
  980. ImageIndex = 3
  981. object GridPanel4: TGridPanel
  982. AlignWithMargins = True
  983. Left = 3
  984. Top = 3
  985. Width = 1090
  986. Height = 28
  987. Align = alTop
  988. BevelOuter = bvNone
  989. ColumnCollection = <
  990. item
  991. SizeStyle = ssAbsolute
  992. Value = 152.000000000000000000
  993. end
  994. item
  995. Value = 100.000000000000000000
  996. end>
  997. ControlCollection = <
  998. item
  999. Column = -1
  1000. Row = -1
  1001. end
  1002. item
  1003. Column = 0
  1004. Control = PKDBEditButtons4
  1005. Row = 0
  1006. end
  1007. item
  1008. Column = 1
  1009. Control = PKDBFindPanel4
  1010. Row = 0
  1011. end>
  1012. RowCollection = <
  1013. item
  1014. Value = 100.000000000000000000
  1015. end>
  1016. TabOrder = 0
  1017. object PKDBEditButtons4: TPKDBEditButtons
  1018. Left = 0
  1019. Top = 0
  1020. Width = 150
  1021. Height = 28
  1022. TableName = 'HR_AWARD'
  1023. PrimaryFieldName = 'ID'
  1024. ParentFieldName = 'ID'
  1025. Grid = VrDbGrid3
  1026. Connection = DataModule1.ADConnection1
  1027. UseTempTable = False
  1028. EditDialogClassName = 'TAWARDEDIT'
  1029. DesignSize = (
  1030. 150
  1031. 28)
  1032. end
  1033. object PKDBFindPanel4: TPKDBFindPanel
  1034. Left = 152
  1035. Top = 0
  1036. Width = 938
  1037. Height = 27
  1038. QuerysCollection = <
  1039. item
  1040. Query = ADQuery5
  1041. QueryCaption = #1053#1072#1075#1088#1072#1076#1099
  1042. MainQuery = False
  1043. KeyFieldName = 'ID'
  1044. FieldList = <
  1045. item
  1046. FieldName = 'AWARDTYPE'
  1047. FieldCaption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1085#1072#1075#1088#1072#1076#1099
  1048. FieldType = ffString
  1049. DisplayName = 'AWARDTYPE'
  1050. end
  1051. item
  1052. FieldName = 'DOCTYPE'
  1053. FieldCaption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  1054. FieldType = ffString
  1055. DisplayName = 'DOCTYPE'
  1056. end
  1057. item
  1058. FieldName = 'DOCNUMB'
  1059. FieldCaption = #1053#1086#1084#1077#1088' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  1060. FieldType = ffString
  1061. DisplayName = 'DOCNUMB'
  1062. end
  1063. item
  1064. FieldName = 'DOCDATE'
  1065. FieldCaption = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
  1066. FieldType = ffDate
  1067. DisplayName = 'DOCDATE'
  1068. end>
  1069. end>
  1070. DesignSize = (
  1071. 938
  1072. 27)
  1073. end
  1074. end
  1075. object VrDbGrid3: TVrDbGrid
  1076. AlignWithMargins = True
  1077. Left = 3
  1078. Top = 34
  1079. Width = 1090
  1080. Height = 235
  1081. Margins.Top = 0
  1082. ScrollBars = ssHorizontal
  1083. ShowCheckBoxes = True
  1084. CheckFieldName = 'ID'
  1085. CheckedRowsColoured = True
  1086. CheckedRowsColour = clYellow
  1087. MultiSelect = True
  1088. ColouredRows = True
  1089. CrmEvnColor = clInfoBk
  1090. CrmOddColor = clWindow
  1091. SortChangeEnable = True
  1092. Align = alClient
  1093. DataSource = DataSource6
  1094. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  1095. TabOrder = 1
  1096. TitleFont.Charset = DEFAULT_CHARSET
  1097. TitleFont.Color = clWindowText
  1098. TitleFont.Height = -11
  1099. TitleFont.Name = 'Tahoma'
  1100. TitleFont.Style = []
  1101. Columns = <
  1102. item
  1103. Expanded = False
  1104. FieldName = 'ID'
  1105. Visible = False
  1106. SortMode = smNone
  1107. end
  1108. item
  1109. Expanded = False
  1110. FieldName = 'CITEZENID'
  1111. Visible = False
  1112. SortMode = smNone
  1113. end
  1114. item
  1115. Expanded = False
  1116. FieldName = 'EMPLOYEEID'
  1117. Visible = False
  1118. SortMode = smNone
  1119. end
  1120. item
  1121. Expanded = False
  1122. FieldName = 'AWARDTYPE'
  1123. Width = 205
  1124. Visible = True
  1125. SortMode = smNone
  1126. end
  1127. item
  1128. Expanded = False
  1129. FieldName = 'DOCTYPE'
  1130. Width = 140
  1131. Visible = True
  1132. SortMode = smNone
  1133. end
  1134. item
  1135. Expanded = False
  1136. FieldName = 'DOCNUMB'
  1137. Width = 100
  1138. Visible = True
  1139. SortMode = smNone
  1140. end
  1141. item
  1142. Expanded = False
  1143. FieldName = 'DOCDATE'
  1144. Width = 1500
  1145. Visible = True
  1146. SortMode = smNone
  1147. end>
  1148. end
  1149. end
  1150. object TabSheet9: TTabSheet
  1151. Caption = #1054#1090#1087#1091#1089#1082
  1152. ImageIndex = 7
  1153. object GridPanel8: TGridPanel
  1154. AlignWithMargins = True
  1155. Left = 3
  1156. Top = 3
  1157. Width = 1090
  1158. Height = 28
  1159. Align = alTop
  1160. BevelOuter = bvNone
  1161. ColumnCollection = <
  1162. item
  1163. SizeStyle = ssAbsolute
  1164. Value = 152.000000000000000000
  1165. end
  1166. item
  1167. Value = 100.000000000000000000
  1168. end>
  1169. ControlCollection = <
  1170. item
  1171. Column = -1
  1172. Row = -1
  1173. end
  1174. item
  1175. Column = 0
  1176. Control = PKDBEditButtons8
  1177. Row = 0
  1178. end
  1179. item
  1180. Column = 1
  1181. Control = PKDBFindPanel8
  1182. Row = 0
  1183. end>
  1184. RowCollection = <
  1185. item
  1186. Value = 100.000000000000000000
  1187. end>
  1188. TabOrder = 0
  1189. object PKDBEditButtons8: TPKDBEditButtons
  1190. Left = 0
  1191. Top = 0
  1192. Width = 150
  1193. Height = 28
  1194. TableName = 'HR_HOLIDAY'
  1195. PrimaryFieldName = 'ID'
  1196. ParentFieldName = 'ID'
  1197. Grid = VrDbGrid7
  1198. Connection = DataModule1.ADConnection1
  1199. UseTempTable = False
  1200. EditDialogClassName = 'THOLIDAYEDIT'
  1201. DesignSize = (
  1202. 150
  1203. 28)
  1204. end
  1205. object PKDBFindPanel8: TPKDBFindPanel
  1206. Left = 152
  1207. Top = 0
  1208. Width = 938
  1209. Height = 27
  1210. QuerysCollection = <
  1211. item
  1212. Query = ADQuery6
  1213. QueryCaption = #1054#1090#1087#1091#1089#1082
  1214. MainQuery = False
  1215. KeyFieldName = 'ID'
  1216. FieldList = <
  1217. item
  1218. FieldName = 'HOLTYPE'
  1219. FieldCaption = #1058#1080#1087' '#1086#1090#1087#1091#1089#1082#1072
  1220. FieldType = ffString
  1221. DisplayName = 'HOLTYPE'
  1222. end
  1223. item
  1224. FieldName = 'WORKDATE1'
  1225. FieldCaption = #1055#1077#1088#1080#1086#1076' '#1088#1072#1073#1086#1090#1099' ('#1085#1072#1095#1072#1083#1086')'
  1226. FieldType = ffDate
  1227. DisplayName = 'WORKDATE1'
  1228. end
  1229. item
  1230. FieldName = 'WORKDATE2'
  1231. FieldCaption = #1055#1077#1088#1080#1086#1076' '#1088#1072#1073#1086#1090#1099' ('#1082#1086#1085#1077#1094')'
  1232. FieldType = ffDate
  1233. DisplayName = 'WORKDATE2'
  1234. end
  1235. item
  1236. FieldName = 'INDATE'
  1237. FieldCaption = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1086#1090#1087#1089#1082#1072
  1238. FieldType = ffDate
  1239. DisplayName = 'INDATE'
  1240. end
  1241. item
  1242. FieldName = 'OUTDATE'
  1243. FieldCaption = #1044#1072#1090#1072' '#1082#1086#1085#1094#1072' '#1086#1090#1087#1091#1089#1082#1072
  1244. FieldType = ffDate
  1245. DisplayName = 'OUTDATE'
  1246. end
  1247. item
  1248. FieldName = 'DAYS'
  1249. FieldCaption = #1063#1080#1089#1083#1086' '#1076#1085#1077#1081
  1250. FieldType = ffString
  1251. DisplayName = 'DAYS'
  1252. end
  1253. item
  1254. FieldName = 'REASON'
  1255. FieldCaption = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  1256. FieldType = ffString
  1257. DisplayName = 'REASON'
  1258. end>
  1259. end>
  1260. DesignSize = (
  1261. 938
  1262. 27)
  1263. end
  1264. end
  1265. object VrDbGrid7: TVrDbGrid
  1266. AlignWithMargins = True
  1267. Left = 3
  1268. Top = 34
  1269. Width = 1090
  1270. Height = 235
  1271. Margins.Top = 0
  1272. ScrollBars = ssHorizontal
  1273. ShowCheckBoxes = True
  1274. CheckFieldName = 'ID'
  1275. CheckedRowsColoured = True
  1276. CheckedRowsColour = clYellow
  1277. MultiSelect = True
  1278. ColouredRows = True
  1279. CrmEvnColor = clInfoBk
  1280. CrmOddColor = clWindow
  1281. SortChangeEnable = True
  1282. Align = alClient
  1283. DataSource = DataSource7
  1284. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  1285. TabOrder = 1
  1286. TitleFont.Charset = DEFAULT_CHARSET
  1287. TitleFont.Color = clWindowText
  1288. TitleFont.Height = -11
  1289. TitleFont.Name = 'Tahoma'
  1290. TitleFont.Style = []
  1291. Columns = <
  1292. item
  1293. Expanded = False
  1294. FieldName = 'ID'
  1295. Visible = False
  1296. SortMode = smNone
  1297. end
  1298. item
  1299. Expanded = False
  1300. FieldName = 'CITEZENID'
  1301. Visible = False
  1302. SortMode = smNone
  1303. end
  1304. item
  1305. Expanded = False
  1306. FieldName = 'EMPLOYEEID'
  1307. Visible = False
  1308. SortMode = smNone
  1309. end
  1310. item
  1311. Expanded = False
  1312. FieldName = 'HOLTYPE'
  1313. Width = 135
  1314. Visible = True
  1315. SortMode = smNone
  1316. end
  1317. item
  1318. Expanded = False
  1319. FieldName = 'WORKDATE1'
  1320. Width = 133
  1321. Visible = True
  1322. SortMode = smNone
  1323. end
  1324. item
  1325. Expanded = False
  1326. FieldName = 'WORKDATE2'
  1327. Visible = True
  1328. SortMode = smNone
  1329. end
  1330. item
  1331. Expanded = False
  1332. FieldName = 'INDATE'
  1333. Width = 110
  1334. Visible = True
  1335. SortMode = smNone
  1336. end
  1337. item
  1338. Expanded = False
  1339. FieldName = 'OUTDATE'
  1340. Width = 111
  1341. Visible = True
  1342. SortMode = smNone
  1343. end
  1344. item
  1345. Expanded = False
  1346. FieldName = 'DAYS'
  1347. Width = 63
  1348. Visible = True
  1349. SortMode = smNone
  1350. end
  1351. item
  1352. Expanded = False
  1353. FieldName = 'REASON'
  1354. Width = 1000
  1355. Visible = True
  1356. SortMode = smNone
  1357. end>
  1358. end
  1359. end
  1360. object TabSheet10: TTabSheet
  1361. Caption = #1051#1100#1075#1086#1090#1099
  1362. ImageIndex = 8
  1363. object GridPanel9: TGridPanel
  1364. AlignWithMargins = True
  1365. Left = 3
  1366. Top = 3
  1367. Width = 1090
  1368. Height = 28
  1369. Align = alTop
  1370. BevelOuter = bvNone
  1371. ColumnCollection = <
  1372. item
  1373. SizeStyle = ssAbsolute
  1374. Value = 152.000000000000000000
  1375. end
  1376. item
  1377. Value = 100.000000000000000000
  1378. end>
  1379. ControlCollection = <
  1380. item
  1381. Column = -1
  1382. Row = -1
  1383. end
  1384. item
  1385. Column = 0
  1386. Control = PKDBEditButtons9
  1387. Row = 0
  1388. end
  1389. item
  1390. Column = 1
  1391. Control = PKDBFindPanel9
  1392. Row = 0
  1393. end>
  1394. RowCollection = <
  1395. item
  1396. Value = 100.000000000000000000
  1397. end>
  1398. TabOrder = 0
  1399. object PKDBEditButtons9: TPKDBEditButtons
  1400. Left = 0
  1401. Top = 0
  1402. Width = 150
  1403. Height = 28
  1404. TableName = 'HR_SOCIAL'
  1405. PrimaryFieldName = 'ID'
  1406. ParentFieldName = 'ID'
  1407. Grid = VrDbGrid8
  1408. Connection = DataModule1.ADConnection1
  1409. UseTempTable = False
  1410. EditDialogClassName = 'TSOCIALEDIT'
  1411. DesignSize = (
  1412. 150
  1413. 28)
  1414. end
  1415. object PKDBFindPanel9: TPKDBFindPanel
  1416. Left = 152
  1417. Top = 0
  1418. Width = 938
  1419. Height = 27
  1420. QuerysCollection = <
  1421. item
  1422. Query = ADQuery7
  1423. QueryCaption = #1051#1100#1075#1086#1090#1099
  1424. MainQuery = False
  1425. KeyFieldName = 'ID'
  1426. FieldList = <
  1427. item
  1428. FieldName = 'PRIVTYPE'
  1429. FieldCaption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1083#1100#1075#1086#1090#1099
  1430. FieldType = ffString
  1431. DisplayName = 'PRIVTYPE'
  1432. end
  1433. item
  1434. FieldName = 'DOCNUMB'
  1435. FieldCaption = #1053#1086#1084#1077#1088' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  1436. FieldType = ffString
  1437. DisplayName = 'DOCNUMB'
  1438. end
  1439. item
  1440. FieldName = 'DOCDATE'
  1441. FieldCaption = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
  1442. FieldType = ffDate
  1443. DisplayName = 'DOCDATE'
  1444. end
  1445. item
  1446. FieldName = 'REASON'
  1447. FieldCaption = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  1448. FieldType = ffString
  1449. DisplayName = 'REASON'
  1450. end>
  1451. end>
  1452. DesignSize = (
  1453. 938
  1454. 27)
  1455. end
  1456. end
  1457. object VrDbGrid8: TVrDbGrid
  1458. AlignWithMargins = True
  1459. Left = 3
  1460. Top = 34
  1461. Width = 1090
  1462. Height = 235
  1463. Margins.Top = 0
  1464. ScrollBars = ssHorizontal
  1465. ShowCheckBoxes = True
  1466. CheckFieldName = 'ID'
  1467. CheckedRowsColoured = True
  1468. CheckedRowsColour = clYellow
  1469. MultiSelect = True
  1470. ColouredRows = True
  1471. CrmEvnColor = clInfoBk
  1472. CrmOddColor = clWindow
  1473. SortChangeEnable = True
  1474. Align = alClient
  1475. DataSource = DataSource8
  1476. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  1477. TabOrder = 1
  1478. TitleFont.Charset = DEFAULT_CHARSET
  1479. TitleFont.Color = clWindowText
  1480. TitleFont.Height = -11
  1481. TitleFont.Name = 'Tahoma'
  1482. TitleFont.Style = []
  1483. Columns = <
  1484. item
  1485. Expanded = False
  1486. FieldName = 'PRIVTYPE'
  1487. Width = 333
  1488. Visible = True
  1489. SortMode = smNone
  1490. end
  1491. item
  1492. Expanded = False
  1493. FieldName = 'DOCNUMB'
  1494. Width = 109
  1495. Visible = True
  1496. SortMode = smNone
  1497. end
  1498. item
  1499. Expanded = False
  1500. FieldName = 'DOCDATE'
  1501. Width = 75
  1502. Visible = True
  1503. SortMode = smNone
  1504. end
  1505. item
  1506. Expanded = False
  1507. FieldName = 'REASON'
  1508. Width = 1000
  1509. Visible = True
  1510. SortMode = smNone
  1511. end>
  1512. end
  1513. end
  1514. object TabSheet4: TTabSheet
  1515. Caption = #1044#1080#1089#1094#1080#1087#1083#1080#1085#1072
  1516. ImageIndex = 2
  1517. object GridPanel3: TGridPanel
  1518. AlignWithMargins = True
  1519. Left = 3
  1520. Top = 3
  1521. Width = 1090
  1522. Height = 28
  1523. Align = alTop
  1524. BevelOuter = bvNone
  1525. ColumnCollection = <
  1526. item
  1527. SizeStyle = ssAbsolute
  1528. Value = 152.000000000000000000
  1529. end
  1530. item
  1531. Value = 100.000000000000000000
  1532. end>
  1533. ControlCollection = <
  1534. item
  1535. Column = -1
  1536. Row = -1
  1537. end
  1538. item
  1539. Column = 0
  1540. Control = PKDBEditButtons3
  1541. Row = 0
  1542. end
  1543. item
  1544. Column = 1
  1545. Control = PKDBFindPanel3
  1546. Row = 0
  1547. end>
  1548. RowCollection = <
  1549. item
  1550. Value = 100.000000000000000000
  1551. end>
  1552. TabOrder = 0
  1553. object PKDBEditButtons3: TPKDBEditButtons
  1554. Left = 0
  1555. Top = 0
  1556. Width = 150
  1557. Height = 28
  1558. TableName = 'HR_DISCIPLINE'
  1559. PrimaryFieldName = 'ID'
  1560. ParentFieldName = 'ID'
  1561. Grid = VrDbGrid2
  1562. Connection = DataModule1.ADConnection1
  1563. UseTempTable = False
  1564. EditDialogClassName = 'TDISCIPLINEEDIT'
  1565. DesignSize = (
  1566. 150
  1567. 28)
  1568. end
  1569. object PKDBFindPanel3: TPKDBFindPanel
  1570. Left = 152
  1571. Top = 0
  1572. Width = 938
  1573. Height = 27
  1574. QuerysCollection = <
  1575. item
  1576. Query = ADQuery13
  1577. QueryCaption = #1053#1072#1088#1091#1096#1077#1085#1080#1103' '#1090#1088#1091#1076#1086#1074#1086#1081' '#1076#1080#1089#1094#1080#1087#1083#1080#1085#1099
  1578. MainQuery = False
  1579. KeyFieldName = 'ID'
  1580. FieldList = <
  1581. item
  1582. FieldName = 'EVENTDATE'
  1583. FieldCaption = #1044#1072#1090#1072' '#1085#1072#1088#1091#1096#1077#1085#1080#1103
  1584. FieldType = ffDate
  1585. DisplayName = 'EVENTDATE'
  1586. end
  1587. item
  1588. FieldName = 'BASICDOC'
  1589. FieldCaption = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  1590. FieldType = ffString
  1591. DisplayName = 'BASICDOC'
  1592. end
  1593. item
  1594. FieldName = 'EVENTTYPE'
  1595. FieldCaption = #1058#1080#1087' '#1085#1072#1088#1091#1096#1077#1085#1080#1103
  1596. FieldType = ffString
  1597. DisplayName = 'EVENTTYPE'
  1598. end
  1599. item
  1600. FieldName = 'COLLECTTYPE'
  1601. FieldCaption = #1042#1080#1076' '#1074#1079#1099#1089#1082#1072#1085#1080#1103
  1602. FieldType = ffString
  1603. DisplayName = 'COLLECTTYPE'
  1604. end>
  1605. end>
  1606. DesignSize = (
  1607. 938
  1608. 27)
  1609. end
  1610. end
  1611. object VrDbGrid2: TVrDbGrid
  1612. AlignWithMargins = True
  1613. Left = 3
  1614. Top = 34
  1615. Width = 1090
  1616. Height = 235
  1617. Margins.Top = 0
  1618. ScrollBars = ssHorizontal
  1619. ShowCheckBoxes = True
  1620. CheckFieldName = 'ID'
  1621. CheckedRowsColoured = True
  1622. CheckedRowsColour = clYellow
  1623. MultiSelect = True
  1624. ColouredRows = True
  1625. CrmEvnColor = clInfoBk
  1626. CrmOddColor = clWindow
  1627. SortChangeEnable = True
  1628. Align = alClient
  1629. DataSource = DataSource13
  1630. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  1631. TabOrder = 1
  1632. TitleFont.Charset = DEFAULT_CHARSET
  1633. TitleFont.Color = clWindowText
  1634. TitleFont.Height = -11
  1635. TitleFont.Name = 'Tahoma'
  1636. TitleFont.Style = []
  1637. Columns = <
  1638. item
  1639. Expanded = False
  1640. FieldName = 'ID'
  1641. Visible = False
  1642. SortMode = smNone
  1643. end
  1644. item
  1645. Expanded = False
  1646. FieldName = 'EVENTDATE'
  1647. Width = 99
  1648. Visible = True
  1649. SortMode = smNone
  1650. end
  1651. item
  1652. Expanded = False
  1653. FieldName = 'EVENTTYPE'
  1654. Width = 302
  1655. Visible = True
  1656. SortMode = smNone
  1657. end
  1658. item
  1659. Expanded = False
  1660. FieldName = 'COLLECTTYPE'
  1661. Width = 100
  1662. Visible = True
  1663. SortMode = smNone
  1664. end
  1665. item
  1666. Expanded = False
  1667. FieldName = 'BASICDOC'
  1668. Width = 1200
  1669. Visible = True
  1670. SortMode = smNone
  1671. end
  1672. item
  1673. Expanded = False
  1674. FieldName = 'CITEZENID'
  1675. Visible = False
  1676. SortMode = smNone
  1677. end
  1678. item
  1679. Expanded = False
  1680. FieldName = 'STATUSID'
  1681. Visible = False
  1682. SortMode = smNone
  1683. end
  1684. item
  1685. Expanded = False
  1686. FieldName = 'CHANGESTATUSDATE'
  1687. Visible = False
  1688. SortMode = smNone
  1689. end
  1690. item
  1691. Expanded = False
  1692. FieldName = 'STATUSNAME'
  1693. Visible = False
  1694. SortMode = smNone
  1695. end
  1696. item
  1697. Expanded = False
  1698. FieldName = 'EMPLOYEEID'
  1699. Visible = False
  1700. SortMode = smNone
  1701. end>
  1702. end
  1703. end
  1704. object TabSheet13: TTabSheet
  1705. Caption = #1042#1086#1080#1085#1089#1082#1080#1081' '#1091#1095#1077#1090
  1706. ImageIndex = 3
  1707. object PKDBBLabelComboBox2: TPKDBBLabelComboBox
  1708. Left = 15
  1709. Top = 70
  1710. Width = 434
  1711. Height = 21
  1712. ItemHeight = 13
  1713. TabOrder = 0
  1714. Text = #1047#1074#1072#1085#1080#1077
  1715. DBTable = 'HR_FACETCONTENT'
  1716. PrimaryKey = 'ID'
  1717. content = 'rowcontent'
  1718. constraint = ' facetid=1487'
  1719. Table = PKDBTable1
  1720. TableField = 'RANKID'
  1721. EditLabel.Width = 36
  1722. EditLabel.Height = 13
  1723. EditLabel.Caption = #1047#1074#1072#1085#1080#1077
  1724. end
  1725. object PKDBBLabelComboBox1: TPKDBBLabelComboBox
  1726. Left = 15
  1727. Top = 25
  1728. Width = 434
  1729. Height = 21
  1730. ItemHeight = 13
  1731. TabOrder = 1
  1732. Text = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1079#1072#1087#1072#1089#1072
  1733. DBTable = 'HR_FACETCONTENT'
  1734. PrimaryKey = 'ID'
  1735. content = 'rowcontent'
  1736. constraint = ' facetid=69957'
  1737. Table = PKDBTable1
  1738. TableField = 'STOCKATEGID'
  1739. EditLabel.Width = 91
  1740. EditLabel.Height = 13
  1741. EditLabel.Caption = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1079#1072#1087#1072#1089#1072
  1742. end
  1743. object PKDBLabelEdit1: TPKDBLabelEdit
  1744. Left = 15
  1745. Top = 115
  1746. Width = 434
  1747. Height = 21
  1748. TabOrder = 2
  1749. Text = #1057#1086#1089#1090#1072#1074' ('#1087#1088#1086#1092#1080#1083#1100')'
  1750. Table = PKDBTable1
  1751. TableField = 'PROFIL'
  1752. EditLabel.Width = 91
  1753. EditLabel.Height = 13
  1754. EditLabel.Caption = #1057#1086#1089#1090#1072#1074' ('#1087#1088#1086#1092#1080#1083#1100')'
  1755. end
  1756. object PKDBLabelEdit2: TPKDBLabelEdit
  1757. Left = 15
  1758. Top = 160
  1759. Width = 186
  1760. Height = 21
  1761. TabOrder = 3
  1762. Text = #1055#1086#1083#1085#1086#1077' '#1082#1086#1076#1086#1074#1086#1077' '#1086#1073#1086#1079#1085#1072#1095#1077#1085#1080#1077' '#1042#1059#1057
  1763. Table = PKDBTable1
  1764. TableField = 'VUS'
  1765. EditLabel.Width = 174
  1766. EditLabel.Height = 13
  1767. EditLabel.Caption = #1055#1086#1083#1085#1086#1077' '#1082#1086#1076#1086#1074#1086#1077' '#1086#1073#1086#1079#1085#1072#1095#1077#1085#1080#1077' '#1042#1059#1057
  1768. end
  1769. object PKDBBLabelComboBox3: TPKDBBLabelComboBox
  1770. Left = 224
  1771. Top = 160
  1772. Width = 225
  1773. Height = 21
  1774. ItemHeight = 13
  1775. TabOrder = 4
  1776. Text = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1075#1086#1076#1085#1086#1089#1090#1080' '#1082' '#1074#1086#1077#1085#1085#1086#1081' '#1089#1083#1091#1078#1073#1077
  1777. DBTable = 'HR_FACETCONTENT'
  1778. PrimaryKey = 'ID'
  1779. content = 'rowcontent'
  1780. constraint = ' facetid=59895'
  1781. Table = PKDBTable1
  1782. TableField = 'MILITSTATUSID'
  1783. EditLabel.Width = 198
  1784. EditLabel.Height = 13
  1785. EditLabel.Caption = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1075#1086#1076#1085#1086#1089#1090#1080' '#1082' '#1074#1086#1077#1085#1085#1086#1081' '#1089#1083#1091#1078#1073#1077
  1786. end
  1787. object Button3: TButton
  1788. Left = 495
  1789. Top = 205
  1790. Width = 114
  1791. Height = 39
  1792. Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
  1793. TabOrder = 5
  1794. OnClick = Button3Click
  1795. end
  1796. object PKDBBLabelComboBox4: TPKDBBLabelComboBox
  1797. Left = 15
  1798. Top = 205
  1799. Width = 434
  1800. Height = 21
  1801. ItemHeight = 13
  1802. TabOrder = 6
  1803. Text = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1074#1086#1077#1085#1085#1086#1075#1086' '#1082#1086#1084#1080#1089#1089#1072#1088#1080#1072#1090#1072' '#1087#1086' '#1084#1077#1089#1090#1091' '#1078#1080#1090#1077#1083#1100#1089#1090#1074#1072
  1804. DBTable = 'HR_ORGANISATION'
  1805. PrimaryKey = 'ID'
  1806. content = 'name'
  1807. constraint = ' organisationtype=59793'
  1808. Table = PKDBTable1
  1809. TableField = 'VOENKOMID'
  1810. EditLabel.Width = 307
  1811. EditLabel.Height = 13
  1812. EditLabel.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1074#1086#1077#1085#1085#1086#1075#1086' '#1082#1086#1084#1080#1089#1089#1072#1088#1080#1072#1090#1072' '#1087#1086' '#1084#1077#1089#1090#1091' '#1078#1080#1090#1077#1083#1100#1089#1090#1074#1072
  1813. end
  1814. object PKDBLabelEdit3: TPKDBLabelEdit
  1815. Left = 495
  1816. Top = 70
  1817. Width = 274
  1818. Height = 21
  1819. TabOrder = 7
  1820. Text = #1054#1073#1097#1080#1081' '#1091#1095#1077#1090' ('#1085#1086#1084#1077#1088' '#1082#1086#1084#1072#1085#1076#1099', '#1087#1072#1088#1090#1080#1080')'
  1821. Table = PKDBTable1
  1822. TableField = 'MILACCOUNTGEN'
  1823. EditLabel.Width = 194
  1824. EditLabel.Height = 13
  1825. EditLabel.Caption = #1054#1073#1097#1080#1081' '#1091#1095#1077#1090' ('#1085#1086#1084#1077#1088' '#1082#1086#1084#1072#1085#1076#1099', '#1087#1072#1088#1090#1080#1080')'
  1826. end
  1827. object PKDBLabelEdit7: TPKDBLabelEdit
  1828. Left = 495
  1829. Top = 115
  1830. Width = 274
  1831. Height = 21
  1832. TabOrder = 8
  1833. Text = #1057#1087#1077#1094#1080#1072#1083#1100#1085#1099#1081' '#1091#1095#1077#1090
  1834. Table = PKDBTable1
  1835. TableField = 'MILACCOUNTSPEC'
  1836. EditLabel.Width = 96
  1837. EditLabel.Height = 13
  1838. EditLabel.Caption = #1057#1087#1077#1094#1080#1072#1083#1100#1085#1099#1081' '#1091#1095#1077#1090
  1839. end
  1840. object PKDBBLabelComboBox5: TPKDBBLabelComboBox
  1841. Left = 495
  1842. Top = 25
  1843. Width = 274
  1844. Height = 21
  1845. ItemHeight = 13
  1846. TabOrder = 9
  1847. Text = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1074#1080#1076#1072' '#1074#1086#1080#1085#1089#1082#1086#1075#1086' '#1091#1095#1077#1090#1072
  1848. DBTable = 'HR_FACETCONTENT'
  1849. PrimaryKey = 'ID'
  1850. content = ' rowcontent'
  1851. constraint = ' facetid=69954'
  1852. Table = PKDBTable1
  1853. TableField = 'MILACCOUNTID'
  1854. EditLabel.Width = 161
  1855. EditLabel.Height = 13
  1856. EditLabel.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1074#1086#1080#1085#1089#1082#1086#1075#1086' '#1091#1095#1077#1090#1072
  1857. end
  1858. object PKDBLabelEdit14: TPKDBLabelEdit
  1859. Left = 495
  1860. Top = 160
  1861. Width = 274
  1862. Height = 21
  1863. TabOrder = 10
  1864. Text = #1054#1090#1084#1077#1090#1082#1072' '#1086' '#1089#1085#1103#1090#1080#1080' '#1089' '#1091#1095#1077#1090#1072
  1865. Table = PKDBTable1
  1866. TableField = 'MILREGFLAG'
  1867. EditLabel.Width = 132
  1868. EditLabel.Height = 13
  1869. EditLabel.Caption = #1054#1090#1084#1077#1090#1082#1072' '#1086' '#1089#1085#1103#1090#1080#1080' '#1089' '#1091#1095#1077#1090#1072
  1870. end
  1871. end
  1872. object TabSheet11: TTabSheet
  1873. Caption = #1054#1073#1088#1072#1079#1086#1074#1072#1085#1080#1077
  1874. ImageIndex = 1
  1875. object GridPanel10: TGridPanel
  1876. AlignWithMargins = True
  1877. Left = 3
  1878. Top = 3
  1879. Width = 1090
  1880. Height = 28
  1881. Align = alTop
  1882. BevelOuter = bvNone
  1883. ColumnCollection = <
  1884. item
  1885. SizeStyle = ssAbsolute
  1886. Value = 152.000000000000000000
  1887. end
  1888. item
  1889. Value = 100.000000000000000000
  1890. end>
  1891. ControlCollection = <
  1892. item
  1893. Column = -1
  1894. Row = -1
  1895. end
  1896. item
  1897. Column = 0
  1898. Control = PKDBEditButtons10
  1899. Row = 0
  1900. end
  1901. item
  1902. Column = 1
  1903. Control = PKDBFindPanel10
  1904. Row = 0
  1905. end>
  1906. RowCollection = <
  1907. item
  1908. Value = 100.000000000000000000
  1909. end>
  1910. TabOrder = 0
  1911. object PKDBEditButtons10: TPKDBEditButtons
  1912. Left = 0
  1913. Top = 0
  1914. Width = 150
  1915. Height = 28
  1916. TableName = 'HR_DOCEDUCATION'
  1917. PrimaryFieldName = 'ID'
  1918. ParentFieldName = 'ID'
  1919. Grid = VrDbGrid9
  1920. Connection = DataModule1.ADConnection1
  1921. UseTempTable = False
  1922. EditDialogClassName = 'TDOCEDUCATIONEDIT'
  1923. DesignSize = (
  1924. 150
  1925. 28)
  1926. end
  1927. object PKDBFindPanel10: TPKDBFindPanel
  1928. Left = 152
  1929. Top = 0
  1930. Width = 938
  1931. Height = 27
  1932. QuerysCollection = <
  1933. item
  1934. Query = ADQuery3
  1935. QueryCaption = #1054#1073#1088#1072#1079#1086#1074#1072#1085#1080#1077
  1936. MainQuery = True
  1937. KeyFieldName = 'ID'
  1938. FieldList = <
  1939. item
  1940. FieldName = 'DOCSERIA'
  1941. FieldCaption = #1057#1077#1088#1080#1103' '#1076#1086#1082'-'#1090#1072'.'
  1942. FieldType = ffString
  1943. DisplayName = 'DOCSERIA'
  1944. end
  1945. item
  1946. FieldName = 'DOCNUMB'
  1947. FieldCaption = #8470' '#1076#1086#1082'-'#1090#1072'.'
  1948. FieldType = ffString
  1949. DisplayName = 'DOCNUMB'
  1950. end
  1951. item
  1952. FieldName = 'NAME'
  1953. FieldCaption = #1053#1072#1079#1074#1072#1085#1080#1077' '#1086#1088#1075'.'
  1954. FieldType = ffString
  1955. DisplayName = 'NAME'
  1956. end
  1957. item
  1958. FieldName = 'OUTYEAR'
  1959. FieldCaption = #1043#1086#1076' '#1074#1099#1087#1091#1089#1082#1072
  1960. FieldType = ffString
  1961. DisplayName = 'OUTYEAR'
  1962. end
  1963. item
  1964. FieldName = 'DOCTYPE'
  1965. FieldCaption = #1090#1080#1087' '#1076#1086#1082'-'#1090#1072'.'
  1966. FieldType = ffString
  1967. DisplayName = 'DOCTYPE'
  1968. end
  1969. item
  1970. FieldName = 'OVEREDUCATION'
  1971. FieldCaption = #1055#1086#1089#1083#1077#1074#1091#1079#1086#1074#1089#1082#1086#1077' '#1086#1073#1088'.'
  1972. FieldType = ffString
  1973. DisplayName = 'OVEREDUCATION'
  1974. end
  1975. item
  1976. FieldName = 'SPECIALITYCODE'
  1977. FieldCaption = #1050#1086#1076' '#1089#1087#1077#1094'.'
  1978. FieldType = ffString
  1979. DisplayName = 'SPECIALITYCODE'
  1980. end
  1981. item
  1982. FieldName = 'SPECIALITY'
  1983. FieldCaption = #1057#1087#1077#1094#1080#1072#1083#1100#1085#1086#1089#1090#1100
  1984. FieldType = ffString
  1985. DisplayName = 'SPECIALITY'
  1986. end
  1987. item
  1988. FieldName = 'CVALIFICATIONCODE'
  1989. FieldCaption = #1050#1086#1076' '#1082#1074#1072#1083'.'
  1990. FieldType = ffString
  1991. DisplayName = 'CVALIFICATIONCODE'
  1992. end
  1993. item
  1994. FieldName = 'CVALIFICATION'
  1995. FieldCaption = #1050#1074#1072#1083#1080#1092#1080#1082#1072#1094#1080#1103
  1996. FieldType = ffString
  1997. DisplayName = 'CVALIFICATION'
  1998. end
  1999. item
  2000. FieldName = 'FIO'
  2001. FieldCaption = #1060#1048#1054
  2002. FieldType = ffString
  2003. DisplayName = 'FIO'
  2004. end>
  2005. end>
  2006. DesignSize = (
  2007. 938
  2008. 27)
  2009. end
  2010. end
  2011. object VrDbGrid9: TVrDbGrid
  2012. AlignWithMargins = True
  2013. Left = 3
  2014. Top = 34
  2015. Width = 1090
  2016. Height = 235
  2017. Margins.Top = 0
  2018. ScrollBars = ssHorizontal
  2019. ShowCheckBoxes = True
  2020. CheckFieldName = 'ID'
  2021. CheckedRowsColoured = True
  2022. CheckedRowsColour = clYellow
  2023. MultiSelect = True
  2024. ColouredRows = True
  2025. CrmEvnColor = clInfoBk
  2026. CrmOddColor = clWindow
  2027. SortChangeEnable = True
  2028. Align = alClient
  2029. DataSource = DataSource15
  2030. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  2031. TabOrder = 1
  2032. TitleFont.Charset = DEFAULT_CHARSET
  2033. TitleFont.Color = clWindowText
  2034. TitleFont.Height = -11
  2035. TitleFont.Name = 'Tahoma'
  2036. TitleFont.Style = []
  2037. Columns = <
  2038. item
  2039. Expanded = False
  2040. FieldName = 'ID'
  2041. Visible = False
  2042. SortMode = smNone
  2043. end
  2044. item
  2045. Expanded = False
  2046. FieldName = 'DOCTYPE'
  2047. Width = 66
  2048. Visible = True
  2049. SortMode = smNone
  2050. end
  2051. item
  2052. Expanded = False
  2053. FieldName = 'SPECIALITY'
  2054. Width = 228
  2055. Visible = True
  2056. SortMode = smNone
  2057. end
  2058. item
  2059. Expanded = False
  2060. FieldName = 'CVALIFICATION'
  2061. Width = 90
  2062. Visible = True
  2063. SortMode = smNone
  2064. end
  2065. item
  2066. Expanded = False
  2067. FieldName = 'EDUCATIONFORM'
  2068. Width = 88
  2069. Visible = True
  2070. SortMode = smNone
  2071. end
  2072. item
  2073. Expanded = False
  2074. FieldName = 'DOCSERIA'
  2075. Width = 36
  2076. Visible = True
  2077. SortMode = smNone
  2078. end
  2079. item
  2080. Expanded = False
  2081. FieldName = 'DOCNUMB'
  2082. Width = 44
  2083. Visible = True
  2084. SortMode = smNone
  2085. end
  2086. item
  2087. Expanded = False
  2088. FieldName = 'NAME'
  2089. Width = 179
  2090. Visible = True
  2091. SortMode = smNone
  2092. end
  2093. item
  2094. Expanded = False
  2095. FieldName = 'OUTYEAR'
  2096. Visible = True
  2097. SortMode = smNone
  2098. end
  2099. item
  2100. Expanded = False
  2101. FieldName = 'OVEREDUCATION'
  2102. Visible = True
  2103. SortMode = smNone
  2104. end
  2105. item
  2106. Expanded = False
  2107. FieldName = 'SPECIALITYCODE'
  2108. Visible = True
  2109. SortMode = smNone
  2110. end
  2111. item
  2112. Expanded = False
  2113. FieldName = 'CVALIFICATIONCODE'
  2114. Visible = True
  2115. SortMode = smNone
  2116. end
  2117. item
  2118. Expanded = False
  2119. FieldName = 'FIO'
  2120. Visible = True
  2121. SortMode = smNone
  2122. end>
  2123. end
  2124. end
  2125. object TabSheet14: TTabSheet
  2126. Caption = #1040#1076#1088#1077#1089
  2127. ImageIndex = 4
  2128. object GridPanel12: TGridPanel
  2129. AlignWithMargins = True
  2130. Left = 3
  2131. Top = 3
  2132. Width = 1090
  2133. Height = 28
  2134. Align = alTop
  2135. BevelOuter = bvNone
  2136. ColumnCollection = <
  2137. item
  2138. SizeStyle = ssAbsolute
  2139. Value = 152.000000000000000000
  2140. end
  2141. item
  2142. Value = 100.000000000000000000
  2143. end>
  2144. ControlCollection = <
  2145. item
  2146. Column = -1
  2147. Row = -1
  2148. end
  2149. item
  2150. Column = 0
  2151. Control = PKDBEditButtons12
  2152. Row = 0
  2153. end
  2154. item
  2155. Column = 1
  2156. Control = PKDBFindPanel12
  2157. Row = 0
  2158. end>
  2159. RowCollection = <
  2160. item
  2161. Value = 100.000000000000000000
  2162. end>
  2163. TabOrder = 0
  2164. object PKDBEditButtons12: TPKDBEditButtons
  2165. Left = 0
  2166. Top = 0
  2167. Width = 150
  2168. Height = 28
  2169. TableName = 'HR_REGISTRATION'
  2170. PrimaryFieldName = 'ID'
  2171. Grid = VrDbGrid11
  2172. Connection = DataModule1.ADConnection1
  2173. UseTempTable = False
  2174. EditDialogClassName = 'TREGISTRATIONEDIT'
  2175. DesignSize = (
  2176. 150
  2177. 28)
  2178. end
  2179. object PKDBFindPanel12: TPKDBFindPanel
  2180. Left = 152
  2181. Top = 0
  2182. Width = 938
  2183. Height = 27
  2184. QuerysCollection = <
  2185. item
  2186. Query = ADQuery3
  2187. MainQuery = False
  2188. FieldList = <
  2189. item
  2190. FieldName = 'LASTNAME'
  2191. FieldCaption = 'LASTNAME'
  2192. FieldType = ffString
  2193. DisplayName = 'LASTNAME'
  2194. end
  2195. item
  2196. FieldName = 'NAME'
  2197. FieldCaption = 'NAME'
  2198. FieldType = ffString
  2199. DisplayName = 'NAME'
  2200. end
  2201. item
  2202. FieldName = 'FATHERSHIP'
  2203. FieldCaption = 'FATHERSHIP'
  2204. FieldType = ffString
  2205. DisplayName = 'FATHERSHIP'
  2206. end
  2207. item
  2208. FieldName = 'POL'
  2209. FieldCaption = 'POL'
  2210. FieldType = ffString
  2211. DisplayName = 'POL'
  2212. end
  2213. item
  2214. FieldName = 'BIRTHDATE'
  2215. FieldCaption = 'BIRTHDATE'
  2216. FieldType = ffDate
  2217. DisplayName = 'BIRTHDATE'
  2218. end
  2219. item
  2220. FieldName = 'BIRTHPLACE'
  2221. FieldCaption = 'BIRTHPLACE'
  2222. FieldType = ffString
  2223. DisplayName = 'BIRTHPLACE'
  2224. end
  2225. item
  2226. FieldName = 'CONDITION'
  2227. FieldCaption = 'CONDITION'
  2228. FieldType = ffString
  2229. DisplayName = 'CONDITION'
  2230. end>
  2231. end>
  2232. DesignSize = (
  2233. 938
  2234. 27)
  2235. end
  2236. end
  2237. object VrDbGrid11: TVrDbGrid
  2238. AlignWithMargins = True
  2239. Left = 3
  2240. Top = 34
  2241. Width = 1090
  2242. Height = 235
  2243. Margins.Top = 0
  2244. ScrollBars = ssHorizontal
  2245. ShowCheckBoxes = True
  2246. CheckFieldName = 'ID'
  2247. CheckedRowsColoured = True
  2248. CheckedRowsColour = clYellow
  2249. MultiSelect = True
  2250. ColouredRows = True
  2251. CrmEvnColor = clInfoBk
  2252. CrmOddColor = clWindow
  2253. SortChangeEnable = True
  2254. Align = alClient
  2255. DataSource = DataSource11
  2256. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  2257. TabOrder = 1
  2258. TitleFont.Charset = DEFAULT_CHARSET
  2259. TitleFont.Color = clWindowText
  2260. TitleFont.Height = -11
  2261. TitleFont.Name = 'Tahoma'
  2262. TitleFont.Style = []
  2263. Columns = <
  2264. item
  2265. Expanded = False
  2266. FieldName = 'ID'
  2267. Visible = False
  2268. SortMode = smNone
  2269. end
  2270. item
  2271. Expanded = False
  2272. FieldName = 'CITEZENID'
  2273. Visible = False
  2274. SortMode = smNone
  2275. end
  2276. item
  2277. Expanded = False
  2278. FieldName = 'ADRESS'
  2279. Width = 306
  2280. Visible = True
  2281. SortMode = smNone
  2282. end
  2283. item
  2284. Expanded = False
  2285. FieldName = 'REGDATE'
  2286. Visible = True
  2287. SortMode = smNone
  2288. end
  2289. item
  2290. Expanded = False
  2291. FieldName = 'STATUS'
  2292. Visible = True
  2293. SortMode = smNone
  2294. end
  2295. item
  2296. Expanded = False
  2297. FieldName = 'PHONEID'
  2298. Visible = False
  2299. SortMode = smNone
  2300. end>
  2301. end
  2302. end
  2303. object TabSheet3: TTabSheet
  2304. Caption = #1057#1090#1088#1072#1093#1086#1074#1072#1085#1080#1077
  2305. ImageIndex = 14
  2306. object GridPanel11: TGridPanel
  2307. AlignWithMargins = True
  2308. Left = 3
  2309. Top = 3
  2310. Width = 1090
  2311. Height = 28
  2312. Align = alTop
  2313. BevelOuter = bvNone
  2314. ColumnCollection = <
  2315. item
  2316. SizeStyle = ssAbsolute
  2317. Value = 152.000000000000000000
  2318. end
  2319. item
  2320. Value = 100.000000000000000000
  2321. end>
  2322. ControlCollection = <
  2323. item
  2324. Column = -1
  2325. Row = -1
  2326. end
  2327. item
  2328. Column = 0
  2329. Control = PKDBEditButtons11
  2330. Row = 0
  2331. end
  2332. item
  2333. Column = 1
  2334. Control = PKDBFindPanel11
  2335. Row = 0
  2336. end>
  2337. RowCollection = <
  2338. item
  2339. Value = 100.000000000000000000
  2340. end>
  2341. TabOrder = 0
  2342. object PKDBEditButtons11: TPKDBEditButtons
  2343. Left = 0
  2344. Top = 0
  2345. Width = 150
  2346. Height = 28
  2347. TableName = 'HR_INSURANCE'
  2348. PrimaryFieldName = 'ID'
  2349. ParentFieldName = 'ID'
  2350. Grid = VrDbGrid10
  2351. Connection = DataModule1.ADConnection1
  2352. UseTempTable = False
  2353. EditDialogClassName = 'TINSURANCEEDIT'
  2354. DesignSize = (
  2355. 150
  2356. 28)
  2357. end
  2358. object PKDBFindPanel11: TPKDBFindPanel
  2359. Left = 152
  2360. Top = 0
  2361. Width = 938
  2362. Height = 27
  2363. QuerysCollection = <
  2364. item
  2365. Query = ADQuery14
  2366. QueryCaption = #1057#1090#1088#1072#1093#1086#1074#1072#1085#1080#1077
  2367. MainQuery = True
  2368. KeyFieldName = 'ID'
  2369. FieldList = <
  2370. item
  2371. FieldName = 'STATUSNAME'
  2372. FieldCaption = #1057#1090#1072#1090#1091#1089
  2373. FieldType = ffString
  2374. DisplayName = 'STATUSNAME'
  2375. end
  2376. item
  2377. FieldName = 'DOCNUMB'
  2378. FieldCaption = #1053#1086#1084#1077#1088' '#1087#1086#1083#1080#1089#1072
  2379. FieldType = ffString
  2380. DisplayName = 'DOCNUMB'
  2381. end
  2382. item
  2383. FieldName = 'DELIVERYDATE'
  2384. FieldCaption = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
  2385. FieldType = ffDate
  2386. DisplayName = 'DELIVERYDATE'
  2387. end
  2388. item
  2389. FieldName = 'COMPANY'
  2390. FieldCaption = #1050#1086#1084#1087#1072#1085#1080#1103
  2391. FieldType = ffString
  2392. DisplayName = 'COMPANY'
  2393. end
  2394. item
  2395. FieldName = 'SERVICE'
  2396. FieldCaption = #1050#1072#1090'. '#1086#1073#1089#1083#1091#1078#1080#1074#1072#1085#1080#1103
  2397. FieldType = ffString
  2398. DisplayName = 'SERVICE'
  2399. end
  2400. item
  2401. FieldName = 'CHAGESTATUSDATE'
  2402. FieldCaption = #1044#1072#1090#1072' '#1089#1084#1077#1085#1099' '#1089#1090#1072#1090#1091#1089#1072
  2403. FieldType = ffDate
  2404. DisplayName = 'CHAGESTATUSDATE'
  2405. end
  2406. item
  2407. FieldName = 'DOCTYPE'
  2408. FieldCaption = #1058#1080#1087' '#1087#1086#1083#1080#1089#1072
  2409. FieldType = ffString
  2410. DisplayName = 'DOCTYPE'
  2411. end>
  2412. end>
  2413. DesignSize = (
  2414. 938
  2415. 27)
  2416. end
  2417. end
  2418. object VrDbGrid10: TVrDbGrid
  2419. AlignWithMargins = True
  2420. Left = 3
  2421. Top = 34
  2422. Width = 1090
  2423. Height = 235
  2424. Margins.Top = 0
  2425. ScrollBars = ssHorizontal
  2426. ShowCheckBoxes = True
  2427. CheckFieldName = 'ID'
  2428. CheckedRowsColoured = True
  2429. CheckedRowsColour = clYellow
  2430. MultiSelect = True
  2431. ColouredRows = True
  2432. CrmEvnColor = clInfoBk
  2433. CrmOddColor = clWindow
  2434. SortChangeEnable = True
  2435. Align = alClient
  2436. DataSource = DataSource14
  2437. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  2438. TabOrder = 1
  2439. TitleFont.Charset = DEFAULT_CHARSET
  2440. TitleFont.Color = clWindowText
  2441. TitleFont.Height = -11
  2442. TitleFont.Name = 'Tahoma'
  2443. TitleFont.Style = []
  2444. Columns = <
  2445. item
  2446. Expanded = False
  2447. FieldName = 'ID'
  2448. Visible = False
  2449. SortMode = smNone
  2450. end
  2451. item
  2452. Expanded = False
  2453. FieldName = 'CITEZENID'
  2454. Visible = False
  2455. SortMode = smNone
  2456. end
  2457. item
  2458. Expanded = False
  2459. FieldName = 'DOCTYPE'
  2460. Width = 117
  2461. Visible = True
  2462. SortMode = smNone
  2463. end
  2464. item
  2465. Expanded = False
  2466. FieldName = 'DOCNUMB'
  2467. Width = 144
  2468. Visible = True
  2469. SortMode = smNone
  2470. end
  2471. item
  2472. Expanded = False
  2473. FieldName = 'COMPANY'
  2474. Width = 197
  2475. Visible = True
  2476. SortMode = smNone
  2477. end
  2478. item
  2479. Expanded = False
  2480. FieldName = 'DELIVERYDATE'
  2481. Width = 97
  2482. Visible = True
  2483. SortMode = smNone
  2484. end
  2485. item
  2486. Expanded = False
  2487. FieldName = 'SERVICE'
  2488. Width = 116
  2489. Visible = True
  2490. SortMode = smNone
  2491. end
  2492. item
  2493. Expanded = False
  2494. FieldName = 'STATUSID'
  2495. Visible = False
  2496. SortMode = smNone
  2497. end
  2498. item
  2499. Expanded = False
  2500. FieldName = 'CHAGESTATUSDATE'
  2501. Width = 117
  2502. Visible = True
  2503. SortMode = smNone
  2504. end
  2505. item
  2506. Expanded = False
  2507. FieldName = 'STATUSNAME'
  2508. Visible = True
  2509. SortMode = smNone
  2510. end>
  2511. end
  2512. end
  2513. object TabSheet15: TTabSheet
  2514. Caption = #1053#1072#1083#1086#1075'. '#1080' '#1087#1077#1085#1089' '#1091#1095#1077#1090
  2515. ImageIndex = 5
  2516. object PKDBLabelEdit4: TPKDBLabelEdit
  2517. Left = 15
  2518. Top = 25
  2519. Width = 306
  2520. Height = 21
  2521. TabOrder = 0
  2522. Text = #1048#1053#1053
  2523. Table = PKDBTable2
  2524. TableField = 'TAXNUMB'
  2525. EditLabel.Width = 21
  2526. EditLabel.Height = 13
  2527. EditLabel.Caption = #1048#1053#1053
  2528. end
  2529. object PKDBLabelEdit5: TPKDBLabelEdit
  2530. Left = 15
  2531. Top = 70
  2532. Width = 306
  2533. Height = 21
  2534. TabOrder = 1
  2535. Text = #1053#1086#1084#1077#1088' C'#1053#1048#1051#1057
  2536. EditKind = ekNumberEdit
  2537. Table = PKDBTable3
  2538. TableField = 'DOCNUMB'
  2539. EditLabel.Width = 69
  2540. EditLabel.Height = 13
  2541. EditLabel.Caption = #1053#1086#1084#1077#1088' C'#1053#1048#1051#1057
  2542. end
  2543. object PKDBLabelEdit6: TPKDBLabelEdit
  2544. Left = 15
  2545. Top = 115
  2546. Width = 306
  2547. Height = 21
  2548. TabOrder = 2
  2549. Text = #1044#1072#1090#1072' '#1087#1086#1089#1090#1072#1085#1086#1074#1082#1080' '#1085#1072' '#1087#1077#1085#1089#1080#1086#1085#1085#1099#1081' '#1091#1095#1077#1090
  2550. EditKind = ekDateEdit
  2551. Table = PKDBTable3
  2552. TableField = 'REGDATE'
  2553. EditLabel.Width = 194
  2554. EditLabel.Height = 13
  2555. EditLabel.Caption = #1044#1072#1090#1072' '#1087#1086#1089#1090#1072#1085#1086#1074#1082#1080' '#1085#1072' '#1087#1077#1085#1089#1080#1086#1085#1085#1099#1081' '#1091#1095#1077#1090
  2556. end
  2557. object Button4: TButton
  2558. Left = 15
  2559. Top = 210
  2560. Width = 110
  2561. Height = 40
  2562. Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
  2563. TabOrder = 3
  2564. OnClick = Button4Click
  2565. end
  2566. object PKDBLabelEdit8: TPKDBLabelEdit
  2567. Left = 359
  2568. Top = 25
  2569. Width = 218
  2570. Height = 21
  2571. TabOrder = 4
  2572. Text = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1090#1088#1091#1076#1086#1074#1086#1075#1086' '#1089#1090#1072#1078#1072
  2573. EditKind = ekDateEdit
  2574. Table = PKDBTable3
  2575. TableField = 'STARTWORKDATE'
  2576. EditLabel.Width = 156
  2577. EditLabel.Height = 13
  2578. EditLabel.Caption = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1090#1088#1091#1076#1086#1074#1086#1075#1086' '#1089#1090#1072#1078#1072
  2579. end
  2580. object PKDBLabelEdit9: TPKDBLabelEdit
  2581. Left = 359
  2582. Top = 70
  2583. Width = 218
  2584. Height = 21
  2585. TabOrder = 5
  2586. Text = #1044#1072#1090#1072' '#1085#1077#1087#1088#1077#1088#1099#1074#1085#1086#1075#1086' '#1090#1088#1091#1076#1086#1074#1086#1075#1086' '#1089#1090#1072#1078#1072
  2587. EditKind = ekDateEdit
  2588. Table = PKDBTable3
  2589. TableField = 'TOTALWORKDATE'
  2590. EditLabel.Width = 193
  2591. EditLabel.Height = 13
  2592. EditLabel.Caption = #1044#1072#1090#1072' '#1085#1077#1087#1088#1077#1088#1099#1074#1085#1086#1075#1086' '#1090#1088#1091#1076#1086#1074#1086#1075#1086' '#1089#1090#1072#1078#1072
  2593. end
  2594. object GroupBox1: TGroupBox
  2595. Left = 583
  2596. Top = 3
  2597. Width = 257
  2598. Height = 266
  2599. Caption = ' '#1055#1077#1085#1089#1080#1103
  2600. TabOrder = 6
  2601. object PKDBLabelEdit10: TPKDBLabelEdit
  2602. Left = 24
  2603. Top = 35
  2604. Width = 209
  2605. Height = 21
  2606. TabOrder = 0
  2607. Text = #1044#1072#1090#1072' '#1085#1072#1079#1085#1072#1095#1077#1085#1080#1103' '#1087#1077#1085#1089#1080#1080
  2608. EditKind = ekDateEdit
  2609. Table = PKDBTable3
  2610. TableField = 'PENSIONDATE'
  2611. EditLabel.Width = 126
  2612. EditLabel.Height = 13
  2613. EditLabel.Caption = #1044#1072#1090#1072' '#1085#1072#1079#1085#1072#1095#1077#1085#1080#1103' '#1087#1077#1085#1089#1080#1080
  2614. end
  2615. object PKDBBLabelComboBox6: TPKDBBLabelComboBox
  2616. Left = 24
  2617. Top = 82
  2618. Width = 209
  2619. Height = 21
  2620. ItemHeight = 13
  2621. TabOrder = 1
  2622. Text = #1042#1080#1076' '#1087#1077#1085#1089#1080#1080
  2623. DBTable = 'HR_FACETCONTENT'
  2624. PrimaryKey = 'ID'
  2625. content = 'rowcontent'
  2626. constraint = ' facetid=2095'
  2627. Table = PKDBTable3
  2628. TableField = 'PENSIONTYPE'
  2629. EditLabel.Width = 57
  2630. EditLabel.Height = 13
  2631. EditLabel.Caption = #1042#1080#1076' '#1087#1077#1085#1089#1080#1080
  2632. end
  2633. object PKDBLabelEdit12: TPKDBLabelEdit
  2634. Left = 24
  2635. Top = 136
  2636. Width = 209
  2637. Height = 21
  2638. TabOrder = 2
  2639. Text = #1053#1086#1084#1077#1088' '#1087#1077#1085#1089#1080#1086#1085#1085#1086#1075#1086' '#1091#1076#1086#1089#1090#1086#1074#1077#1088#1077#1085#1080#1103
  2640. Table = PKDBTable3
  2641. TableField = 'PENSIONDOCNUMB'
  2642. EditLabel.Width = 179
  2643. EditLabel.Height = 13
  2644. EditLabel.Caption = #1053#1086#1084#1077#1088' '#1087#1077#1085#1089#1080#1086#1085#1085#1086#1075#1086' '#1091#1076#1086#1089#1090#1086#1074#1077#1088#1077#1085#1080#1103
  2645. end
  2646. object PKDBLabelEdit11: TPKDBLabelEdit
  2647. Left = 24
  2648. Top = 189
  2649. Width = 209
  2650. Height = 21
  2651. TabOrder = 3
  2652. Text = #1044#1072#1090#1072' '#1087#1077#1088#1077#1088#1072#1089#1095#1077#1090#1072' '#1087#1077#1085#1089#1080#1080
  2653. EditKind = ekDateEdit
  2654. Table = PKDBTable3
  2655. TableField = 'PENSIONRECOUNTDATE'
  2656. EditLabel.Width = 132
  2657. EditLabel.Height = 13
  2658. EditLabel.Caption = #1044#1072#1090#1072' '#1087#1077#1088#1077#1088#1072#1089#1095#1077#1090#1072' '#1087#1077#1085#1089#1080#1080
  2659. end
  2660. object PKDBBLabelComboBox9: TPKDBBLabelComboBox
  2661. Left = 25
  2662. Top = 235
  2663. Width = 208
  2664. Height = 21
  2665. Color = clWhite
  2666. ItemHeight = 13
  2667. TabOrder = 4
  2668. Text = #1053#1072#1079#1085#1072#1095#1077#1085#1080#1077' '#1087#1077#1085#1089#1080#1081' '#1087#1086' '#1089#1087#1080#1089#1082#1091' '
  2669. DBTable = 'hr_FACETCONTENT'
  2670. PrimaryKey = 'ID'
  2671. content = 'rowcontent'
  2672. constraint = ' facetid=1837738'
  2673. Table = PKDBTable3
  2674. TableField = 'PENSIONLIST'
  2675. EditLabel.Width = 153
  2676. EditLabel.Height = 13
  2677. EditLabel.Caption = #1053#1072#1079#1085#1072#1095#1077#1085#1080#1077' '#1087#1077#1085#1089#1080#1081' '#1087#1086' '#1089#1087#1080#1089#1082#1091' '
  2678. end
  2679. end
  2680. object PKDBLabelEdit13: TPKDBLabelEdit
  2681. Left = 15
  2682. Top = 160
  2683. Width = 306
  2684. Height = 21
  2685. TabOrder = 7
  2686. Text = #1053#1086#1084#1077#1088' '#1090#1088#1091#1076#1086#1074#1086#1081' '#1082#1085#1080#1078#1082#1080
  2687. Table = PKDBTable4
  2688. TableField = 'BOOKNUMB'
  2689. EditLabel.Width = 124
  2690. EditLabel.Height = 13
  2691. EditLabel.Caption = #1053#1086#1084#1077#1088' '#1090#1088#1091#1076#1086#1074#1086#1081' '#1082#1085#1080#1078#1082#1080
  2692. end
  2693. object GroupBox2: TGroupBox
  2694. Left = 359
  2695. Top = 112
  2696. Width = 218
  2697. Height = 157
  2698. Caption = ' '#1056#1072#1089#1095#1077#1090' '#1089#1090#1072#1078#1072' '#1076#1083#1103' '#1073#1086#1083#1100#1085#1080#1095#1085#1099#1093' '
  2699. TabOrder = 8
  2700. object Label1: TLabel
  2701. Left = 35
  2702. Top = 23
  2703. Width = 152
  2704. Height = 13
  2705. Caption = #1044#1072#1090#1072' '#1074#1099#1093#1086#1076#1072' '#1085#1072' '#1073#1086#1083#1100#1085#1080#1095#1085#1099#1081':'
  2706. end
  2707. object Button5: TButton
  2708. Left = 39
  2709. Top = 101
  2710. Width = 146
  2711. Height = 40
  2712. Caption = ' '#1056#1072#1089#1095#1080#1090#1072#1090#1100' '#1089#1090#1072#1078
  2713. TabOrder = 0
  2714. WordWrap = True
  2715. OnClick = Button5Click
  2716. end
  2717. object MaskEdit1: TMaskEdit
  2718. Left = 40
  2719. Top = 50
  2720. Width = 145
  2721. Height = 21
  2722. EditMask = '!99/99/0000;1;_'
  2723. MaxLength = 10
  2724. TabOrder = 1
  2725. Text = ' . . '
  2726. end
  2727. end
  2728. object PKDBBLabelComboBox7: TPKDBBLabelComboBox
  2729. Left = 867
  2730. Top = 25
  2731. Width = 198
  2732. Height = 21
  2733. ItemHeight = 13
  2734. TabOrder = 9
  2735. Text = #1043#1088#1091#1087#1087#1072' '#1080#1085#1074#1072#1083#1080#1076#1085#1086#1089#1090#1080
  2736. DBTable = 'HR_FACETCONTENT'
  2737. PrimaryKey = 'ID'
  2738. content = 'rowcontent'
  2739. constraint = ' facetid=2097'
  2740. Table = PKDBTable3
  2741. TableField = 'invalidgroup'
  2742. EditLabel.Width = 111
  2743. EditLabel.Height = 13
  2744. EditLabel.Caption = #1043#1088#1091#1087#1087#1072' '#1080#1085#1074#1072#1083#1080#1076#1085#1086#1089#1090#1080
  2745. end
  2746. end
  2747. object TabSheet16: TTabSheet
  2748. Caption = #1056#1086#1076#1089#1090#1074#1077#1085#1085#1080#1082#1080
  2749. ImageIndex = 6
  2750. object GridPanel13: TGridPanel
  2751. AlignWithMargins = True
  2752. Left = 3
  2753. Top = 3
  2754. Width = 1090
  2755. Height = 28
  2756. Align = alTop
  2757. BevelOuter = bvNone
  2758. ColumnCollection = <
  2759. item
  2760. SizeStyle = ssAbsolute
  2761. Value = 152.000000000000000000
  2762. end
  2763. item
  2764. Value = 100.000000000000000000
  2765. end>
  2766. ControlCollection = <
  2767. item
  2768. Column = -1
  2769. Row = -1
  2770. end
  2771. item
  2772. Column = 0
  2773. Control = PKDBEditButtons13
  2774. Row = 0
  2775. end
  2776. item
  2777. Column = 1
  2778. Control = PKDBFindPanel13
  2779. Row = 0
  2780. end>
  2781. RowCollection = <
  2782. item
  2783. Value = 100.000000000000000000
  2784. end>
  2785. TabOrder = 0
  2786. object PKDBEditButtons13: TPKDBEditButtons
  2787. Left = 0
  2788. Top = 0
  2789. Width = 150
  2790. Height = 28
  2791. TableName = 'HR_FAMILY'
  2792. PrimaryFieldName = 'ID'
  2793. ParentFieldName = 'ID'
  2794. Grid = VrDbGrid12
  2795. Connection = DataModule1.ADConnection1
  2796. UseTempTable = False
  2797. EditDialogClassName = 'TFAMILYEDIT'
  2798. DesignSize = (
  2799. 150
  2800. 28)
  2801. end
  2802. object PKDBFindPanel13: TPKDBFindPanel
  2803. Left = 152
  2804. Top = 0
  2805. Width = 938
  2806. Height = 27
  2807. QuerysCollection = <
  2808. item
  2809. Query = ADQuery7
  2810. MainQuery = True
  2811. KeyFieldName = 'ID'
  2812. FieldList = <
  2813. item
  2814. FieldName = 'BIRTHDATE'
  2815. FieldCaption = #1044#1072#1090#1072' '#1088#1086#1078#1076#1077#1085#1080#1103
  2816. FieldType = ffDate
  2817. DisplayName = 'BIRTHDATE'
  2818. end
  2819. item
  2820. FieldName = 'BIRTHPLACE'
  2821. FieldCaption = #1052#1077#1089#1090#1086' '#1088#1086#1078#1076#1077#1085#1080#1103
  2822. FieldType = ffString
  2823. DisplayName = 'BIRTHPLACE'
  2824. end
  2825. item
  2826. FieldName = 'STEP'
  2827. FieldCaption = #1057#1090#1077#1087#1077#1100' '#1088#1086#1076#1089#1090#1074#1072
  2828. FieldType = ffString
  2829. DisplayName = 'STEP'
  2830. end
  2831. item
  2832. FieldName = 'LASTNAME'
  2833. FieldCaption = #1060#1072#1084#1080#1083#1080#1103
  2834. FieldType = ffString
  2835. DisplayName = 'LASTNAME'
  2836. end
  2837. item
  2838. FieldName = 'NAME'
  2839. FieldCaption = #1048#1084#1103
  2840. FieldType = ffString
  2841. DisplayName = 'NAME'
  2842. end
  2843. item
  2844. FieldName = 'FATHERSHIP'
  2845. FieldCaption = #1054#1090#1095#1077#1089#1090#1074#1086
  2846. FieldType = ffString
  2847. DisplayName = 'FATHERSHIP'
  2848. end>
  2849. end>
  2850. DesignSize = (
  2851. 938
  2852. 27)
  2853. end
  2854. end
  2855. object VrDbGrid12: TVrDbGrid
  2856. AlignWithMargins = True
  2857. Left = 3
  2858. Top = 34
  2859. Width = 1090
  2860. Height = 235
  2861. Margins.Top = 0
  2862. ScrollBars = ssHorizontal
  2863. ShowCheckBoxes = True
  2864. CheckFieldName = 'ID'
  2865. CheckedRowsColoured = True
  2866. CheckedRowsColour = clYellow
  2867. MultiSelect = True
  2868. ColouredRows = True
  2869. CrmEvnColor = clInfoBk
  2870. CrmOddColor = clWindow
  2871. SortChangeEnable = True
  2872. Align = alClient
  2873. DataSource = DataSource11
  2874. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  2875. TabOrder = 1
  2876. TitleFont.Charset = DEFAULT_CHARSET
  2877. TitleFont.Color = clWindowText
  2878. TitleFont.Height = -11
  2879. TitleFont.Name = 'Tahoma'
  2880. TitleFont.Style = []
  2881. Columns = <
  2882. item
  2883. Expanded = False
  2884. FieldName = 'STEP'
  2885. Width = 100
  2886. Visible = True
  2887. SortMode = smNone
  2888. end
  2889. item
  2890. Expanded = False
  2891. FieldName = 'LASTNAME'
  2892. Width = 100
  2893. Visible = True
  2894. SortMode = smNone
  2895. end
  2896. item
  2897. Expanded = False
  2898. FieldName = 'NAME'
  2899. Width = 100
  2900. Visible = True
  2901. SortMode = smNone
  2902. end
  2903. item
  2904. Expanded = False
  2905. FieldName = 'FATHERSHIP'
  2906. Width = 100
  2907. Visible = True
  2908. SortMode = smNone
  2909. end
  2910. item
  2911. Expanded = False
  2912. FieldName = 'CITEZENID'
  2913. Visible = False
  2914. SortMode = smNone
  2915. end
  2916. item
  2917. Expanded = False
  2918. FieldName = 'BIRTHDATE'
  2919. Width = 3000
  2920. Visible = True
  2921. SortMode = smNone
  2922. end
  2923. item
  2924. Expanded = False
  2925. FieldName = 'BIRTHPLACE'
  2926. Visible = False
  2927. SortMode = smNone
  2928. end
  2929. item
  2930. Expanded = False
  2931. FieldName = 'ID'
  2932. Visible = False
  2933. SortMode = smNone
  2934. end
  2935. item
  2936. Expanded = False
  2937. Visible = True
  2938. SortMode = smNone
  2939. end>
  2940. end
  2941. end
  2942. object TabSheet19: TTabSheet
  2943. Caption = #1048#1089#1090#1086#1088#1080#1103' '#1088#1072#1073'.'
  2944. ImageIndex = 9
  2945. object GridPanel15: TGridPanel
  2946. AlignWithMargins = True
  2947. Left = 3
  2948. Top = 3
  2949. Width = 1090
  2950. Height = 28
  2951. Align = alTop
  2952. BevelOuter = bvNone
  2953. ColumnCollection = <
  2954. item
  2955. SizeStyle = ssAbsolute
  2956. Value = 152.000000000000000000
  2957. end
  2958. item
  2959. Value = 100.000000000000000000
  2960. end>
  2961. ControlCollection = <
  2962. item
  2963. Column = -1
  2964. Row = -1
  2965. end
  2966. item
  2967. Column = 0
  2968. Control = PKDBEditButtons15
  2969. Row = 0
  2970. end
  2971. item
  2972. Column = 1
  2973. Control = PKDBFindPanel15
  2974. Row = 0
  2975. end>
  2976. RowCollection = <
  2977. item
  2978. Value = 100.000000000000000000
  2979. end>
  2980. TabOrder = 0
  2981. object PKDBEditButtons15: TPKDBEditButtons
  2982. Left = 0
  2983. Top = 0
  2984. Width = 150
  2985. Height = 28
  2986. TableName = 'HR_EMPLOYEE'
  2987. PrimaryFieldName = 'ID'
  2988. ParentFieldName = 'ID'
  2989. Grid = VrDbGrid14
  2990. Connection = DataModule1.ADConnection1
  2991. UseTempTable = False
  2992. EditDialogClassName = 'TJOBHISTORYEDIT'
  2993. DesignSize = (
  2994. 150
  2995. 28)
  2996. end
  2997. object PKDBFindPanel15: TPKDBFindPanel
  2998. Left = 152
  2999. Top = 0
  3000. Width = 938
  3001. Height = 27
  3002. QuerysCollection = <
  3003. item
  3004. Query = ADQuery7
  3005. MainQuery = True
  3006. KeyFieldName = 'ID'
  3007. FieldList = <
  3008. item
  3009. FieldName = 'BIRTHDATE'
  3010. FieldCaption = #1044#1072#1090#1072' '#1088#1086#1078#1076#1077#1085#1080#1103
  3011. FieldType = ffDate
  3012. DisplayName = 'BIRTHDATE'
  3013. end
  3014. item
  3015. FieldName = 'BIRTHPLACE'
  3016. FieldCaption = #1052#1077#1089#1090#1086' '#1088#1086#1078#1076#1077#1085#1080#1103
  3017. FieldType = ffString
  3018. DisplayName = 'BIRTHPLACE'
  3019. end
  3020. item
  3021. FieldName = 'STEP'
  3022. FieldCaption = #1057#1090#1077#1087#1077#1100' '#1088#1086#1076#1089#1090#1074#1072
  3023. FieldType = ffString
  3024. DisplayName = 'STEP'
  3025. end
  3026. item
  3027. FieldName = 'LASTNAME'
  3028. FieldCaption = #1060#1072#1084#1080#1083#1080#1103
  3029. FieldType = ffString
  3030. DisplayName = 'LASTNAME'
  3031. end
  3032. item
  3033. FieldName = 'NAME'
  3034. FieldCaption = #1048#1084#1103
  3035. FieldType = ffString
  3036. DisplayName = 'NAME'
  3037. end
  3038. item
  3039. FieldName = 'FATHERSHIP'
  3040. FieldCaption = #1054#1090#1095#1077#1089#1090#1074#1086
  3041. FieldType = ffString
  3042. DisplayName = 'FATHERSHIP'
  3043. end>
  3044. end>
  3045. DesignSize = (
  3046. 938
  3047. 27)
  3048. end
  3049. end
  3050. object VrDbGrid14: TVrDbGrid
  3051. AlignWithMargins = True
  3052. Left = 3
  3053. Top = 34
  3054. Width = 1090
  3055. Height = 235
  3056. Margins.Top = 0
  3057. ScrollBars = ssHorizontal
  3058. ShowCheckBoxes = True
  3059. CheckFieldName = 'ID'
  3060. CheckedRowsColoured = True
  3061. CheckedRowsColour = clYellow
  3062. MultiSelect = True
  3063. ColouredRows = True
  3064. CrmEvnColor = clInfoBk
  3065. CrmOddColor = clWindow
  3066. SortChangeEnable = True
  3067. Align = alClient
  3068. DataSource = DataSource9
  3069. Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
  3070. TabOrder = 1
  3071. TitleFont.Charset = DEFAULT_CHARSET
  3072. TitleFont.Color = clWindowText
  3073. TitleFont.Height = -11
  3074. TitleFont.Name = 'Tahoma'
  3075. TitleFont.Style = []
  3076. Columns = <
  3077. item
  3078. Expanded = False
  3079. FieldName = 'CITEZENID'
  3080. Visible = False
  3081. SortMode = smNone
  3082. end
  3083. item
  3084. Expanded = False
  3085. FieldName = 'INDATE'
  3086. Width = 72
  3087. Visible = True
  3088. SortMode = smNone
  3089. end
  3090. item
  3091. Expanded = False
  3092. FieldName = 'OUTDATE'
  3093. Width = 66
  3094. Visible = True
  3095. SortMode = smNone
  3096. end
  3097. item
  3098. Expanded = False
  3099. FieldName = 'DEPT_NO'
  3100. Width = 48
  3101. Visible = True
  3102. SortMode = smNone
  3103. end
  3104. item
  3105. Expanded = False
  3106. FieldName = 'JOBTITLE'
  3107. Width = 329
  3108. Visible = True
  3109. SortMode = smNone
  3110. end
  3111. item
  3112. Expanded = False
  3113. FieldName = 'SUMSAL'
  3114. Visible = True
  3115. SortMode = smNone
  3116. end
  3117. item
  3118. Expanded = False
  3119. FieldName = 'AGREEMENTNUMB'
  3120. Width = 79
  3121. Visible = True
  3122. SortMode = smNone
  3123. end
  3124. item
  3125. Expanded = False
  3126. FieldName = 'AGREEMENTDATE'
  3127. Visible = True
  3128. SortMode = smNone
  3129. end
  3130. item
  3131. Expanded = False
  3132. FieldName = 'REASON'
  3133. Width = 1000
  3134. Visible = True
  3135. SortMode = smNone
  3136. end
  3137. item
  3138. Expanded = False
  3139. FieldName = 'ID'
  3140. Visible = False
  3141. SortMode = smNone
  3142. end>
  3143. end
  3144. end
  3145. object TabSheet12: TTabSheet
  3146. Caption = #1044#1086#1087'. '#1089#1074#1077#1076#1077#1085#1080#1103
  3147. ImageIndex = 15
  3148. object PKDBBLabelComboBox8: TPKDBBLabelComboBox
  3149. Left = 17
  3150. Top = 25
  3151. Width = 216
  3152. Height = 21
  3153. ItemHeight = 13
  3154. TabOrder = 0
  3155. Text = #1042#1088#1077#1076#1085#1086#1089#1090#1100' '#1091#1089#1083#1086#1074#1080#1081' '#1090#1088#1091#1076#1072
  3156. DBTable = 'CS_FACETCONTENT'
  3157. PrimaryKey = 'ID'
  3158. content = ' rowcontent'
  3159. constraint = ' facetid=102'
  3160. Table = PKDBTable5
  3161. TableField = 'HARMCONDITIONID'
  3162. EditLabel.Width = 132
  3163. EditLabel.Height = 13
  3164. EditLabel.Caption = #1042#1088#1077#1076#1085#1086#1089#1090#1100' '#1091#1089#1083#1086#1074#1080#1081' '#1090#1088#1091#1076#1072
  3165. end
  3166. object PKDBLabelEdit15: TPKDBLabelEdit
  3167. Left = 264
  3168. Top = 25
  3169. Width = 185
  3170. Height = 21
  3171. TabOrder = 1
  3172. Text = #1044#1086#1087#1086#1083#1085#1080#1090#1077#1083#1100#1085#1099#1077' '#1076#1085#1080' '#1086#1090#1087#1091#1089#1082#1072
  3173. Table = PKDBTable5
  3174. TableField = 'HARMHOLIDAYS'
  3175. EditLabel.Width = 154
  3176. EditLabel.Height = 13
  3177. EditLabel.Caption = #1044#1086#1087#1086#1083#1085#1080#1090#1077#1083#1100#1085#1099#1077' '#1076#1085#1080' '#1086#1090#1087#1091#1089#1082#1072
  3178. end
  3179. object PKDBLabelEdit16: TPKDBLabelEdit
  3180. Left = 17
  3181. Top = 70
  3182. Width = 216
  3183. Height = 21
  3184. Enabled = False
  3185. TabOrder = 2
  3186. Text = #1055#1088#1086#1076#1086#1083#1078#1080#1090#1077#1083#1100#1085#1086#1089#1090#1100' '#1088#1072#1073#1086#1095#1077#1075#1086' '#1074#1088#1077#1084#1077#1085#1080
  3187. Table = PKDBTable5
  3188. TableField = 'WORKTIME'
  3189. EditLabel.Width = 200
  3190. EditLabel.Height = 13
  3191. EditLabel.Caption = #1055#1088#1086#1076#1086#1083#1078#1080#1090#1077#1083#1100#1085#1086#1089#1090#1100' '#1088#1072#1073#1086#1095#1077#1075#1086' '#1074#1088#1077#1084#1077#1085#1080
  3192. end
  3193. object PKDBBLabelComboBox10: TPKDBBLabelComboBox
  3194. Left = 17
  3195. Top = 115
  3196. Width = 216
  3197. Height = 21
  3198. ItemHeight = 13
  3199. TabOrder = 3
  3200. Text = #1056#1072#1073#1086#1095#1077#1077' '#1074#1088#1077#1084#1103
  3201. DBTable = 'CS_FACETCONTENT'
  3202. PrimaryKey = 'ID'
  3203. content = ' rowcontent'
  3204. constraint = ' facetid=103'
  3205. Table = PKDBTable5
  3206. TableField = 'WORKTIMETYPEID'
  3207. EditLabel.Width = 75
  3208. EditLabel.Height = 13
  3209. EditLabel.Caption = #1056#1072#1073#1086#1095#1077#1077' '#1074#1088#1077#1084#1103
  3210. end
  3211. object Button6: TButton
  3212. Left = 71
  3213. Top = 186
  3214. Width = 110
  3215. Height = 40
  3216. Caption = #1057#1086#1093#1088#1072#1085#1080#1090#1100
  3217. TabOrder = 4
  3218. OnClick = Button6Click
  3219. end
  3220. end
  3221. end
  3222. end
  3223. inherited PageControl1: TPageControl
  3224. Width = 1104
  3225. Height = 320
  3226. ExplicitWidth = 1104
  3227. ExplicitHeight = 320
  3228. inherited TabSheet1: TTabSheet
  3229. Caption = #1057#1086#1074#1084#1077#1089#1090#1080#1090#1077#1083#1080
  3230. ExplicitWidth = 1096
  3231. ExplicitHeight = 292
  3232. inherited Grid: TVrDbGrid
  3233. Width = 1090
  3234. Height = 255
  3235. CheckFieldName = 'ID'
  3236. ColouredRows = True
  3237. PopupMenu = PopupMenu1
  3238. OnCellClick = GridCellClick
  3239. OnKeyDown = GridKeyDown
  3240. OnKeyUp = GridKeyUp
  3241. Columns = <
  3242. item
  3243. Expanded = False
  3244. FieldName = 'DCODE'
  3245. Width = 35
  3246. Visible = True
  3247. SortMode = smNone
  3248. end
  3249. item
  3250. Expanded = False
  3251. FieldName = 'TABNUMB'
  3252. Width = 41
  3253. Visible = True
  3254. SortMode = smNone
  3255. end
  3256. item
  3257. Expanded = False
  3258. FieldName = 'LASTNAME'
  3259. Width = 100
  3260. Visible = True
  3261. SortMode = smNone
  3262. end
  3263. item
  3264. Expanded = False
  3265. FieldName = 'NAME'
  3266. Width = 81
  3267. Visible = True
  3268. SortMode = smNone
  3269. end
  3270. item
  3271. Expanded = False
  3272. FieldName = 'FATHERSHIP'
  3273. Width = 87
  3274. Visible = True
  3275. SortMode = smNone
  3276. end
  3277. item
  3278. Expanded = False
  3279. FieldName = 'JOBTITLE'
  3280. Width = 303
  3281. Visible = True
  3282. SortMode = smNone
  3283. end
  3284. item
  3285. Expanded = False
  3286. FieldName = 'QUALIFICATION'
  3287. Visible = False
  3288. SortMode = smNone
  3289. end
  3290. item
  3291. Expanded = False
  3292. FieldName = 'WORKUNITTYPEROW'
  3293. Width = 140
  3294. Visible = True
  3295. SortMode = smNone
  3296. end
  3297. item
  3298. Expanded = False
  3299. FieldName = 'CATEGORYNUMB'
  3300. Visible = False
  3301. SortMode = smNone
  3302. end
  3303. item
  3304. Expanded = False
  3305. FieldName = 'BIRTHDATE'
  3306. Width = 71
  3307. Visible = True
  3308. SortMode = smNone
  3309. end
  3310. item
  3311. Expanded = False
  3312. FieldName = 'AMOUNT'
  3313. Visible = False
  3314. SortMode = smNone
  3315. end
  3316. item
  3317. Expanded = False
  3318. FieldName = 'SALARY'
  3319. Visible = False
  3320. SortMode = smNone
  3321. end
  3322. item
  3323. Expanded = False
  3324. FieldName = 'STATUS'
  3325. Visible = False
  3326. SortMode = smNone
  3327. end
  3328. item
  3329. Expanded = False
  3330. FieldName = 'CONTRACT'
  3331. Visible = False
  3332. SortMode = smNone
  3333. end
  3334. item
  3335. Expanded = False
  3336. FieldName = 'CONDITION'
  3337. Visible = False
  3338. SortMode = smNone
  3339. end
  3340. item
  3341. Expanded = False
  3342. FieldName = 'WORKTYPE'
  3343. Visible = False
  3344. SortMode = smNone
  3345. end
  3346. item
  3347. Expanded = False
  3348. FieldName = 'RATECODE'
  3349. Visible = False
  3350. SortMode = smNone
  3351. end
  3352. item
  3353. Expanded = False
  3354. FieldName = 'AGREEMENTNUMB'
  3355. Width = 106
  3356. Visible = True
  3357. SortMode = smNone
  3358. end
  3359. item
  3360. Expanded = False
  3361. FieldName = 'AGREEMENTDATE'
  3362. Width = 108
  3363. Visible = True
  3364. SortMode = smNone
  3365. end
  3366. item
  3367. Expanded = False
  3368. FieldName = 'FIRSTINDATE'
  3369. Width = 81
  3370. Visible = True
  3371. SortMode = smNone
  3372. end
  3373. item
  3374. Expanded = False
  3375. FieldName = 'INDATE'
  3376. Width = 80
  3377. Visible = True
  3378. SortMode = smNone
  3379. end
  3380. item
  3381. Expanded = False
  3382. FieldName = 'PASSPORTSERIES'
  3383. Width = 36
  3384. Visible = True
  3385. SortMode = smNone
  3386. end
  3387. item
  3388. Expanded = False
  3389. FieldName = 'EDUCATION'
  3390. Width = 86
  3391. Visible = True
  3392. SortMode = smNone
  3393. end
  3394. item
  3395. Expanded = False
  3396. FieldName = 'PASSPORTNUMB'
  3397. Width = 69
  3398. Visible = True
  3399. SortMode = smNone
  3400. end
  3401. item
  3402. Expanded = False
  3403. FieldName = 'PASSINST'
  3404. Visible = True
  3405. SortMode = smNone
  3406. end
  3407. item
  3408. Expanded = False
  3409. FieldName = 'ADRESS'
  3410. Visible = True
  3411. SortMode = smNone
  3412. end>
  3413. end
  3414. inherited GridPanel1: TGridPanel
  3415. Width = 1090
  3416. ExplicitWidth = 1090
  3417. inherited PKDBEditButtons1: TPKDBEditButtons
  3418. TableName = 'HR_EMPLOYEE'
  3419. PrimaryFieldName = 'ID'
  3420. ParentFieldName = 'citezenid'
  3421. Grid = Grid
  3422. Connection = DataModule1.ADConnection1
  3423. EditDialogClassName = 'TEMPLOYEEDIT'
  3424. OnBeforeOpenNewClick = PKDBEditButtons1BeforeOpenNewClick
  3425. end
  3426. inherited PKDBFindPanel1: TPKDBFindPanel
  3427. Width = 938
  3428. QuerysCollection = <
  3429. item
  3430. Query = MainQuery
  3431. QueryCaption = #1057#1086#1090#1088#1091#1076#1085#1080#1082#1080
  3432. MainQuery = True
  3433. FieldList = <
  3434. item
  3435. FieldName = 'LASTNAME'
  3436. FieldCaption = #1060#1072#1084#1080#1083#1080#1103
  3437. FieldType = ffString
  3438. DisplayName = 'LASTNAME'
  3439. end
  3440. item
  3441. FieldName = 'NAME'
  3442. FieldCaption = #1048#1084#1103
  3443. FieldType = ffString
  3444. DisplayName = 'NAME'
  3445. end
  3446. item
  3447. FieldName = 'FATHERSHIP'
  3448. FieldCaption = #1054#1090#1095#1077#1089#1090#1074#1086
  3449. FieldType = ffString
  3450. DisplayName = 'FATHERSHIP'
  3451. end
  3452. item
  3453. FieldName = 'JOBTITLE'
  3454. FieldCaption = #1044#1086#1083#1078#1085#1086#1089#1090#1100
  3455. FieldType = ffString
  3456. DisplayName = 'JOBTITLE'
  3457. end
  3458. item
  3459. FieldName = 'QUALIFICATION'
  3460. FieldCaption = #1050#1074#1072#1083#1080#1092'.'
  3461. FieldType = ffString
  3462. DisplayName = 'QUALIFICATION'
  3463. end
  3464. item
  3465. FieldName = 'CATEGORYNUMB'
  3466. FieldCaption = #1050#1072#1090#1077#1075'.'
  3467. FieldType = ffNumber
  3468. DisplayName = 'CATEGORYNUMB'
  3469. end
  3470. item
  3471. FieldName = 'STATUS'
  3472. FieldCaption = #1057#1090#1072#1090#1091#1089
  3473. FieldType = ffNumber
  3474. DisplayName = 'STATUS'
  3475. end
  3476. item
  3477. FieldName = 'AMOUNT'
  3478. FieldCaption = #1050#1086#1083'-'#1074#1086'.'
  3479. FieldType = ffNumber
  3480. DisplayName = 'AMOUNT'
  3481. end
  3482. item
  3483. FieldName = 'SALARY'
  3484. FieldCaption = #1054#1082#1083#1072#1076'('#1057#1090#1072#1074#1082#1072')'
  3485. FieldType = ffNumber
  3486. DisplayName = 'SALARY'
  3487. end
  3488. item
  3489. FieldName = 'DCODE'
  3490. FieldCaption = #1055#1086#1076#1088'.'
  3491. FieldType = ffString
  3492. DisplayName = 'DCODE'
  3493. end
  3494. item
  3495. FieldName = 'CONTRACT'
  3496. FieldCaption = #1050#1086#1085#1090#1088#1072#1082#1090
  3497. FieldType = ffString
  3498. DisplayName = 'CONTRACT'
  3499. end
  3500. item
  3501. FieldName = 'CODE'
  3502. FieldCaption = #1054#1090#1076#1077#1083
  3503. FieldType = ffString
  3504. DisplayName = 'CODE'
  3505. end
  3506. item
  3507. FieldName = 'CONDITION'
  3508. FieldCaption = #1059#1089#1083#1086#1074#1080#1103' '#1090#1088#1091#1076#1072
  3509. FieldType = ffString
  3510. DisplayName = 'CONDITION'
  3511. end
  3512. item
  3513. FieldName = 'WORKTYPE'
  3514. FieldCaption = #1058#1080#1087' '#1088#1072#1073#1086#1090#1099
  3515. FieldType = ffString
  3516. DisplayName = 'WORKTYPE'
  3517. end
  3518. item
  3519. FieldName = 'RATECODE'
  3520. FieldCaption = #1057#1090#1072#1074#1082#1072
  3521. FieldType = ffString
  3522. DisplayName = 'RATECODE'
  3523. end
  3524. item
  3525. FieldName = 'AGREEMENTNUMB'
  3526. FieldCaption = #8470' '#1058#1088#1091#1076#1086#1074#1086#1075#1086' '#1076#1086#1075#1086#1074#1086#1088#1072
  3527. FieldType = ffString
  3528. DisplayName = 'AGREEMENTNUMB'
  3529. end
  3530. item
  3531. FieldName = 'AGREEMENTDATE'
  3532. FieldCaption = #1044#1072#1090#1072' '#1090#1088#1091#1076#1086#1074#1086#1075#1086' '#1076#1086#1075#1086#1074#1086#1088#1072
  3533. FieldType = ffDate
  3534. DisplayName = 'AGREEMENTDATE'
  3535. end
  3536. item
  3537. FieldName = 'EDUCATION'
  3538. FieldCaption = #1054#1073#1088#1072#1079#1086#1074#1072#1085#1080#1077
  3539. FieldType = ffString
  3540. DisplayName = 'EDUCATION'
  3541. end>
  3542. end>
  3543. ExplicitWidth = 938
  3544. DesignSize = (
  3545. 938
  3546. 27)
  3547. end
  3548. end
  3549. end
  3550. end
  3551. end
  3552. end
  3553. inherited Panel6: TPanel
  3554. Width = 33
  3555. Height = 620
  3556. Visible = False
  3557. ExplicitWidth = 33
  3558. ExplicitHeight = 620
  3559. end
  3560. inherited MainQuery: TADQuery
  3561. Connection = DataModule1.ADConnection1
  3562. SQL.Strings = (
  3563. 'select * from hr_v_empcitezen t'
  3564. 'where '
  3565. '(t.statusid <> 1806639) -- '#1090#1086#1083#1100#1082#1086' '#1072#1082#1090#1080#1074#1085#1099#1077
  3566. 'and ((t.workunittype=3009017) or (t.workunittype=3009018))'
  3567. ' -- '#1090#1086#1083#1100#1082#1086' '#1089#1086#1074#1084#1077#1089#1090#1080#1090#1077#1083#1080' '#1080' '#1089#1086#1074#1084#1077#1097#1077#1085#1080#1103' ')
  3568. Top = 0
  3569. object MainQueryID: TFMTBCDField
  3570. FieldName = 'ID'
  3571. end
  3572. object MainQueryCITEZENID: TFMTBCDField
  3573. FieldName = 'CITEZENID'
  3574. end
  3575. object MainQuerySTRUCTUREID: TFMTBCDField
  3576. FieldName = 'STRUCTUREID'
  3577. end
  3578. object MainQueryLASTNAME: TStringField
  3579. DisplayLabel = #1060#1072#1084#1080#1083#1080#1103
  3580. FieldName = 'LASTNAME'
  3581. Size = 200
  3582. end
  3583. object MainQueryNAME: TStringField
  3584. DisplayLabel = #1048#1084#1103
  3585. FieldName = 'NAME'
  3586. Size = 200
  3587. end
  3588. object MainQueryFATHERSHIP: TStringField
  3589. DisplayLabel = #1054#1090#1095#1077#1089#1090#1074#1086
  3590. FieldName = 'FATHERSHIP'
  3591. Size = 200
  3592. end
  3593. object MainQueryJOBTITLE: TStringField
  3594. DisplayLabel = #1044#1086#1083#1078#1085#1086#1089#1090#1100
  3595. FieldName = 'JOBTITLE'
  3596. Size = 200
  3597. end
  3598. object MainQueryQUALIFICATION: TStringField
  3599. DisplayLabel = #1050#1074#1072#1083#1080#1092'.'
  3600. FieldName = 'QUALIFICATION'
  3601. Size = 241
  3602. end
  3603. object MainQueryCATEGORYNUMB: TFMTBCDField
  3604. DisplayLabel = #1050#1072#1090#1077#1075'.'
  3605. FieldName = 'CATEGORYNUMB'
  3606. end
  3607. object MainQueryAMOUNT: TFMTBCDField
  3608. DisplayLabel = #1050#1086#1083'-'#1074#1086'.'
  3609. FieldName = 'AMOUNT'
  3610. end
  3611. object MainQuerySALARY: TFMTBCDField
  3612. DisplayLabel = #1054#1082#1083#1072#1076'('#1057#1090#1072#1074#1082#1072')'
  3613. FieldName = 'SALARY'
  3614. end
  3615. object MainQueryDCODE: TStringField
  3616. DisplayLabel = #1055#1086#1076#1088'.'
  3617. FieldName = 'DCODE'
  3618. Size = 200
  3619. end
  3620. object MainQueryCONTRACT: TStringField
  3621. DisplayLabel = #1050#1086#1085#1090#1088#1072#1082#1090
  3622. FieldName = 'CONTRACT'
  3623. Size = 200
  3624. end
  3625. object MainQueryCODE: TStringField
  3626. DisplayLabel = #1054#1090#1076#1077#1083
  3627. FieldName = 'CODE'
  3628. Size = 200
  3629. end
  3630. object MainQueryCONDITION: TStringField
  3631. DisplayLabel = #1059#1089#1083#1086#1074#1080#1103' '#1090#1088#1091#1076#1072
  3632. FieldName = 'CONDITION'
  3633. Size = 200
  3634. end
  3635. object MainQueryWORKTYPE: TStringField
  3636. DisplayLabel = #1058#1080#1087' '#1088#1072#1073#1086#1090#1099
  3637. FieldName = 'WORKTYPE'
  3638. Size = 200
  3639. end
  3640. object MainQueryRATECODE: TStringField
  3641. DisplayLabel = #1057#1090#1072#1074#1082#1072
  3642. FieldName = 'RATECODE'
  3643. Size = 200
  3644. end
  3645. object MainQueryAGREEMENTNUMB: TStringField
  3646. DisplayLabel = #8470' '#1058#1088#1091#1076'. '#1076#1086#1075#1086#1074#1086#1088#1072
  3647. FieldName = 'AGREEMENTNUMB'
  3648. Size = 200
  3649. end
  3650. object MainQueryAGREEMENTDATE: TDateTimeField
  3651. DisplayLabel = #1044#1072#1090#1072' '#1090#1088#1091#1076'. '#1076#1086#1075#1086#1074#1086#1088#1072
  3652. FieldName = 'AGREEMENTDATE'
  3653. end
  3654. object MainQueryTABNUMB: TStringField
  3655. DisplayLabel = #1058#1072#1073'.'#8470
  3656. FieldName = 'TABNUMB'
  3657. Size = 200
  3658. end
  3659. object MainQueryFIRSTINDATE: TDateTimeField
  3660. DisplayLabel = #1044#1072#1090#1072' '#1087#1086#1089#1090#1091#1087'.'
  3661. FieldName = 'FIRSTINDATE'
  3662. end
  3663. object MainQueryINDATE: TDateTimeField
  3664. DisplayLabel = #1044#1072#1090#1072' '#1085#1072#1079#1085#1072#1095'.'
  3665. FieldName = 'INDATE'
  3666. end
  3667. object MainQueryPASSPORTSERIES: TStringField
  3668. DisplayLabel = #1057#1077#1088#1080#1103' '#1087#1072#1089#1087#1086#1088#1090#1072
  3669. FieldName = 'PASSPORTSERIES'
  3670. Size = 9
  3671. end
  3672. object MainQueryPASSPORTNUMB: TStringField
  3673. DisplayLabel = #8470' '#1087#1072#1089#1087#1086#1088#1090#1072
  3674. FieldName = 'PASSPORTNUMB'
  3675. Size = 7
  3676. end
  3677. object MainQueryPASSINST: TStringField
  3678. DisplayLabel = #1055#1072#1089#1087'. '#1086#1088#1075'-'#1080#1103'.'
  3679. FieldName = 'PASSINST'
  3680. Size = 200
  3681. end
  3682. object MainQueryADRESS: TStringField
  3683. DisplayLabel = #1040#1076#1088#1077#1089
  3684. FieldName = 'ADRESS'
  3685. FixedChar = True
  3686. Size = 12
  3687. end
  3688. object MainQueryEDUCATION: TStringField
  3689. DisplayLabel = #1054#1073#1088#1072#1079#1086#1074#1072#1085#1080#1077
  3690. FieldName = 'EDUCATION'
  3691. Size = 500
  3692. end
  3693. object MainQueryWORKUNITTYPEROW: TStringField
  3694. DisplayLabel = #1058#1080#1087' '#1088#1072#1073#1086#1090#1099' ('#1086#1089#1085#1086#1074'./'#1089#1086#1074#1084'.)'
  3695. FieldName = 'WORKUNITTYPEROW'
  3696. Size = 500
  3697. end
  3698. object MainQueryBIRTHDATE: TDateTimeField
  3699. DisplayLabel = #1044#1072#1090#1072' '#1088#1086#1078#1076'.'
  3700. FieldName = 'BIRTHDATE'
  3701. Origin = 'BIRTHDATE'
  3702. end
  3703. end
  3704. inherited DataSource1: TDataSource
  3705. Top = 0
  3706. end
  3707. object ADQuery1: TADQuery
  3708. MasterSource = DataSource1
  3709. MasterFields = 'CITEZENID'
  3710. Connection = DataModule1.ADConnection1
  3711. SQL.Strings = (
  3712. 'select * from hr_v_jobstructure t'
  3713. 'where t.citezenid=:citezenID')
  3714. Left = 96
  3715. Top = 208
  3716. ParamData = <
  3717. item
  3718. Name = 'CITEZENID'
  3719. DataType = ftFloat
  3720. ParamType = ptInput
  3721. Size = 8
  3722. Value = 64868.000000000000000000
  3723. end>
  3724. object ADQuery1ID: TFMTBCDField
  3725. FieldName = 'ID'
  3726. end
  3727. object ADQuery1CITEZENID: TFMTBCDField
  3728. FieldName = 'CITEZENID'
  3729. end
  3730. object ADQuery1STRUCTUREID: TFMTBCDField
  3731. FieldName = 'STRUCTUREID'
  3732. end
  3733. object ADQuery1JOBTITLE: TStringField
  3734. DisplayLabel = #1044#1086#1083#1078#1085#1086#1089#1090#1100
  3735. FieldName = 'JOBTITLE'
  3736. Size = 200
  3737. end
  3738. object ADQuery1QUALIFICATION: TStringField
  3739. DisplayLabel = #1050#1074#1072#1083#1080#1092'.'
  3740. FieldName = 'QUALIFICATION'
  3741. Size = 241
  3742. end
  3743. object ADQuery1CATEGORYNUMB: TFMTBCDField
  3744. DisplayLabel = #1050#1072#1090#1077#1075'.'
  3745. FieldName = 'CATEGORYNUMB'
  3746. end
  3747. object ADQuery1AMOUNT: TFMTBCDField
  3748. DisplayLabel = #1050#1086#1083'-'#1074#1086'.'
  3749. FieldName = 'AMOUNT'
  3750. end
  3751. object ADQuery1SALARY: TFMTBCDField
  3752. DisplayLabel = #1057#1090#1072#1074#1082#1072'('#1054#1082#1083#1072#1076')'
  3753. FieldName = 'SALARY'
  3754. end
  3755. object ADQuery1DCODE: TStringField
  3756. DisplayLabel = #1055#1086#1076#1088'.'
  3757. FieldName = 'DCODE'
  3758. Size = 200
  3759. end
  3760. object ADQuery1CONTRACT: TStringField
  3761. DisplayLabel = #1050#1086#1085#1090#1088#1072#1082#1090
  3762. FieldName = 'CONTRACT'
  3763. Size = 200
  3764. end
  3765. object ADQuery1CODE: TStringField
  3766. FieldName = 'CODE'
  3767. Visible = False
  3768. Size = 200
  3769. end
  3770. object ADQuery1CONDITION: TStringField
  3771. DisplayLabel = #1059#1089#1083#1086#1074#1080#1103' '#1090#1088#1091#1076#1072
  3772. FieldName = 'CONDITION'
  3773. Size = 200
  3774. end
  3775. object ADQuery1WORKTYPE: TStringField
  3776. DisplayLabel = #1058#1080#1087' '#1088#1072#1073#1086#1090#1099
  3777. FieldName = 'WORKTYPE'
  3778. Size = 200
  3779. end
  3780. object ADQuery1RATECODE: TStringField
  3781. DisplayLabel = #1057#1090#1072#1074#1082#1072
  3782. FieldName = 'RATECODE'
  3783. Size = 200
  3784. end
  3785. object ADQuery1INDATE: TDateTimeField
  3786. DisplayLabel = #1044#1072#1090#1072' '#1085#1072#1079#1085#1072#1095'.'
  3787. FieldName = 'INDATE'
  3788. end
  3789. object ADQuery1AGREEMENTDATE: TDateTimeField
  3790. DisplayLabel = #1076#1072#1090#1072' '#1076#1086#1075#1086#1074#1086#1088#1072
  3791. FieldName = 'AGREEMENTDATE'
  3792. end
  3793. object ADQuery1WORKUNITTYPE: TStringField
  3794. DisplayLabel = #1058#1080#1087' '#1088#1072#1073#1086#1090#1099' ('#1086#1089#1085#1086#1074'./'#1089#1086#1074#1084'.)'
  3795. FieldName = 'WORKUNITTYPE'
  3796. Size = 500
  3797. end
  3798. end
  3799. object DataSource2: TDataSource
  3800. DataSet = ADQuery1
  3801. Left = 96
  3802. Top = 240
  3803. end
  3804. object ADQuery2: TADQuery
  3805. MasterSource = DataSource1
  3806. MasterFields = 'ID'
  3807. Connection = DataModule1.ADConnection1
  3808. SQL.Strings = (
  3809. 'select * from HR_V_ATESTATION t'
  3810. 'where t.employeeid=:ID')
  3811. Left = 144
  3812. Top = 208
  3813. ParamData = <
  3814. item
  3815. Name = 'ID'
  3816. DataType = ftInteger
  3817. ParamType = ptInput
  3818. Value = 59721
  3819. end>
  3820. object ADQuery2ID: TFMTBCDField
  3821. FieldName = 'ID'
  3822. Required = True
  3823. end
  3824. object ADQuery2CITEZENID: TFMTBCDField
  3825. FieldName = 'CITEZENID'
  3826. end
  3827. object ADQuery2EMPLOYEEID: TFMTBCDField
  3828. FieldName = 'EMPLOYEEID'
  3829. end
  3830. object ADQuery2EVENTDATE: TDateTimeField
  3831. DisplayLabel = #1044#1072#1090#1072' '#1072#1090#1090#1077#1089#1090#1072#1094#1080#1080
  3832. FieldName = 'EVENTDATE'
  3833. end
  3834. object ADQuery2DECISION: TStringField
  3835. DisplayLabel = #1056#1077#1096#1077#1085#1080#1077' '#1082#1086#1084#1080#1089#1089#1080#1080
  3836. FieldName = 'DECISION'
  3837. Size = 200
  3838. end
  3839. object ADQuery2DOCNUMB: TStringField
  3840. DisplayLabel = #8470' '#1044#1086#1082'. ('#1087#1088#1086#1090#1086#1082#1086#1083#1072')'
  3841. FieldName = 'DOCNUMB'
  3842. Size = 50
  3843. end
  3844. object ADQuery2DOCDATE: TDateTimeField
  3845. DisplayLabel = #1044#1072#1090#1072' '#1076#1086#1082'-'#1090#1072'.'
  3846. FieldName = 'DOCDATE'
  3847. end
  3848. object ADQuery2REASON: TStringField
  3849. DisplayLabel = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  3850. FieldName = 'REASON'
  3851. Size = 50
  3852. end
  3853. end
  3854. object DataSource3: TDataSource
  3855. DataSet = ADQuery2
  3856. Left = 144
  3857. Top = 240
  3858. end
  3859. object ADQuery3: TADQuery
  3860. MasterSource = DataSource1
  3861. MasterFields = 'ID'
  3862. Connection = DataModule1.ADConnection1
  3863. SQL.Strings = (
  3864. 'select * from HR_V_SKILLUP t'
  3865. 'where t.employeeid=:ID')
  3866. Left = 176
  3867. Top = 208
  3868. ParamData = <
  3869. item
  3870. Name = 'ID'
  3871. DataType = ftInteger
  3872. ParamType = ptInput
  3873. Value = 59721
  3874. end>
  3875. object ADQuery3ID: TFMTBCDField
  3876. FieldName = 'ID'
  3877. Required = True
  3878. end
  3879. object ADQuery3CITEZENID: TFMTBCDField
  3880. FieldName = 'CITEZENID'
  3881. end
  3882. object ADQuery3EMPLOYEEID: TFMTBCDField
  3883. FieldName = 'EMPLOYEEID'
  3884. end
  3885. object ADQuery3INDATE: TDateTimeField
  3886. DisplayLabel = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1086#1073#1091#1095#1077#1085#1080#1103
  3887. FieldName = 'INDATE'
  3888. end
  3889. object ADQuery3OUTDATE: TDateTimeField
  3890. DisplayLabel = #1044#1072#1090#1072' '#1082#1086#1085#1094#1072' '#1086#1073#1091#1095#1077#1085#1080#1103
  3891. FieldName = 'OUTDATE'
  3892. end
  3893. object ADQuery3EDTYPE: TStringField
  3894. DisplayLabel = #1042#1080#1076' '#1087#1086#1074#1099#1096#1077#1085#1080#1103' '#1082#1074#1072#1083#1080#1092#1080#1082#1072#1094#1080#1080
  3895. FieldName = 'EDTYPE'
  3896. Size = 500
  3897. end
  3898. object ADQuery3ORGANISATION: TStringField
  3899. DisplayLabel = #1054#1073#1088#1072#1079#1086#1074#1072#1090#1077#1083#1100#1085#1086#1077' '#1091#1095#1077#1088#1077#1078#1076#1077#1085#1080#1077
  3900. FieldName = 'ORGANISATION'
  3901. Size = 200
  3902. end
  3903. object ADQuery3DOCTYPE: TStringField
  3904. DisplayLabel = #1044#1086#1082#1091#1084#1077#1085#1090
  3905. FieldName = 'DOCTYPE'
  3906. Size = 500
  3907. end
  3908. object ADQuery3DOCNUMB: TStringField
  3909. DisplayLabel = #1057#1077#1088#1080#1103', '#1085#1086#1084#1077#1088' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  3910. FieldName = 'DOCNUMB'
  3911. Size = 100
  3912. end
  3913. object ADQuery3DOCDATE: TDateTimeField
  3914. DisplayLabel = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080' '
  3915. FieldName = 'DOCDATE'
  3916. end
  3917. object ADQuery3REASON: TStringField
  3918. DisplayLabel = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  3919. FieldName = 'REASON'
  3920. Size = 100
  3921. end
  3922. end
  3923. object DataSource4: TDataSource
  3924. DataSet = ADQuery3
  3925. Left = 176
  3926. Top = 240
  3927. end
  3928. object ADQuery4: TADQuery
  3929. MasterSource = DataSource1
  3930. MasterFields = 'ID'
  3931. Connection = DataModule1.ADConnection1
  3932. SQL.Strings = (
  3933. 'select * from HR_V_RETRAINING t'
  3934. 'where t.employeeid=:ID')
  3935. Left = 208
  3936. Top = 208
  3937. ParamData = <
  3938. item
  3939. Name = 'ID'
  3940. DataType = ftInteger
  3941. ParamType = ptInput
  3942. Value = Null
  3943. end>
  3944. object ADQuery4ID: TFMTBCDField
  3945. FieldName = 'ID'
  3946. Required = True
  3947. end
  3948. object ADQuery4CITEZENID: TFMTBCDField
  3949. FieldName = 'CITEZENID'
  3950. end
  3951. object ADQuery4EMPLOYEEID: TFMTBCDField
  3952. FieldName = 'EMPLOYEEID'
  3953. end
  3954. object ADQuery4INDATE: TDateTimeField
  3955. DisplayLabel = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1086#1073#1091#1095#1077#1085#1080#1103
  3956. FieldName = 'INDATE'
  3957. end
  3958. object ADQuery4OUTDATE: TDateTimeField
  3959. DisplayLabel = #1044#1072#1090#1072' '#1086#1082#1086#1085#1095#1072#1085#1080#1103' '#1086#1073#1091#1095#1077#1085#1080#1103
  3960. FieldName = 'OUTDATE'
  3961. end
  3962. object ADQuery4JOBTITLE: TStringField
  3963. DisplayLabel = #1057#1087#1077#1094#1080#1072#1083#1100#1085#1086#1089#1090#1100
  3964. FieldName = 'JOBTITLE'
  3965. Size = 600
  3966. end
  3967. object ADQuery4DOCTYPE: TStringField
  3968. DisplayLabel = #1044#1086#1082#1091#1084#1077#1085#1090
  3969. FieldName = 'DOCTYPE'
  3970. Size = 500
  3971. end
  3972. object ADQuery4DOCNUMB: TStringField
  3973. DisplayLabel = #8470' '#1044#1086#1082#1091#1084#1077#1085#1090#1072
  3974. FieldName = 'DOCNUMB'
  3975. Size = 100
  3976. end
  3977. object ADQuery4DOCDATE: TDateTimeField
  3978. DisplayLabel = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080' '
  3979. FieldName = 'DOCDATE'
  3980. end
  3981. object ADQuery4REASON: TStringField
  3982. DisplayLabel = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  3983. FieldName = 'REASON'
  3984. Size = 200
  3985. end
  3986. end
  3987. object DataSource5: TDataSource
  3988. DataSet = ADQuery4
  3989. Left = 208
  3990. Top = 240
  3991. end
  3992. object PopupMenu1: TPopupMenu
  3993. Left = 480
  3994. object N1: TMenuItem
  3995. Caption = #1055#1086#1083#1091#1095#1080#1090#1100' '#1092#1086#1088#1084#1091' '#1058'2'
  3996. OnClick = N1Click
  3997. end
  3998. object N2: TMenuItem
  3999. Caption = #1054#1092#1086#1088#1084#1080#1090#1100' '#1091#1074#1086#1083#1100#1085#1077#1085#1080#1077
  4000. OnClick = N2Click
  4001. end
  4002. end
  4003. object ADQuery5: TADQuery
  4004. MasterSource = DataSource1
  4005. MasterFields = 'ID'
  4006. Connection = DataModule1.ADConnection1
  4007. SQL.Strings = (
  4008. 'select * from HR_V_AWARD t'
  4009. 'where t.employeeid=:ID')
  4010. Left = 240
  4011. Top = 208
  4012. ParamData = <
  4013. item
  4014. Name = 'ID'
  4015. DataType = ftInteger
  4016. ParamType = ptInput
  4017. Value = Null
  4018. end>
  4019. object ADQuery5ID: TFMTBCDField
  4020. FieldName = 'ID'
  4021. Required = True
  4022. end
  4023. object ADQuery5CITEZENID: TFMTBCDField
  4024. FieldName = 'CITEZENID'
  4025. end
  4026. object ADQuery5EMPLOYEEID: TFMTBCDField
  4027. FieldName = 'EMPLOYEEID'
  4028. end
  4029. object ADQuery5AWARDTYPE: TStringField
  4030. DisplayLabel = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1085#1072#1075#1088#1072#1076#1099
  4031. FieldName = 'AWARDTYPE'
  4032. Size = 500
  4033. end
  4034. object ADQuery5DOCTYPE: TStringField
  4035. DisplayLabel = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  4036. FieldName = 'DOCTYPE'
  4037. Size = 500
  4038. end
  4039. object ADQuery5DOCNUMB: TStringField
  4040. DisplayLabel = #1053#1086#1084#1077#1088' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  4041. FieldName = 'DOCNUMB'
  4042. Size = 100
  4043. end
  4044. object ADQuery5DOCDATE: TDateTimeField
  4045. DisplayLabel = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
  4046. FieldName = 'DOCDATE'
  4047. end
  4048. end
  4049. object DataSource6: TDataSource
  4050. DataSet = ADQuery5
  4051. Left = 240
  4052. Top = 240
  4053. end
  4054. object ADQuery6: TADQuery
  4055. MasterSource = DataSource1
  4056. MasterFields = 'ID'
  4057. Connection = DataModule1.ADConnection1
  4058. SQL.Strings = (
  4059. 'select * from HR_V_HOLIDAY t'
  4060. 'where t.employeeid=:ID')
  4061. Left = 272
  4062. Top = 208
  4063. ParamData = <
  4064. item
  4065. Name = 'ID'
  4066. DataType = ftInteger
  4067. ParamType = ptInput
  4068. Value = Null
  4069. end>
  4070. object ADQuery6ID: TFMTBCDField
  4071. FieldName = 'ID'
  4072. Required = True
  4073. end
  4074. object ADQuery6CITEZENID: TFMTBCDField
  4075. FieldName = 'CITEZENID'
  4076. end
  4077. object ADQuery6EMPLOYEEID: TFMTBCDField
  4078. FieldName = 'EMPLOYEEID'
  4079. end
  4080. object ADQuery6HOLTYPE: TStringField
  4081. DisplayLabel = #1058#1080#1087' '#1086#1090#1087#1091#1089#1082#1072
  4082. FieldName = 'HOLTYPE'
  4083. Size = 500
  4084. end
  4085. object ADQuery6WORKDATE1: TDateTimeField
  4086. DisplayLabel = #1055#1077#1088#1080#1086#1076' '#1088#1072#1073#1086#1090#1099' ('#1085#1072#1095#1072#1083#1086')'
  4087. FieldName = 'WORKDATE1'
  4088. end
  4089. object ADQuery6WORKDATE2: TDateTimeField
  4090. DisplayLabel = #1055#1077#1088#1080#1086#1076' '#1088#1072#1073#1086#1090#1099' ('#1082#1086#1085#1077#1094')'
  4091. FieldName = 'WORKDATE2'
  4092. end
  4093. object ADQuery6INDATE: TDateTimeField
  4094. DisplayLabel = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1086#1090#1087#1089#1082#1072
  4095. FieldName = 'INDATE'
  4096. end
  4097. object ADQuery6OUTDATE: TDateTimeField
  4098. DisplayLabel = #1044#1072#1090#1072' '#1082#1086#1085#1094#1072' '#1086#1090#1087#1091#1089#1082#1072
  4099. FieldName = 'OUTDATE'
  4100. end
  4101. object ADQuery6DAYS: TFMTBCDField
  4102. DisplayLabel = #1063#1080#1089#1083#1086' '#1076#1085#1077#1081
  4103. FieldName = 'DAYS'
  4104. Precision = 38
  4105. Size = 0
  4106. end
  4107. object ADQuery6REASON: TStringField
  4108. DisplayLabel = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  4109. FieldName = 'REASON'
  4110. Size = 100
  4111. end
  4112. end
  4113. object ADQuery7: TADQuery
  4114. MasterSource = DataSource1
  4115. MasterFields = 'ID'
  4116. Connection = DataModule1.ADConnection1
  4117. SQL.Strings = (
  4118. 'select * from HR_V_SOCIAL t'
  4119. 'where t.employeeid=:ID')
  4120. Left = 304
  4121. Top = 208
  4122. ParamData = <
  4123. item
  4124. Name = 'ID'
  4125. DataType = ftInteger
  4126. ParamType = ptInput
  4127. Value = Null
  4128. end>
  4129. object ADQuery7ID: TFMTBCDField
  4130. FieldName = 'ID'
  4131. Required = True
  4132. end
  4133. object ADQuery7CITEZENID: TFMTBCDField
  4134. FieldName = 'CITEZENID'
  4135. end
  4136. object ADQuery7EMPLOYEEID: TFMTBCDField
  4137. FieldName = 'EMPLOYEEID'
  4138. end
  4139. object ADQuery7PRIVTYPE: TStringField
  4140. DisplayLabel = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1083#1100#1075#1086#1090#1099
  4141. FieldName = 'PRIVTYPE'
  4142. Size = 500
  4143. end
  4144. object ADQuery7DOCNUMB: TStringField
  4145. DisplayLabel = #1053#1086#1084#1077#1088' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
  4146. FieldName = 'DOCNUMB'
  4147. Size = 100
  4148. end
  4149. object ADQuery7DOCDATE: TDateTimeField
  4150. DisplayLabel = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
  4151. FieldName = 'DOCDATE'
  4152. end
  4153. object ADQuery7REASON: TStringField
  4154. DisplayLabel = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  4155. FieldName = 'REASON'
  4156. Size = 100
  4157. end
  4158. end
  4159. object DataSource7: TDataSource
  4160. DataSet = ADQuery6
  4161. Left = 272
  4162. Top = 240
  4163. end
  4164. object DataSource8: TDataSource
  4165. DataSet = ADQuery7
  4166. Left = 304
  4167. Top = 240
  4168. end
  4169. object ADQuery9: TADQuery
  4170. MasterSource = DataSource10
  4171. Connection = DataModule1.ADConnection1
  4172. SQL.Strings = (
  4173. 'select * from HR_V_DOCEDUCATION t'
  4174. 'where t.citezenid=:ID')
  4175. Left = 352
  4176. Top = 208
  4177. ParamData = <
  4178. item
  4179. Name = 'ID'
  4180. DataType = ftInteger
  4181. ParamType = ptInput
  4182. Value = 65233
  4183. end>
  4184. object FloatField3: TFMTBCDField
  4185. FieldName = 'CITEZENID'
  4186. Required = True
  4187. end
  4188. object FloatField4: TFMTBCDField
  4189. FieldName = 'ID'
  4190. Required = True
  4191. end
  4192. object ADQuery3DOCSERIA: TStringField
  4193. DisplayLabel = #1057#1077#1088#1080#1103' '#1076#1086#1082'-'#1090#1072'.'
  4194. FieldName = 'DOCSERIA'
  4195. Size = 200
  4196. end
  4197. object StringField1: TStringField
  4198. DisplayLabel = #8470' '#1076#1086#1082'-'#1090#1072'.'
  4199. FieldName = 'DOCNUMB'
  4200. Size = 200
  4201. end
  4202. object ADQuery3NAME: TStringField
  4203. DisplayLabel = #1053#1072#1079#1074#1072#1085#1080#1077' '#1086#1088#1075'.'
  4204. FieldName = 'NAME'
  4205. Size = 200
  4206. end
  4207. object ADQuery3OUTYEAR: TStringField
  4208. DisplayLabel = #1043#1086#1076' '#1074#1099#1087#1091#1089#1082#1072
  4209. FieldName = 'OUTYEAR'
  4210. Size = 4
  4211. end
  4212. object StringField2: TStringField
  4213. DisplayLabel = #1090#1080#1087' '#1076#1086#1082'-'#1090#1072'.'
  4214. FieldName = 'DOCTYPE'
  4215. Size = 500
  4216. end
  4217. object ADQuery3OVEREDUCATION: TStringField
  4218. DisplayLabel = #1055#1086#1089#1083#1077#1074#1091#1079#1086#1074#1089#1082#1086#1077' '#1086#1073#1088'.'
  4219. FieldName = 'OVEREDUCATION'
  4220. Size = 500
  4221. end
  4222. object ADQuery3SPECIALITYCODE: TStringField
  4223. DisplayLabel = #1050#1086#1076' '#1089#1087#1077#1094'.'
  4224. FieldName = 'SPECIALITYCODE'
  4225. end
  4226. object ADQuery3SPECIALITY: TStringField
  4227. DisplayLabel = #1057#1087#1077#1094#1080#1072#1083#1100#1085#1086#1089#1090#1100
  4228. FieldName = 'SPECIALITY'
  4229. Size = 600
  4230. end
  4231. object ADQuery3CVALIFICATIONCODE: TStringField
  4232. DisplayLabel = #1050#1086#1076' '#1082#1074#1072#1083'.'
  4233. FieldName = 'CVALIFICATIONCODE'
  4234. end
  4235. object ADQuery3CVALIFICATION: TStringField
  4236. DisplayLabel = #1050#1074#1072#1083#1080#1092#1080#1082#1072#1094#1080#1103
  4237. FieldName = 'CVALIFICATION'
  4238. Size = 600
  4239. end
  4240. object ADQuery3FIO: TStringField
  4241. DisplayLabel = #1060#1048#1054
  4242. FieldName = 'FIO'
  4243. Size = 204
  4244. end
  4245. object ADQuery3EDUCATIONFORM: TStringField
  4246. DisplayLabel = #1060#1086#1088#1084#1072' '#1086#1073#1091#1095#1077#1085#1080#1103
  4247. FieldName = 'EDUCATIONFORM'
  4248. Size = 500
  4249. end
  4250. end
  4251. object ADQuery11: TADQuery
  4252. MasterSource = DataSource10
  4253. Connection = DataModule1.ADConnection1
  4254. SQL.Strings = (
  4255. 'select * from HR_V_REGISTRATION t'
  4256. 'where t.citezenid=:ID')
  4257. Left = 384
  4258. Top = 208
  4259. ParamData = <
  4260. item
  4261. Name = 'ID'
  4262. DataType = ftInteger
  4263. ParamType = ptInput
  4264. Value = Null
  4265. end>
  4266. object FloatField7: TFMTBCDField
  4267. FieldName = 'ID'
  4268. end
  4269. object FloatField8: TFMTBCDField
  4270. FieldName = 'CITEZENID'
  4271. end
  4272. object ADQuery6ADRESS: TStringField
  4273. FieldName = 'ADRESS'
  4274. Size = 200
  4275. end
  4276. object ADQuery6REGDATE: TDateTimeField
  4277. FieldName = 'REGDATE'
  4278. end
  4279. object ADQuery6STATUS: TFMTBCDField
  4280. FieldName = 'STATUS'
  4281. end
  4282. object ADQuery6PHONEID: TFMTBCDField
  4283. FieldName = 'PHONEID'
  4284. end
  4285. end
  4286. object ADQuery12: TADQuery
  4287. MasterSource = DataSource10
  4288. Connection = DataModule1.ADConnection1
  4289. SQL.Strings = (
  4290. 'select * from HR_V_FAMILY t'
  4291. 'where t.citezenid=:ID')
  4292. Left = 416
  4293. Top = 208
  4294. ParamData = <
  4295. item
  4296. Name = 'ID'
  4297. DataType = ftInteger
  4298. ParamType = ptInput
  4299. Value = Null
  4300. end>
  4301. object FloatField9: TFMTBCDField
  4302. FieldName = 'ID'
  4303. Required = True
  4304. end
  4305. object FloatField10: TFMTBCDField
  4306. FieldName = 'CITEZENID'
  4307. end
  4308. object ADQuery7BIRTHDATE: TDateTimeField
  4309. DisplayLabel = #1044#1072#1090#1072' '#1088#1086#1078#1076#1077#1085#1080#1103
  4310. FieldName = 'BIRTHDATE'
  4311. end
  4312. object ADQuery7BIRTHPLACE: TStringField
  4313. DisplayLabel = #1052#1077#1089#1090#1086' '#1088#1086#1078#1076#1077#1085#1080#1103
  4314. FieldName = 'BIRTHPLACE'
  4315. Size = 200
  4316. end
  4317. object ADQuery7STEP: TStringField
  4318. DisplayLabel = #1057#1090#1077#1087#1077#1100' '#1088#1086#1076#1089#1090#1074#1072
  4319. FieldName = 'STEP'
  4320. Size = 500
  4321. end
  4322. object ADQuery7LASTNAME: TStringField
  4323. DisplayLabel = #1060#1072#1084#1080#1083#1080#1103
  4324. FieldName = 'LASTNAME'
  4325. Size = 200
  4326. end
  4327. object ADQuery7NAME: TStringField
  4328. DisplayLabel = #1048#1084#1103
  4329. FieldName = 'NAME'
  4330. Size = 200
  4331. end
  4332. object ADQuery7FATHERSHIP: TStringField
  4333. DisplayLabel = #1054#1090#1095#1077#1089#1090#1074#1086
  4334. FieldName = 'FATHERSHIP'
  4335. Size = 200
  4336. end
  4337. end
  4338. object DataSource11: TDataSource
  4339. DataSet = ADQuery12
  4340. Left = 416
  4341. Top = 240
  4342. end
  4343. object DataSource12: TDataSource
  4344. DataSet = ADQuery11
  4345. Left = 384
  4346. Top = 240
  4347. end
  4348. object DataSource15: TDataSource
  4349. DataSet = ADQuery9
  4350. Left = 352
  4351. Top = 240
  4352. end
  4353. object PKDBTable1: TPKDBTable
  4354. Fields = <
  4355. item
  4356. FieldName = 'CITEZENID'
  4357. FieldLabel = #1043#1088#1072#1078#1076#1072#1085#1080#1085
  4358. Nullable = False
  4359. FieldType = ftsNumber
  4360. ReferencingTable = 'HR_CITEZEN'
  4361. ReferencingColumn = 'ID'
  4362. IsPrimaryKey = True
  4363. DisplayName = 'CITEZENID'
  4364. end
  4365. item
  4366. FieldName = 'STOCKATEGID'
  4367. FieldLabel = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1079#1072#1087#1072#1089#1072
  4368. Nullable = True
  4369. FieldType = ftsNumber
  4370. ReferencingTable = 'HR_FACETCONTENT'
  4371. ReferencingColumn = 'ID'
  4372. LookUpRool = 'rowcontent'
  4373. DisplayName = 'STOCKATEGID'
  4374. end
  4375. item
  4376. FieldName = 'RANKID'
  4377. FieldLabel = #1047#1074#1072#1085#1080#1077
  4378. Nullable = True
  4379. FieldType = ftsNumber
  4380. ReferencingTable = 'HR_FACETCONTENT'
  4381. ReferencingColumn = 'ID'
  4382. LookUpRool = 'rowcontent'
  4383. DisplayName = 'RANKID'
  4384. end
  4385. item
  4386. FieldName = 'MILITSTATUSID'
  4387. FieldLabel = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1075#1086#1076#1085#1086#1089#1090#1080' '#1082' '#1074#1086#1077#1085#1085#1086#1081' '#1089#1083#1091#1078#1073#1077
  4388. Nullable = True
  4389. FieldType = ftsNumber
  4390. ReferencingTable = 'HR_FACETCONTENT'
  4391. ReferencingColumn = 'ID'
  4392. LookUpRool = 'rowcontent'
  4393. DisplayName = 'MILITSTATUSID'
  4394. end
  4395. item
  4396. FieldName = 'VOENKOMID'
  4397. FieldLabel = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1074#1086#1077#1085#1085#1086#1075#1086' '#1082#1086#1084#1080#1089#1089#1072#1088#1080#1072#1090#1072' '#1087#1086' '#1084#1077#1089#1090#1091' '#1078#1080#1090#1077#1083#1100#1089#1090#1074#1072
  4398. Nullable = True
  4399. FieldType = ftsNumber
  4400. ReferencingTable = 'HR_ORGANISATION'
  4401. ReferencingColumn = 'ID'
  4402. LookUpRool = 'name'
  4403. DisplayName = 'VOENKOMID'
  4404. end
  4405. item
  4406. FieldName = 'MILACCOUNTID'
  4407. FieldLabel = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1074#1086#1080#1085#1089#1082#1086#1075#1086' '#1091#1095#1077#1090#1072
  4408. Nullable = True
  4409. FieldType = ftsNumber
  4410. ReferencingTable = 'HR_FACETCONTENT'
  4411. ReferencingColumn = 'ID'
  4412. LookUpRool = 'rowcontent'
  4413. DisplayName = 'MILACCOUNTID'
  4414. end
  4415. item
  4416. FieldName = 'MILACCOUNTSPEC'
  4417. FieldLabel = #1057#1087#1077#1094#1080#1072#1083#1100#1085#1099#1081' '#1091#1095#1077#1090
  4418. Nullable = True
  4419. FieldType = ftsString
  4420. DisplayName = 'MILACCOUNTSPEC'
  4421. end
  4422. item
  4423. FieldName = 'VUS'
  4424. FieldLabel = #1055#1086#1083#1085#1086#1077' '#1082#1086#1076#1086#1074#1086#1077' '#1086#1073#1086#1079#1085#1072#1095#1077#1085#1080#1077' '#1042#1059#1057
  4425. Nullable = True
  4426. FieldType = ftsString
  4427. DisplayName = 'VUS'
  4428. end
  4429. item
  4430. FieldName = 'ID'
  4431. FieldLabel = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088
  4432. Nullable = False
  4433. FieldType = ftsNumber
  4434. DisplayName = 'ID'
  4435. end
  4436. item
  4437. FieldName = 'MILACCOUNTGEN'
  4438. FieldLabel = #1054#1073#1097#1080#1081' '#1091#1095#1077#1090' ('#1085#1086#1084#1077#1088' '#1082#1086#1084#1072#1085#1076#1099', '#1087#1072#1088#1090#1080#1080')'
  4439. Nullable = True
  4440. FieldType = ftsString
  4441. DisplayName = 'MILACCOUNTGEN'
  4442. end
  4443. item
  4444. FieldName = 'PROFIL'
  4445. FieldLabel = #1057#1086#1089#1090#1072#1074' ('#1087#1088#1086#1092#1080#1083#1100')'
  4446. Nullable = True
  4447. FieldType = ftsString
  4448. DisplayName = 'PROFIL'
  4449. end
  4450. item
  4451. FieldName = 'MILREGFLAG'
  4452. FieldLabel = #1054#1090#1084#1077#1090#1082#1072' '#1086' '#1089#1085#1103#1090#1080#1080' '#1089' '#1091#1095#1077#1090#1072
  4453. Nullable = True
  4454. FieldType = ftsString
  4455. DisplayName = 'MILREGFLAG'
  4456. end>
  4457. TableName = 'HR_MILITARY'
  4458. Connection = DataModule1.ADConnection1
  4459. Left = 608
  4460. Top = 624
  4461. end
  4462. object PKDBTable2: TPKDBTable
  4463. Fields = <
  4464. item
  4465. FieldName = 'CITEZENID'
  4466. FieldLabel = #1043#1088#1072#1078#1076#1072#1085#1080#1085
  4467. Nullable = False
  4468. FieldType = ftsNumber
  4469. IsPrimaryKey = True
  4470. DisplayName = 'CITEZENID'
  4471. end
  4472. item
  4473. FieldName = 'STATUSID'
  4474. FieldLabel = #1057#1090#1072#1090#1091#1089
  4475. Nullable = True
  4476. FieldType = ftsNumber
  4477. DisplayName = 'STATUSID'
  4478. end
  4479. item
  4480. FieldName = 'CHANGESTATUSDATE'
  4481. FieldLabel = #1044#1072#1090#1072' '#1089#1084#1077#1085#1099' '#1089#1090#1072#1090#1091#1089#1072
  4482. Nullable = True
  4483. FieldType = ftsDate
  4484. DisplayName = 'CHANGESTATUSDATE'
  4485. end
  4486. item
  4487. FieldName = 'TAXNUMB'
  4488. FieldLabel = #1048#1053#1053
  4489. Nullable = True
  4490. FieldType = ftsString
  4491. DisplayName = 'TAXNUMB'
  4492. end
  4493. item
  4494. FieldName = 'ID'
  4495. FieldLabel = #1048#1076#1077#1085#1090#1080#1092#1080#1082#1072#1090#1086#1088
  4496. Nullable = False
  4497. FieldType = ftsNumber
  4498. DisplayName = 'ID'
  4499. end>
  4500. TableName = 'HR_TAXNUMBER'
  4501. Connection = DataModule1.ADConnection1
  4502. Left = 640
  4503. Top = 624
  4504. end
  4505. object PKDBTable3: TPKDBTable
  4506. Fields = <
  4507. item
  4508. FieldName = 'CITEZENID'
  4509. FieldLabel = #1043#1088#1072#1078#1076#1072#1085#1080#1085
  4510. Nullable = False
  4511. FieldType = ftsNumber
  4512. ReferencingTable = 'HR_CITEZEN'
  4513. ReferencingColumn = 'ID'
  4514. IsPrimaryKey = True
  4515. DisplayName = 'CITEZENID'
  4516. end
  4517. item
  4518. FieldName = 'PENSIONTYPE'
  4519. FieldLabel = #1042#1080#1076' '#1087#1077#1085#1089#1080#1080
  4520. Nullable = True
  4521. FieldType = ftsNumber
  4522. ReferencingTable = 'HR_FACETCONTENT'
  4523. ReferencingColumn = 'ID'
  4524. DisplayName = 'PENSIONTYPE'
  4525. end
  4526. item
  4527. FieldName = 'REGDATE'
  4528. FieldLabel = #1044#1072#1090#1072' '#1087#1086#1089#1090#1072#1085#1086#1074#1082#1080' '#1085#1072' '#1087#1077#1085#1089#1080#1086#1085#1085#1099#1081' '#1091#1095#1077#1090
  4529. Nullable = True
  4530. FieldType = ftsDate
  4531. DisplayName = 'REGDATE'
  4532. end
  4533. item
  4534. FieldName = 'STARTWORKDATE'
  4535. FieldLabel = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072' '#1090#1088#1091#1076#1086#1074#1086#1075#1086' '#1089#1090#1072#1078#1072
  4536. Nullable = True
  4537. FieldType = ftsDate
  4538. DisplayName = 'STARTWORKDATE'
  4539. end
  4540. item
  4541. FieldName = 'ID'
  4542. Nullable = False
  4543. FieldType = ftsNumber
  4544. DisplayName = 'ID'
  4545. end
  4546. item
  4547. FieldName = 'TOTALWORKDATE'
  4548. FieldLabel = #1044#1072#1090#1072' '#1085#1077#1087#1088#1077#1088#1099#1074#1085#1086#1075#1086' '#1090#1088#1091#1076#1086#1074#1086#1075#1086' '#1089#1090#1072#1078#1072
  4549. Nullable = True
  4550. FieldType = ftsDate
  4551. DisplayName = 'TOTALWORKDATE'
  4552. end
  4553. item
  4554. FieldName = 'STATUSID'
  4555. FieldLabel = #1057#1090#1072#1090#1091#1089
  4556. Nullable = True
  4557. FieldType = ftsNumber
  4558. DisplayName = 'STATUSID'
  4559. end
  4560. item
  4561. FieldName = 'PENSIONRECOUNTDATE'
  4562. FieldLabel = #1044#1072#1090#1072' '#1087#1077#1088#1077#1088#1072#1089#1095#1077#1090#1072' '#1087#1077#1085#1089#1080#1080
  4563. Nullable = True
  4564. FieldType = ftsDate
  4565. DisplayName = 'PENSIONRECOUNTDATE'
  4566. end
  4567. item
  4568. FieldName = 'CHANGESTATUSDATE'
  4569. FieldLabel = #1044#1072#1090#1072' '#1089#1084#1077#1085#1099' '#1089#1090#1072#1090#1091#1089#1072
  4570. Nullable = True
  4571. FieldType = ftsDate
  4572. DisplayName = 'CHANGESTATUSDATE'
  4573. end
  4574. item
  4575. FieldName = 'PENSIONDATE'
  4576. FieldLabel = #1044#1072#1090#1072' '#1085#1072#1079#1085#1072#1095#1077#1085#1080#1103' '#1087#1077#1085#1089#1080#1080
  4577. Nullable = True
  4578. FieldType = ftsDate
  4579. DisplayName = 'PENSIONDATE'
  4580. end
  4581. item
  4582. FieldName = 'DOCNUMB'
  4583. FieldLabel = #1053#1086#1084#1077#1088' C'#1053#1048#1051#1057
  4584. Nullable = True
  4585. FieldType = ftsString
  4586. DisplayName = 'DOCNUMB'
  4587. end
  4588. item
  4589. FieldName = 'PENSIONDOCNUMB'
  4590. FieldLabel = #1053#1086#1084#1077#1088' '#1087#1077#1085#1089#1080#1086#1085#1085#1086#1075#1086' '#1091#1076#1086#1089#1090#1086#1074#1077#1088#1077#1085#1080#1103
  4591. Nullable = True
  4592. FieldType = ftsString
  4593. DisplayName = 'PENSIONDOCNUMB'
  4594. end
  4595. item
  4596. FieldName = 'invalidgroup'
  4597. FieldLabel = #1043#1088#1091#1087#1087#1072' '#1080#1085#1074#1072#1083#1080#1076#1085#1086#1089#1090#1080
  4598. Nullable = True
  4599. FieldType = ftsString
  4600. ReferencingTable = 'HR_FACETCONTENT'
  4601. ReferencingColumn = 'ID'
  4602. LookUpRool = 'rowcontent'
  4603. DisplayName = 'invalidgroup'
  4604. end
  4605. item
  4606. FieldName = 'PENSIONLIST'
  4607. FieldLabel = #1053#1072#1079#1085#1072#1095#1077#1085#1080#1077' '#1087#1077#1085#1089#1080#1081' '#1087#1086' '#1089#1087#1080#1089#1082#1091' '
  4608. Nullable = True
  4609. FieldType = ftsString
  4610. ReferencingTable = 'hr_FACETCONTENT'
  4611. ReferencingColumn = 'ID'
  4612. LookUpRool = 'rowcontent'
  4613. DisplayName = 'PENSIONLIST'
  4614. end>
  4615. TableName = 'HR_DOCSNILS'
  4616. Connection = DataModule1.ADConnection1
  4617. Left = 672
  4618. Top = 624
  4619. end
  4620. object PKDBTable4: TPKDBTable
  4621. Fields = <
  4622. item
  4623. FieldName = 'CITEZENID'
  4624. FieldLabel = #1043#1088#1072#1078#1076#1072#1085#1080#1085
  4625. Nullable = False
  4626. FieldType = ftsNumber
  4627. ReferencingTable = 'HR_CITEZEN'
  4628. ReferencingColumn = 'ID'
  4629. IsPrimaryKey = True
  4630. DisplayName = 'CITEZENID'
  4631. end
  4632. item
  4633. FieldName = 'BOOKNUMB'
  4634. FieldLabel = #1053#1086#1084#1077#1088' '#1090#1088#1091#1076#1086#1074#1086#1081' '#1082#1085#1080#1078#1082#1080
  4635. Nullable = True
  4636. FieldType = ftsString
  4637. DisplayName = 'BOOKNUMB'
  4638. end
  4639. item
  4640. FieldName = 'STATUS'
  4641. FieldLabel = #1057#1090#1072#1090#1091#1089
  4642. Nullable = True
  4643. FieldType = ftsNumber
  4644. DisplayName = 'STATUS'
  4645. end
  4646. item
  4647. FieldName = 'ID'
  4648. Nullable = False
  4649. FieldType = ftsNumber
  4650. DisplayName = 'ID'
  4651. end>
  4652. TableName = 'HR_DOCWORKBOOK'
  4653. Connection = DataModule1.ADConnection1
  4654. Left = 704
  4655. Top = 624
  4656. end
  4657. object ADQuery8: TADQuery
  4658. MasterSource = DataSource10
  4659. Connection = DataModule1.ADConnection1
  4660. SQL.Strings = (
  4661. 'select * from HR_V_JOBHISTORY t'
  4662. 'where t.citezenid=:ID')
  4663. Left = 448
  4664. Top = 208
  4665. ParamData = <
  4666. item
  4667. Name = 'ID'
  4668. DataType = ftInteger
  4669. ParamType = ptInput
  4670. Value = Null
  4671. end>
  4672. object ADQuery8CITEZENID: TFMTBCDField
  4673. FieldName = 'CITEZENID'
  4674. end
  4675. object ADQuery8INDATE: TDateTimeField
  4676. DisplayLabel = #1044#1072#1090#1072' '#1087#1088#1080#1077#1084#1072
  4677. FieldName = 'INDATE'
  4678. end
  4679. object ADQuery8OUTDATE: TDateTimeField
  4680. DisplayLabel = #1044#1072#1090#1072' '#1091#1074#1086#1083'.'
  4681. FieldName = 'OUTDATE'
  4682. end
  4683. object ADQuery8DEPT_NO: TStringField
  4684. DisplayLabel = #1055#1086#1076#1088'.'
  4685. FieldName = 'DEPT_NO'
  4686. Size = 200
  4687. end
  4688. object ADQuery8AGREEMENTNUMB: TStringField
  4689. DisplayLabel = #8470' '#1076#1086#1075#1086#1074#1086#1088#1072
  4690. FieldName = 'AGREEMENTNUMB'
  4691. Size = 200
  4692. end
  4693. object ADQuery8AGREEMENTDATE: TDateTimeField
  4694. DisplayLabel = #1044#1072#1090#1072' '#1076#1086#1075#1086#1074#1086#1088#1072
  4695. FieldName = 'AGREEMENTDATE'
  4696. end
  4697. object ADQuery8JOBTITLE: TStringField
  4698. DisplayLabel = #1044#1086#1083#1078#1085#1086#1089#1090#1100
  4699. FieldName = 'JOBTITLE'
  4700. Size = 442
  4701. end
  4702. object ADQuery8SUMSAL: TFMTBCDField
  4703. DisplayLabel = #1057#1091#1084'.'#1054#1082#1083#1072#1076
  4704. FieldName = 'SUMSAL'
  4705. end
  4706. object ADQuery8REASON: TStringField
  4707. DisplayLabel = #1054#1089#1085#1086#1074#1072#1085#1080#1077' '#1087#1088#1080#1077#1084#1072
  4708. FieldName = 'REASON'
  4709. FixedChar = True
  4710. Size = 8
  4711. end
  4712. object ADQuery8ID: TFMTBCDField
  4713. FieldName = 'ID'
  4714. Required = True
  4715. end
  4716. end
  4717. object DataSource9: TDataSource
  4718. DataSet = ADQuery8
  4719. Left = 448
  4720. Top = 240
  4721. end
  4722. object ADQuery10: TADQuery
  4723. MasterSource = DataSource1
  4724. MasterFields = 'ID'
  4725. Connection = DataModule1.ADConnection1
  4726. SQL.Strings = (
  4727. 'select t.citezenid id, t.structureid structureid from hr_v_empci' +
  4728. 'tezen t'
  4729. 'where t.id=:ID')
  4730. Left = 352
  4731. Top = 168
  4732. ParamData = <
  4733. item
  4734. Name = 'ID'
  4735. DataType = ftInteger
  4736. ParamType = ptInput
  4737. Value = 1806759
  4738. end>
  4739. object ADQuery10ID: TFMTBCDField
  4740. FieldName = 'ID'
  4741. end
  4742. object ADQuery10STRUCTUREID: TFMTBCDField
  4743. FieldName = 'STRUCTUREID'
  4744. end
  4745. end
  4746. object DataSource10: TDataSource
  4747. DataSet = ADQuery10
  4748. Left = 384
  4749. Top = 168
  4750. end
  4751. object ADQuery13: TADQuery
  4752. MasterSource = DataSource10
  4753. MasterFields = 'ID'
  4754. Connection = DataModule1.ADConnection1
  4755. SQL.Strings = (
  4756. 'select * from HR_V_DISCIPLINE t'
  4757. 'where t.citezenid=:ID')
  4758. Left = 512
  4759. Top = 208
  4760. ParamData = <
  4761. item
  4762. Name = 'ID'
  4763. DataType = ftInteger
  4764. ParamType = ptInput
  4765. Value = 1806759
  4766. end>
  4767. object ADQuery13ID: TFMTBCDField
  4768. FieldName = 'ID'
  4769. end
  4770. object ADQuery13CITEZENID: TFMTBCDField
  4771. FieldName = 'CITEZENID'
  4772. end
  4773. object ADQuery13STATUSID: TFMTBCDField
  4774. FieldName = 'STATUSID'
  4775. end
  4776. object ADQuery13CHANGESTATUSDATE: TDateTimeField
  4777. DisplayLabel = #1044#1072#1090#1072' '#1080#1079#1084'. '#1089#1090#1072#1090#1091#1089#1072
  4778. FieldName = 'CHANGESTATUSDATE'
  4779. end
  4780. object ADQuery13EVENTDATE: TDateTimeField
  4781. DisplayLabel = #1044#1072#1090#1072' '#1085#1072#1088#1091#1096#1077#1085#1080#1103
  4782. FieldName = 'EVENTDATE'
  4783. end
  4784. object ADQuery13BASICDOC: TStringField
  4785. DisplayLabel = #1054#1089#1085#1086#1074#1072#1085#1080#1077
  4786. FieldName = 'BASICDOC'
  4787. Size = 100
  4788. end
  4789. object ADQuery13STATUSNAME: TStringField
  4790. DisplayLabel = #1057#1090#1072#1090#1091#1089
  4791. FieldName = 'STATUSNAME'
  4792. Required = True
  4793. Size = 100
  4794. end
  4795. object ADQuery13EVENTTYPE: TStringField
  4796. DisplayLabel = #1058#1080#1087' '#1085#1072#1088#1091#1096#1077#1085#1080#1103
  4797. FieldName = 'EVENTTYPE'
  4798. Size = 500
  4799. end
  4800. object ADQuery13COLLECTTYPE: TStringField
  4801. DisplayLabel = #1042#1080#1076' '#1074#1079#1099#1089#1082#1072#1085#1080#1103
  4802. FieldName = 'COLLECTTYPE'
  4803. Size = 500
  4804. end
  4805. object ADQuery13EMPLOYEEID: TFMTBCDField
  4806. FieldName = 'EMPLOYEEID'
  4807. end
  4808. end
  4809. object DataSource13: TDataSource
  4810. DataSet = ADQuery13
  4811. Left = 512
  4812. Top = 240
  4813. end
  4814. object ADQuery14: TADQuery
  4815. MasterSource = DataSource10
  4816. MasterFields = 'ID'
  4817. Connection = DataModule1.ADConnection1
  4818. SQL.Strings = (
  4819. 'select * from HR_V_INSURANCE t'
  4820. 'where t.citezenid=:ID')
  4821. Left = 480
  4822. Top = 208
  4823. ParamData = <
  4824. item
  4825. Name = 'ID'
  4826. DataType = ftInteger
  4827. ParamType = ptInput
  4828. Value = 1806751
  4829. end>
  4830. object ADQuery14ID: TFMTBCDField
  4831. FieldName = 'ID'
  4832. Required = True
  4833. end
  4834. object ADQuery14CITEZENID: TFMTBCDField
  4835. FieldName = 'CITEZENID'
  4836. end
  4837. object ADQuery14STATUSID: TFMTBCDField
  4838. FieldName = 'STATUSID'
  4839. end
  4840. object ADQuery14CHAGESTATUSDATE: TDateTimeField
  4841. DisplayLabel = #1044#1072#1090#1072' '#1089#1084#1077#1085#1099' '#1089#1090#1072#1090#1091#1089#1072
  4842. FieldName = 'CHAGESTATUSDATE'
  4843. end
  4844. object ADQuery14DOCNUMB: TStringField
  4845. DisplayLabel = #1053#1086#1084#1077#1088' '#1087#1086#1083#1080#1089#1072
  4846. FieldName = 'DOCNUMB'
  4847. Size = 50
  4848. end
  4849. object ADQuery14DELIVERYDATE: TDateTimeField
  4850. DisplayLabel = #1044#1072#1090#1072' '#1074#1099#1076#1072#1095#1080
  4851. FieldName = 'DELIVERYDATE'
  4852. end
  4853. object ADQuery14STATUSNAME: TStringField
  4854. DisplayLabel = #1057#1090#1072#1090#1091#1089
  4855. FieldName = 'STATUSNAME'
  4856. Size = 100
  4857. end
  4858. object ADQuery14COMPANY: TStringField
  4859. DisplayLabel = #1050#1086#1084#1087#1072#1085#1080#1103
  4860. FieldName = 'COMPANY'
  4861. Size = 500
  4862. end
  4863. object ADQuery14DOCTYPE: TStringField
  4864. DisplayLabel = #1058#1080#1087' '#1087#1086#1083#1080#1089#1072
  4865. FieldName = 'DOCTYPE'
  4866. Size = 500
  4867. end
  4868. object ADQuery14SERVICE: TStringField
  4869. DisplayLabel = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1086#1073#1089#1083#1091#1078'.'
  4870. FieldName = 'SERVICE'
  4871. Size = 500
  4872. end
  4873. end
  4874. object DataSource14: TDataSource
  4875. DataSet = ADQuery14
  4876. Left = 480
  4877. Top = 240
  4878. end
  4879. object ADStoredProc1: TADStoredProc
  4880. Connection = DataModule1.ADConnection1
  4881. StoredProcName = 'HR_SICKLIST_COUNT'
  4882. Left = 744
  4883. Top = 624
  4884. ParamData = <
  4885. item
  4886. Name = 'STAGDATE'
  4887. DataType = ftTimeStamp
  4888. ADDataType = dtDateTimeStamp
  4889. ParamType = ptInput
  4890. end
  4891. item
  4892. Name = 'SICKDATE'
  4893. DataType = ftTimeStamp
  4894. ADDataType = dtDateTimeStamp
  4895. ParamType = ptInput
  4896. end
  4897. item
  4898. Name = 'DD'
  4899. DataType = ftString
  4900. ADDataType = dtAnsiString
  4901. ParamType = ptOutput
  4902. end
  4903. item
  4904. Name = 'MM'
  4905. DataType = ftString
  4906. ADDataType = dtAnsiString
  4907. ParamType = ptOutput
  4908. end
  4909. item
  4910. Name = 'YY'
  4911. DataType = ftString
  4912. ADDataType = dtAnsiString
  4913. ParamType = ptOutput
  4914. end>
  4915. end
  4916. object PKDBTable5: TPKDBTable
  4917. Fields = <
  4918. item
  4919. FieldName = 'STRUCTUREID'
  4920. FieldLabel = #1044#1086#1083#1078#1085#1086#1089#1090#1100
  4921. Nullable = True
  4922. FieldType = ftsNumber
  4923. ReferencingTable = 'CS_SCHEDULE_STRUCTURE'
  4924. ReferencingColumn = 'ID'
  4925. IsPrimaryKey = True
  4926. DisplayName = 'STRUCTUREID'
  4927. end
  4928. item
  4929. FieldName = 'HARMCONDITIONID'
  4930. FieldLabel = #1042#1088#1077#1076#1085#1086#1089#1090#1100' '#1091#1089#1083#1086#1074#1080#1081' '#1090#1088#1091#1076#1072
  4931. Nullable = True
  4932. FieldType = ftsNumber
  4933. ReferencingTable = 'CS_FACETCONTENT'
  4934. ReferencingColumn = 'ID'
  4935. LookUpRool = ' rowcontent'
  4936. DisplayName = 'HARMCONDITIONID'
  4937. end
  4938. item
  4939. FieldName = 'WORKTIMETYPEID'
  4940. FieldLabel = #1056#1072#1073#1086#1095#1077#1077' '#1074#1088#1077#1084#1103
  4941. Nullable = True
  4942. FieldType = ftsNumber
  4943. ReferencingTable = 'CS_FACETCONTENT'
  4944. ReferencingColumn = 'ID'
  4945. LookUpRool = ' rowcontent'
  4946. DisplayName = 'WORKTIMETYPEID'
  4947. end
  4948. item
  4949. FieldName = 'WORKTIME'
  4950. FieldLabel = #1055#1088#1086#1076#1086#1083#1078#1080#1090#1077#1083#1100#1085#1086#1089#1090#1100' '#1088#1072#1073#1086#1095#1077#1075#1086' '#1074#1088#1077#1084#1077#1085#1080
  4951. Nullable = True
  4952. FieldType = ftsString
  4953. DisplayName = 'WORKTIME'
  4954. end
  4955. item
  4956. FieldName = 'ID'
  4957. Nullable = False
  4958. FieldType = ftsNumber
  4959. DisplayName = 'ID'
  4960. end
  4961. item
  4962. FieldName = 'HARMHOLIDAYS'
  4963. FieldLabel = #1044#1086#1087#1086#1083#1085#1080#1090#1077#1083#1100#1085#1099#1077' '#1076#1085#1080' '#1086#1090#1087#1091#1089#1082#1072
  4964. Nullable = True
  4965. FieldType = ftsString
  4966. DisplayName = 'HARMHOLIDAYS'
  4967. end>
  4968. TableName = 'CS_WORKCONDITION'
  4969. Connection = DataModule1.ADConnection1
  4970. Left = 784
  4971. Top = 624
  4972. end
  4973. object ADStoredProc2: TADStoredProc
  4974. Connection = DataModule1.ADConnection1
  4975. StoredProcName = 'APPROOT.AE_CHANGESTATUS_EMPLOYEE'
  4976. Top = 352
  4977. ParamData = <
  4978. item
  4979. Name = 'OBJECTID'
  4980. DataType = ftFMTBcd
  4981. ADDataType = dtFmtBCD
  4982. Precision = 38
  4983. ParamType = ptInput
  4984. end
  4985. item
  4986. Name = 'OUTDATE'
  4987. DataType = ftTimeStamp
  4988. ADDataType = dtDateTimeStamp
  4989. ParamType = ptInput
  4990. end>
  4991. end
  4992. end