frm_syntheseRH.bas 32 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879
  1. Version =20
  2. VersionRequired =20
  3. Begin Form
  4. DividingLines = NotDefault
  5. OrderByOn = NotDefault
  6. AllowDesignChanges = NotDefault
  7. PictureAlignment =2
  8. DatasheetGridlinesBehavior =3
  9. GridY =10
  10. Width =17348
  11. DatasheetFontHeight =11
  12. ItemSuffix =72
  13. Right =20835
  14. Bottom =10455
  15. DatasheetGridlinesColor =15062992
  16. Filter ="[MoisRH]=1 AND [AnneeRH]=2015"
  17. OrderBy ="frm_syntheseRH.Name"
  18. RecSrcDt = Begin
  19. 0xefb5dcc035d1e440
  20. End
  21. RecordSource ="SELECT r_SyntheseRH_inter.anneeRH, r_SyntheseRH_inter.moisRH, r_SyntheseRH_inter"
  22. ".CodeAgent, r_SyntheseRH_inter.Nom, r_SyntheseRH_inter.SommeDeHeureSup1, r_Synth"
  23. "eseRH_inter.SommeDeHeureSup2, r_SyntheseRH_inter.SommeDeHeureSupDimanche, r_Synt"
  24. "heseRH_inter.SommeDeRepas, r_SyntheseRH_DisTr1.[True] AS DisTr1AVP, r_SyntheseRH"
  25. "_DisTr1.[False] AS DisTr1SVP, r_SynteseRH_DisTr2.[True] AS DisTr2AVP, r_SynteseR"
  26. "H_DisTr2.[False] AS DisTr2SVP FROM r_SynteseRH_DisTr2 INNER JOIN (r_SyntheseRH_D"
  27. "isTr1 INNER JOIN r_SyntheseRH_inter ON (r_SyntheseRH_DisTr1.anneeRH = r_Synthese"
  28. "RH_inter.anneeRH) AND (r_SyntheseRH_DisTr1.moisRH = r_SyntheseRH_inter.moisRH) A"
  29. "ND (r_SyntheseRH_DisTr1.CodeAgent = r_SyntheseRH_inter.CodeAgent)) ON (r_Syntese"
  30. "RH_DisTr2.CodeAgent = r_SyntheseRH_inter.CodeAgent) AND (r_SynteseRH_DisTr2.Mois"
  31. "RH = r_SyntheseRH_inter.moisRH) AND (r_SynteseRH_DisTr2.AnneeRH = r_SyntheseRH_i"
  32. "nter.anneeRH) ORDER BY r_SyntheseRH_inter.anneeRH, r_SyntheseRH_inter.moisRH; "
  33. OnOpen ="[Event Procedure]"
  34. DatasheetFontName ="Calibri"
  35. FilterOnLoad =0
  36. DatasheetBackColor12 =-2147483643
  37. ShowPageMargins =0
  38. DisplayOnSharePointSite =1
  39. DatasheetAlternateBackColor =16053492
  40. DatasheetGridlinesColor12 =15062992
  41. FitToScreen =1
  42. Begin
  43. Begin Label
  44. BackStyle =0
  45. FontSize =11
  46. FontName ="Calibri"
  47. ThemeFontIndex =1
  48. BackThemeColorIndex =1
  49. BorderThemeColorIndex =1
  50. ForeThemeColorIndex =2
  51. ForeTint =60.0
  52. GridlineThemeColorIndex =1
  53. GridlineShade =65.0
  54. End
  55. Begin Rectangle
  56. SpecialEffect =3
  57. BackStyle =0
  58. BorderLineStyle =0
  59. Width =850
  60. Height =850
  61. BorderThemeColorIndex =3
  62. BorderShade =90.0
  63. GridlineThemeColorIndex =1
  64. GridlineShade =65.0
  65. End
  66. Begin CommandButton
  67. Width =1701
  68. Height =283
  69. FontSize =11
  70. FontWeight =400
  71. FontName ="Calibri"
  72. ForeThemeColorIndex =2
  73. ForeShade =50.0
  74. GridlineThemeColorIndex =1
  75. GridlineShade =65.0
  76. BackColor =-2147483633
  77. BorderLineStyle =0
  78. BorderThemeColorIndex =3
  79. BorderShade =90.0
  80. ThemeFontIndex =1
  81. End
  82. Begin TextBox
  83. FELineBreak = NotDefault
  84. BorderLineStyle =0
  85. Width =1701
  86. LabelX =-1701
  87. FontSize =11
  88. FontName ="Calibri"
  89. AsianLineBreak =1
  90. BackThemeColorIndex =1
  91. BorderThemeColorIndex =3
  92. BorderShade =90.0
  93. ThemeFontIndex =1
  94. ForeThemeColorIndex =2
  95. ForeShade =50.0
  96. GridlineThemeColorIndex =1
  97. GridlineShade =65.0
  98. End
  99. Begin ComboBox
  100. BorderLineStyle =0
  101. Width =1701
  102. LabelX =-1701
  103. FontSize =11
  104. FontName ="Calibri"
  105. AllowValueListEdits =1
  106. InheritValueList =1
  107. ThemeFontIndex =1
  108. BackThemeColorIndex =1
  109. BorderThemeColorIndex =3
  110. BorderShade =90.0
  111. ForeThemeColorIndex =2
  112. ForeShade =50.0
  113. GridlineThemeColorIndex =1
  114. GridlineShade =65.0
  115. End
  116. Begin ToggleButton
  117. Width =283
  118. Height =283
  119. FontSize =11
  120. FontWeight =400
  121. FontName ="Calibri"
  122. ForeThemeColorIndex =2
  123. ForeShade =50.0
  124. GridlineThemeColorIndex =1
  125. GridlineShade =65.0
  126. BackColor =15790320
  127. BackThemeColorIndex =6
  128. BackTint =30.0
  129. BorderLineStyle =0
  130. BorderThemeColorIndex =3
  131. BorderShade =90.0
  132. ThemeFontIndex =1
  133. End
  134. Begin FormHeader
  135. Height =1927
  136. BackColor =15527148
  137. Name ="EntêteFormulaire"
  138. AlternateBackThemeColorIndex =1
  139. AlternateBackShade =95.0
  140. Begin
  141. Begin Label
  142. OverlapFlags =85
  143. Left =120
  144. Top =60
  145. Width =4170
  146. Height =330
  147. FontWeight =700
  148. BorderColor =16777215
  149. Name ="Étiquette0"
  150. Caption ="Vue Synthétique des données RH importées"
  151. GridlineColor =10921638
  152. LayoutCachedLeft =120
  153. LayoutCachedTop =60
  154. LayoutCachedWidth =4290
  155. LayoutCachedHeight =390
  156. ForeThemeColorIndex =0
  157. ForeTint =100.0
  158. End
  159. Begin Label
  160. OverlapFlags =93
  161. Left =4365
  162. Top =56
  163. Width =1644
  164. Height =340
  165. BorderColor =16777215
  166. Name ="Étiquette18"
  167. Caption ="pour le mois de:"
  168. GridlineColor =10921638
  169. LayoutCachedLeft =4365
  170. LayoutCachedTop =56
  171. LayoutCachedWidth =6009
  172. LayoutCachedHeight =396
  173. ForeThemeColorIndex =0
  174. ForeTint =100.0
  175. End
  176. Begin ComboBox
  177. RowSourceTypeInt =1
  178. OverlapFlags =215
  179. IMESentenceMode =3
  180. ColumnCount =2
  181. ListWidth =2880
  182. Left =5952
  183. Top =56
  184. Width =1984
  185. Height =315
  186. ColumnOrder =1
  187. BorderColor =12835293
  188. ForeColor =4138256
  189. Name ="lst_mois"
  190. RowSourceType ="Value List"
  191. RowSource ="1;\"Janvier\";2;\"Février\";3;\"Mars\";4;\"Avril\";5;\"Mai\";6;\"Juin\";7;\"Juil"
  192. "let\";8;\"Août\";9;\"Septembre\";10;\"Octobre\";11;\"Novembre\";12;\"Decembre\""
  193. ColumnWidths ="0;2268"
  194. AfterUpdate ="[Event Procedure]"
  195. GridlineColor =10921638
  196. LayoutCachedLeft =5952
  197. LayoutCachedTop =56
  198. LayoutCachedWidth =7936
  199. LayoutCachedHeight =371
  200. End
  201. Begin Label
  202. OverlapFlags =93
  203. Left =8050
  204. Top =56
  205. Width =1644
  206. Height =340
  207. BorderColor =16777215
  208. Name ="Étiquette21"
  209. Caption ="de l'année:"
  210. GridlineColor =10921638
  211. LayoutCachedLeft =8050
  212. LayoutCachedTop =56
  213. LayoutCachedWidth =9694
  214. LayoutCachedHeight =396
  215. ForeThemeColorIndex =0
  216. ForeTint =100.0
  217. End
  218. Begin ComboBox
  219. OverlapFlags =215
  220. IMESentenceMode =3
  221. Left =9354
  222. Top =56
  223. Height =315
  224. ColumnOrder =0
  225. TabIndex =1
  226. BorderColor =12835293
  227. ForeColor =4138256
  228. ColumnInfo ="\"\";\"\";\"3\";\"2\""
  229. Name ="lst_annee"
  230. RowSourceType ="Table/Query"
  231. RowSource ="SELECT Year([DateRH]) AS Annee FROM tbl_ImportRH GROUP BY Year([DateRH]) HAVING "
  232. "(((Year([DateRH]))>=2013)) ORDER BY Year([DateRH]) DESC; "
  233. AfterUpdate ="[Event Procedure]"
  234. GridlineColor =10921638
  235. LayoutCachedLeft =9354
  236. LayoutCachedTop =56
  237. LayoutCachedWidth =11055
  238. LayoutCachedHeight =371
  239. End
  240. Begin CommandButton
  241. OverlapFlags =85
  242. Left =15590
  243. Top =56
  244. Width =621
  245. Height =396
  246. TabIndex =2
  247. ForeColor =4138256
  248. Name ="Commande24"
  249. Caption ="Commande24"
  250. OnClick ="[Event Procedure]"
  251. PictureData = Begin
  252. 0x2800000010000000100000000100040000000000800000000000000000000000 ,
  253. 0x0000000000000000000000000000800000800000008080008000000080008000 ,
  254. 0x8080000080808000c0c0c0000000ff00c0c0c00000ffff00ff000000c0c0c000 ,
  255. 0xffff0000ffffff00ddddd0dddddddddddddd00ddddddddddddd030dddddddddd ,
  256. 0xdd0330dddddddddd0033300000000dddd03330ff0dddddddd03300ff0dddd4dd ,
  257. 0xd03330ff0ddd44ddd03330ff0dd44444d03330ff0d444444d03330ff0dd44444 ,
  258. 0xd0330fff0ddd44ddd030ffff0dddd4ddd00fffff0dddddddd00000000ddddddd ,
  259. 0xdddddddddddddddd000000000000000000000000000000000000000000000000 ,
  260. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  261. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  262. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  263. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  264. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  265. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  266. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  267. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  268. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  269. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  270. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  271. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  272. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  273. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  274. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  275. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  276. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  277. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  278. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  279. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  280. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  281. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  282. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  283. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  284. 0x0000000000000000000000000000000000000000000000000000000000000000 ,
  285. 0x0000000000000000
  286. End
  287. ObjectPalette = Begin
  288. 0x000301000000000000000000
  289. End
  290. ControlTipText ="Fermer formulaire"
  291. GridlineColor =10921638
  292. LayoutCachedLeft =15590
  293. LayoutCachedTop =56
  294. LayoutCachedWidth =16211
  295. LayoutCachedHeight =452
  296. BorderColor =12835293
  297. WebImagePaddingLeft =2
  298. WebImagePaddingTop =2
  299. WebImagePaddingRight =1
  300. WebImagePaddingBottom =1
  301. Overlaps =1
  302. End
  303. Begin Label
  304. FontUnderline = NotDefault
  305. OverlapFlags =93
  306. Left =2892
  307. Top =1043
  308. Width =3315
  309. Height =315
  310. BorderColor =16777215
  311. Name ="Étiquette39"
  312. Caption ="Total des Heures Supplémentaires:"
  313. GridlineColor =10921638
  314. LayoutCachedLeft =2892
  315. LayoutCachedTop =1043
  316. LayoutCachedWidth =6207
  317. LayoutCachedHeight =1358
  318. ForeThemeColorIndex =0
  319. ForeTint =100.0
  320. End
  321. Begin Label
  322. OverlapFlags =93
  323. Left =4876
  324. Top =1429
  325. Width =1020
  326. Height =315
  327. BorderColor =16777215
  328. Name ="SÉtiquette40"
  329. Caption ="Dimanche"
  330. GridlineColor =10921638
  331. LayoutCachedLeft =4876
  332. LayoutCachedTop =1429
  333. LayoutCachedWidth =5896
  334. LayoutCachedHeight =1744
  335. ForeThemeColorIndex =0
  336. ForeTint =100.0
  337. End
  338. Begin Label
  339. FontUnderline = NotDefault
  340. OverlapFlags =93
  341. Left =6577
  342. Top =1032
  343. Width =1575
  344. Height =315
  345. BorderColor =16777215
  346. Name ="SÉtiquette41"
  347. Caption ="Total des Repas:"
  348. GridlineColor =10921638
  349. LayoutCachedLeft =6577
  350. LayoutCachedTop =1032
  351. LayoutCachedWidth =8152
  352. LayoutCachedHeight =1347
  353. ForeThemeColorIndex =0
  354. ForeTint =100.0
  355. End
  356. Begin Label
  357. FontUnderline = NotDefault
  358. OverlapFlags =93
  359. TextAlign =2
  360. Left =10148
  361. Top =1021
  362. Width =5445
  363. Height =390
  364. BorderColor =16777215
  365. Name ="SÉtiquette42"
  366. Caption ="Distance totale parcourue (avec/sans véhicule personnel):"
  367. GridlineColor =10921638
  368. LayoutCachedLeft =10148
  369. LayoutCachedTop =1021
  370. LayoutCachedWidth =15593
  371. LayoutCachedHeight =1411
  372. ForeThemeColorIndex =0
  373. ForeTint =100.0
  374. End
  375. Begin Label
  376. OverlapFlags =93
  377. Left =8730
  378. Top =1477
  379. Width =1875
  380. Height =315
  381. BorderColor =16777215
  382. Name ="SÉtiquette43"
  383. Caption ="Tranche 1 (avec VP)"
  384. GridlineColor =10921638
  385. LayoutCachedLeft =8730
  386. LayoutCachedTop =1477
  387. LayoutCachedWidth =10605
  388. LayoutCachedHeight =1792
  389. ForeThemeColorIndex =0
  390. ForeTint =100.0
  391. End
  392. Begin Label
  393. OverlapFlags =93
  394. Left =4080
  395. Top =1440
  396. Width =675
  397. Height =315
  398. BorderColor =16777215
  399. Name ="SÉtiquette44"
  400. Caption ="Type 2"
  401. GridlineColor =10921638
  402. LayoutCachedLeft =4080
  403. LayoutCachedTop =1440
  404. LayoutCachedWidth =4755
  405. LayoutCachedHeight =1755
  406. ForeThemeColorIndex =0
  407. ForeTint =100.0
  408. End
  409. Begin Rectangle
  410. OverlapFlags =223
  411. Left =2381
  412. Top =908
  413. Width =4080
  414. Height =946
  415. BorderColor =12835293
  416. Name ="Boîte45"
  417. GridlineColor =10921638
  418. LayoutCachedLeft =2381
  419. LayoutCachedTop =908
  420. LayoutCachedWidth =6461
  421. LayoutCachedHeight =1854
  422. End
  423. Begin Rectangle
  424. OverlapFlags =223
  425. Left =6459
  426. Top =907
  427. Width =1875
  428. Height =946
  429. BorderColor =12835293
  430. Name ="Boîte46"
  431. GridlineColor =10921638
  432. LayoutCachedLeft =6459
  433. LayoutCachedTop =907
  434. LayoutCachedWidth =8334
  435. LayoutCachedHeight =1853
  436. End
  437. Begin Rectangle
  438. OverlapFlags =223
  439. Left =8334
  440. Top =907
  441. Width =8670
  442. Height =946
  443. BorderColor =12835293
  444. Name ="Boîte47"
  445. GridlineColor =10921638
  446. LayoutCachedLeft =8334
  447. LayoutCachedTop =907
  448. LayoutCachedWidth =17004
  449. LayoutCachedHeight =1853
  450. End
  451. Begin Label
  452. OverlapFlags =215
  453. Left =3289
  454. Top =1440
  455. Width =675
  456. Height =315
  457. BorderColor =16777215
  458. Name ="Étiquette48"
  459. Caption ="Type 1"
  460. GridlineColor =10921638
  461. LayoutCachedLeft =3289
  462. LayoutCachedTop =1440
  463. LayoutCachedWidth =3964
  464. LayoutCachedHeight =1755
  465. ForeThemeColorIndex =0
  466. ForeTint =100.0
  467. End
  468. Begin Label
  469. OverlapFlags =93
  470. Left =340
  471. Top =1021
  472. Width =840
  473. Height =315
  474. BorderColor =16777215
  475. Name ="Étiquette50"
  476. Caption ="Agent:"
  477. GridlineColor =10921638
  478. LayoutCachedLeft =340
  479. LayoutCachedTop =1021
  480. LayoutCachedWidth =1180
  481. LayoutCachedHeight =1336
  482. ForeThemeColorIndex =0
  483. ForeTint =100.0
  484. End
  485. Begin Rectangle
  486. OverlapFlags =215
  487. Left =56
  488. Top =907
  489. Width =2336
  490. Height =946
  491. BorderColor =12835293
  492. Name ="Boîte51"
  493. GridlineColor =10921638
  494. LayoutCachedLeft =56
  495. LayoutCachedTop =907
  496. LayoutCachedWidth =2392
  497. LayoutCachedHeight =1853
  498. End
  499. Begin Label
  500. OverlapFlags =215
  501. Left =10710
  502. Top =1477
  503. Width =1860
  504. Height =345
  505. BorderColor =16777215
  506. Name ="SÉtiquette68"
  507. Caption ="Tranche 1 (sans VP)"
  508. GridlineColor =10921638
  509. LayoutCachedLeft =10710
  510. LayoutCachedTop =1477
  511. LayoutCachedWidth =12570
  512. LayoutCachedHeight =1822
  513. ForeThemeColorIndex =0
  514. ForeTint =100.0
  515. End
  516. Begin Label
  517. OverlapFlags =215
  518. Left =12867
  519. Top =1474
  520. Width =1875
  521. Height =315
  522. BorderColor =16777215
  523. Name ="SÉtiquette69"
  524. Caption ="Tranche 2 (avec VP)"
  525. GridlineColor =10921638
  526. LayoutCachedLeft =12867
  527. LayoutCachedTop =1474
  528. LayoutCachedWidth =14742
  529. LayoutCachedHeight =1789
  530. ForeThemeColorIndex =0
  531. ForeTint =100.0
  532. End
  533. Begin Label
  534. OverlapFlags =215
  535. Left =14847
  536. Top =1474
  537. Width =1860
  538. Height =345
  539. BorderColor =16777215
  540. Name ="Étiquette70"
  541. Caption ="Tranche 2 (sans VP)"
  542. GridlineColor =10921638
  543. LayoutCachedLeft =14847
  544. LayoutCachedTop =1474
  545. LayoutCachedWidth =16707
  546. LayoutCachedHeight =1819
  547. ForeThemeColorIndex =0
  548. ForeTint =100.0
  549. End
  550. Begin CommandButton
  551. OverlapFlags =85
  552. Left =113
  553. Top =453
  554. Width =3167
  555. Height =343
  556. TabIndex =3
  557. ForeColor =4138256
  558. Name ="Commande71"
  559. Caption ="Revenir à l'affichage standard"
  560. OnClick ="[Event Procedure]"
  561. GridlineColor =10921638
  562. LayoutCachedLeft =113
  563. LayoutCachedTop =453
  564. LayoutCachedWidth =3280
  565. LayoutCachedHeight =796
  566. BorderColor =12835293
  567. WebImagePaddingLeft =2
  568. WebImagePaddingTop =2
  569. WebImagePaddingRight =1
  570. WebImagePaddingBottom =1
  571. End
  572. End
  573. End
  574. Begin Section
  575. Height =566
  576. BackColor =15527148
  577. Name ="Détail"
  578. AlternateBackColor =15921906
  579. AlternateBackThemeColorIndex =1
  580. AlternateBackShade =95.0
  581. Begin
  582. Begin TextBox
  583. OverlapFlags =93
  584. IMESentenceMode =3
  585. Left =3284
  586. Top =117
  587. Width =561
  588. Height =315
  589. BorderColor =12835293
  590. ForeColor =4138256
  591. Name ="Texte55"
  592. ControlSource ="SommeDeHeureSup1"
  593. GridlineColor =10921638
  594. LayoutCachedLeft =3284
  595. LayoutCachedTop =117
  596. LayoutCachedWidth =3845
  597. LayoutCachedHeight =432
  598. End
  599. Begin TextBox
  600. OverlapFlags =93
  601. IMESentenceMode =3
  602. Left =4134
  603. Top =117
  604. Width =561
  605. Height =315
  606. TabIndex =1
  607. BorderColor =12835293
  608. ForeColor =4138256
  609. Name ="Texte56"
  610. ControlSource ="SommeDeHeureSup2"
  611. GridlineColor =10921638
  612. LayoutCachedLeft =4134
  613. LayoutCachedTop =117
  614. LayoutCachedWidth =4695
  615. LayoutCachedHeight =432
  616. End
  617. Begin TextBox
  618. OverlapFlags =93
  619. IMESentenceMode =3
  620. Left =4985
  621. Top =117
  622. Width =561
  623. Height =315
  624. TabIndex =2
  625. BorderColor =12835293
  626. ForeColor =4138256
  627. Name ="Texte57"
  628. ControlSource ="SommeDeHeureSupDimanche"
  629. GridlineColor =10921638
  630. LayoutCachedLeft =4985
  631. LayoutCachedTop =117
  632. LayoutCachedWidth =5546
  633. LayoutCachedHeight =432
  634. End
  635. Begin TextBox
  636. OverlapFlags =93
  637. IMESentenceMode =3
  638. Left =6932
  639. Top =112
  640. Width =876
  641. Height =315
  642. TabIndex =3
  643. BorderColor =12835293
  644. ForeColor =4138256
  645. Name ="Texte58"
  646. ControlSource ="SommeDeRepas"
  647. GridlineColor =10921638
  648. LayoutCachedLeft =6932
  649. LayoutCachedTop =112
  650. LayoutCachedWidth =7808
  651. LayoutCachedHeight =427
  652. End
  653. Begin TextBox
  654. OverlapFlags =93
  655. IMESentenceMode =3
  656. Left =9236
  657. Top =113
  658. Width =861
  659. Height =315
  660. TabIndex =4
  661. BorderColor =12835293
  662. ForeColor =4138256
  663. Name ="Texte59"
  664. ControlSource ="DisTr1AVP"
  665. GridlineColor =10921638
  666. LayoutCachedLeft =9236
  667. LayoutCachedTop =113
  668. LayoutCachedWidth =10097
  669. LayoutCachedHeight =428
  670. End
  671. Begin TextBox
  672. OverlapFlags =93
  673. IMESentenceMode =3
  674. Left =11218
  675. Top =112
  676. Width =966
  677. Height =315
  678. TabIndex =5
  679. BorderColor =12835293
  680. ForeColor =4138256
  681. Name ="Texte60"
  682. ControlSource ="DisTr1SVP"
  683. GridlineColor =10921638
  684. LayoutCachedLeft =11218
  685. LayoutCachedTop =112
  686. LayoutCachedWidth =12184
  687. LayoutCachedHeight =427
  688. End
  689. Begin TextBox
  690. OverlapFlags =93
  691. IMESentenceMode =3
  692. Left =13088
  693. Top =112
  694. Width =921
  695. Height =315
  696. TabIndex =6
  697. BorderColor =12835293
  698. ForeColor =4138256
  699. Name ="Texte61"
  700. ControlSource ="DisTr2AVP"
  701. GridlineColor =10921638
  702. LayoutCachedLeft =13088
  703. LayoutCachedTop =112
  704. LayoutCachedWidth =14009
  705. LayoutCachedHeight =427
  706. End
  707. Begin TextBox
  708. OverlapFlags =93
  709. IMESentenceMode =3
  710. Left =15460
  711. Top =112
  712. Width =906
  713. Height =315
  714. TabIndex =7
  715. BorderColor =12835293
  716. ForeColor =4138256
  717. Name ="Texte62"
  718. ControlSource ="DisTr2SVP"
  719. GridlineColor =10921638
  720. LayoutCachedLeft =15460
  721. LayoutCachedTop =112
  722. LayoutCachedWidth =16366
  723. LayoutCachedHeight =427
  724. End
  725. Begin TextBox
  726. OverlapFlags =93
  727. IMESentenceMode =3
  728. Left =109
  729. Top =117
  730. Width =2106
  731. Height =315
  732. TabIndex =8
  733. BorderColor =12835293
  734. ForeColor =4138256
  735. Name ="Texte63"
  736. ControlSource ="Nom"
  737. StatusBarText ="Libelle de l'équipe"
  738. GridlineColor =10921638
  739. LayoutCachedLeft =109
  740. LayoutCachedTop =117
  741. LayoutCachedWidth =2215
  742. LayoutCachedHeight =432
  743. End
  744. Begin Rectangle
  745. OverlapFlags =255
  746. Left =56
  747. Top =61
  748. Width =2265
  749. Height =451
  750. BorderColor =12835293
  751. Name ="Boîte64"
  752. GridlineColor =10921638
  753. LayoutCachedLeft =56
  754. LayoutCachedTop =61
  755. LayoutCachedWidth =2321
  756. LayoutCachedHeight =512
  757. End
  758. Begin Rectangle
  759. OverlapFlags =255
  760. Left =2319
  761. Top =56
  762. Width =4140
  763. Height =451
  764. BorderColor =12835293
  765. Name ="Boîte65"
  766. GridlineColor =10921638
  767. LayoutCachedLeft =2319
  768. LayoutCachedTop =56
  769. LayoutCachedWidth =6459
  770. LayoutCachedHeight =507
  771. End
  772. Begin Rectangle
  773. OverlapFlags =255
  774. Left =6462
  775. Top =56
  776. Width =1860
  777. Height =451
  778. BorderColor =12835293
  779. Name ="Boîte66"
  780. GridlineColor =10921638
  781. LayoutCachedLeft =6462
  782. LayoutCachedTop =56
  783. LayoutCachedWidth =8322
  784. LayoutCachedHeight =507
  785. End
  786. Begin Rectangle
  787. OverlapFlags =247
  788. Left =8329
  789. Top =56
  790. Width =8670
  791. Height =451
  792. BorderColor =12835293
  793. Name ="Boîte67"
  794. GridlineColor =10921638
  795. LayoutCachedLeft =8329
  796. LayoutCachedTop =56
  797. LayoutCachedWidth =16999
  798. LayoutCachedHeight =507
  799. End
  800. End
  801. End
  802. Begin FormFooter
  803. Height =0
  804. Name ="PiedFormulaire"
  805. AlternateBackThemeColorIndex =1
  806. AlternateBackShade =95.0
  807. BackThemeColorIndex =1
  808. End
  809. End
  810. End
  811. CodeBehindForm
  812. Attribute VB_GlobalNameSpace = False
  813. Attribute VB_Creatable = True
  814. Attribute VB_PredeclaredId = True
  815. Attribute VB_Exposed = False
  816. Option Compare Database
  817. Private Sub Commande71_Click()
  818. DoCmd.Close acForm, "frm_syntheseRH"
  819. End Sub
  820. Private Sub Form_Open(Cancel As Integer)
  821. Me.lst_annee = forms![frm_donneesRH].lst_annee.Column(0)
  822. Me.lst_mois = forms![frm_donneesRH].lst_mois.Column(0)
  823. filtreRH
  824. Me.Refresh
  825. End Sub
  826. Private Sub lst_annee_AfterUpdate()
  827. filtreRH
  828. End Sub
  829. Private Sub lst_mois_AfterUpdate()
  830. filtreRH
  831. End Sub
  832. Public Sub filtreRH()
  833. Dim filtre As String
  834. If Me.lst_annee > 2000 And Me.lst_mois <= 12 And Me.lst_mois > 0 Then
  835. filtre = "[MoisRH]=" & Me.lst_mois.Column(0) & " AND [AnneeRH]=" & Me.lst_annee.Column(0)
  836. Me.Filter = filtre
  837. Me.FilterOn = True
  838. End If
  839. End Sub
  840. Private Sub Commande24_Click()
  841. On Error GoTo Err_Commande24_Click
  842. DoCmd.Close acForm, "frm_DonneesRH"
  843. If Me.Dirty Then Me.Dirty = False
  844. DoCmd.Close
  845. Exit_Commande24_Click:
  846. Exit Sub
  847. Err_Commande24_Click:
  848. MsgBox err.Description
  849. Resume Exit_Commande24_Click
  850. End Sub