Et_BordHS.bas 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448
  1. Version =20
  2. VersionRequired =20
  3. Begin Report
  4. LayoutForPrint = NotDefault
  5. DividingLines = NotDefault
  6. OrderByOn = NotDefault
  7. AllowDesignChanges = NotDefault
  8. DateGrouping =1
  9. GrpKeepTogether =1
  10. PictureAlignment =2
  11. DatasheetGridlinesBehavior =3
  12. GridY =10
  13. Width =10828
  14. DatasheetFontHeight =11
  15. ItemSuffix =25
  16. DatasheetGridlinesColor =14806254
  17. Filter ="[MoisRH]=12 AND [AnneeRH]=2013"
  18. OrderBy ="[Nom]"
  19. RecSrcDt = Begin
  20. 0x273893828c56e440
  21. End
  22. RecordSource ="SELECT tbl_FormHS.MoisRH, tbl_FormHS.AnneeRH, tbl_FormHS.CodeAgent, r_Agents.Nom"
  23. ", Sum(tbl_FormHS.[HeureSup1<=14]) AS [SommeDeHeureSup1<=14], Sum(tbl_FormHS.[Heu"
  24. "reSup1>14]) AS [SommeDeHeureSup1>14], Sum(tbl_FormHS.HeureSupNuit) AS SommeDeHeu"
  25. "reSupNuit, Sum(tbl_FormHS.HeureSupDim) AS SommeDeHeureSupDim, tbl_FormHS.Valide,"
  26. " tbl_SuiviRH.Edite, r_Agents.Grade, r_Agents.Matricule FROM tbl_SuiviRH INNER JO"
  27. "IN (r_Agents INNER JOIN tbl_FormHS ON r_Agents.CodeAgent = tbl_FormHS.CodeAgent)"
  28. " ON tbl_SuiviRH.IDSuivi = tbl_FormHS.IDSuivi GROUP BY tbl_FormHS.MoisRH, tbl_For"
  29. "mHS.AnneeRH, tbl_FormHS.CodeAgent, r_Agents.Nom, tbl_FormHS.Valide, tbl_SuiviRH."
  30. "Edite, r_Agents.Grade, r_Agents.Matricule HAVING (((tbl_FormHS.Valide)=True) AND"
  31. " ((tbl_SuiviRH.Edite)=True) AND ((r_Agents.Grade) Not Like '*' & 'OPA' & '*')) O"
  32. "RDER BY r_Agents.Nom; "
  33. OnOpen ="[Event Procedure]"
  34. DatasheetFontName ="Calibri"
  35. PrtMip = Begin
  36. 0xf801000038040000f801000038040000000000004c2a00003b01000001000000 ,
  37. 0x010000006801000000000000a10700000100000001000000
  38. End
  39. FilterOnLoad =0
  40. FitToPage =1
  41. DisplayOnSharePointSite =1
  42. DatasheetAlternateBackColor =15921906
  43. DatasheetGridlinesColor12 =0
  44. FitToScreen =1
  45. DatasheetBackThemeColorIndex =1
  46. BorderThemeColorIndex =3
  47. ThemeFontIndex =1
  48. ForeThemeColorIndex =0
  49. AlternateBackThemeColorIndex =1
  50. AlternateBackShade =95.0
  51. Begin
  52. Begin Label
  53. BackStyle =0
  54. FontSize =11
  55. FontName ="Calibri"
  56. ThemeFontIndex =1
  57. BackThemeColorIndex =1
  58. BorderThemeColorIndex =0
  59. BorderTint =50.0
  60. ForeThemeColorIndex =0
  61. ForeTint =50.0
  62. GridlineThemeColorIndex =1
  63. GridlineShade =65.0
  64. End
  65. Begin TextBox
  66. AddColon = NotDefault
  67. FELineBreak = NotDefault
  68. BorderLineStyle =0
  69. Width =1701
  70. LabelX =-1701
  71. FontSize =11
  72. FontName ="Calibri"
  73. AsianLineBreak =1
  74. ShowDatePicker =0
  75. BackThemeColorIndex =1
  76. BorderThemeColorIndex =1
  77. BorderShade =65.0
  78. ThemeFontIndex =1
  79. ForeThemeColorIndex =0
  80. ForeTint =75.0
  81. GridlineThemeColorIndex =1
  82. GridlineShade =65.0
  83. End
  84. Begin FormHeader
  85. KeepTogether = NotDefault
  86. Height =1077
  87. Name ="EntêteÉtat"
  88. AlternateBackThemeColorIndex =1
  89. AlternateBackShade =95.0
  90. Begin
  91. Begin Label
  92. TextAlign =2
  93. Left =623
  94. Width =8535
  95. Height =390
  96. FontSize =14
  97. FontWeight =700
  98. BorderColor =8355711
  99. Name ="Étiquette0"
  100. Caption ="BORDEREAU MENSUEL: HEURES SUPPLEMENTAIRES"
  101. GridlineColor =10921638
  102. LayoutCachedLeft =623
  103. LayoutCachedWidth =9158
  104. LayoutCachedHeight =390
  105. ForeTint =100.0
  106. End
  107. Begin TextBox
  108. OldBorderStyle =0
  109. TextAlign =3
  110. IMESentenceMode =3
  111. Left =2777
  112. Top =453
  113. Width =2166
  114. Height =315
  115. ColumnOrder =0
  116. FontSize =13
  117. BorderColor =10921638
  118. ForeColor =4210752
  119. Name ="txtMoisRH"
  120. ControlSource ="=UCase(MonthName([MoisRH]))"
  121. GridlineColor =10921638
  122. LayoutCachedLeft =2777
  123. LayoutCachedTop =453
  124. LayoutCachedWidth =4943
  125. LayoutCachedHeight =768
  126. End
  127. Begin TextBox
  128. OldBorderStyle =0
  129. TextAlign =1
  130. IMESentenceMode =3
  131. Left =5283
  132. Top =453
  133. Height =315
  134. ColumnOrder =1
  135. FontSize =13
  136. TabIndex =1
  137. BorderColor =10921638
  138. ForeColor =4210752
  139. Name ="AnneeRH"
  140. ControlSource ="AnneeRH"
  141. GridlineColor =10921638
  142. LayoutCachedLeft =5283
  143. LayoutCachedTop =453
  144. LayoutCachedWidth =6984
  145. LayoutCachedHeight =768
  146. End
  147. End
  148. End
  149. Begin PageHeader
  150. Height =2050
  151. Name ="ZoneEntêtePage"
  152. AlternateBackThemeColorIndex =1
  153. AlternateBackShade =95.0
  154. BackThemeColorIndex =1
  155. Begin
  156. Begin Label
  157. OldBorderStyle =1
  158. TextAlign =2
  159. Left =4028
  160. Top =685
  161. Width =1650
  162. Height =1365
  163. BorderColor =8355711
  164. Name ="Étiquette7"
  165. Caption ="Nombre d'heures accomplies au cours d'un mois <=14H"
  166. GridlineColor =10921638
  167. LayoutCachedLeft =4028
  168. LayoutCachedTop =685
  169. LayoutCachedWidth =5678
  170. LayoutCachedHeight =2050
  171. ForeTint =100.0
  172. End
  173. Begin Label
  174. OldBorderStyle =1
  175. TextAlign =2
  176. Left =5678
  177. Top =685
  178. Width =1650
  179. Height =1365
  180. BorderColor =8355711
  181. Name ="Étiquette8"
  182. Caption ="Nombre d'heures accomplies au cours d'un mois >14H"
  183. GridlineColor =10921638
  184. LayoutCachedLeft =5678
  185. LayoutCachedTop =685
  186. LayoutCachedWidth =7328
  187. LayoutCachedHeight =2050
  188. ForeTint =100.0
  189. End
  190. Begin Label
  191. OldBorderStyle =1
  192. TextAlign =2
  193. Left =7328
  194. Top =685
  195. Width =1620
  196. Height =1365
  197. BorderColor =8355711
  198. Name ="Étiquette9"
  199. Caption ="Nombre d'heures accomplies de 22H à 7H"
  200. GridlineColor =10921638
  201. LayoutCachedLeft =7328
  202. LayoutCachedTop =685
  203. LayoutCachedWidth =8948
  204. LayoutCachedHeight =2050
  205. ForeTint =100.0
  206. End
  207. Begin Label
  208. OldBorderStyle =1
  209. TextAlign =2
  210. Left =8957
  211. Top =685
  212. Width =1665
  213. Height =1365
  214. BorderColor =8355711
  215. Name ="Étiquette10"
  216. Caption ="Nombre d'heures Dimanche et jours de fête"
  217. GridlineColor =10921638
  218. LayoutCachedLeft =8957
  219. LayoutCachedTop =685
  220. LayoutCachedWidth =10622
  221. LayoutCachedHeight =2050
  222. ForeTint =100.0
  223. End
  224. Begin Label
  225. OldBorderStyle =1
  226. TextAlign =2
  227. Left =4028
  228. Top =340
  229. Width =6585
  230. Height =345
  231. BorderColor =8355711
  232. Name ="Étiquette12"
  233. Caption ="TOTAL DES HEURES"
  234. GridlineColor =10921638
  235. LayoutCachedLeft =4028
  236. LayoutCachedTop =340
  237. LayoutCachedWidth =10613
  238. LayoutCachedHeight =685
  239. ForeTint =100.0
  240. End
  241. Begin Label
  242. OldBorderStyle =1
  243. TextAlign =2
  244. Left =56
  245. Top =1323
  246. Width =1089
  247. Height =727
  248. BorderColor =8355711
  249. Name ="Étiquette4"
  250. Caption ="Matricule Agent"
  251. GridlineColor =10921638
  252. LayoutCachedLeft =56
  253. LayoutCachedTop =1323
  254. LayoutCachedWidth =1145
  255. LayoutCachedHeight =2050
  256. ForeTint =100.0
  257. End
  258. Begin Label
  259. OldBorderStyle =1
  260. TextAlign =2
  261. Left =1145
  262. Top =1323
  263. Width =2883
  264. Height =727
  265. BorderColor =8355711
  266. Name ="Étiquette5"
  267. Caption ="Nom"
  268. GridlineColor =10921638
  269. LayoutCachedLeft =1145
  270. LayoutCachedTop =1323
  271. LayoutCachedWidth =4028
  272. LayoutCachedHeight =2050
  273. ForeTint =100.0
  274. End
  275. End
  276. End
  277. Begin Section
  278. KeepTogether = NotDefault
  279. Height =315
  280. Name ="Détail"
  281. AlternateBackColor =16777215
  282. BackThemeColorIndex =1
  283. Begin
  284. Begin TextBox
  285. IMESentenceMode =3
  286. Left =1145
  287. Width =2883
  288. Height =315
  289. ForeColor =4210752
  290. Name ="Nom"
  291. ControlSource ="Nom"
  292. GridlineColor =10921638
  293. LayoutCachedLeft =1145
  294. LayoutCachedWidth =4028
  295. LayoutCachedHeight =315
  296. BorderThemeColorIndex =0
  297. BorderShade =100.0
  298. End
  299. Begin TextBox
  300. DecimalPlaces =0
  301. IMESentenceMode =3
  302. Left =4039
  303. Width =1650
  304. Height =315
  305. TabIndex =1
  306. ForeColor =4210752
  307. Name ="SommeDeHeureSup1<=14"
  308. ControlSource ="SommeDeHeureSup1<=14"
  309. Format ="Standard"
  310. EventProcPrefix ="SommeDeHeureSup1__14"
  311. GridlineColor =10921638
  312. LayoutCachedLeft =4039
  313. LayoutCachedWidth =5689
  314. LayoutCachedHeight =315
  315. BorderThemeColorIndex =0
  316. BorderShade =100.0
  317. End
  318. Begin TextBox
  319. DecimalPlaces =0
  320. IMESentenceMode =3
  321. Left =5678
  322. Width =1650
  323. Height =315
  324. TabIndex =2
  325. ForeColor =4210752
  326. Name ="SommeDeHeureSup1>14"
  327. ControlSource ="SommeDeHeureSup1>14"
  328. Format ="Standard"
  329. EventProcPrefix ="SommeDeHeureSup1_14"
  330. GridlineColor =10921638
  331. LayoutCachedLeft =5678
  332. LayoutCachedWidth =7328
  333. LayoutCachedHeight =315
  334. BorderThemeColorIndex =0
  335. BorderShade =100.0
  336. End
  337. Begin TextBox
  338. DecimalPlaces =0
  339. IMESentenceMode =3
  340. Left =7327
  341. Width =1621
  342. Height =315
  343. TabIndex =3
  344. ForeColor =4210752
  345. Name ="SommeDeHeureSupNuit"
  346. ControlSource ="SommeDeHeureSupNuit"
  347. Format ="Standard"
  348. GridlineColor =10921638
  349. LayoutCachedLeft =7327
  350. LayoutCachedWidth =8948
  351. LayoutCachedHeight =315
  352. BorderThemeColorIndex =0
  353. BorderShade =100.0
  354. End
  355. Begin TextBox
  356. DecimalPlaces =0
  357. IMESentenceMode =3
  358. Left =8957
  359. Width =1665
  360. Height =315
  361. TabIndex =4
  362. ForeColor =4210752
  363. Name ="SommeDeHeureSupDim"
  364. ControlSource ="SommeDeHeureSupDim"
  365. Format ="Standard"
  366. GridlineColor =10921638
  367. LayoutCachedLeft =8957
  368. LayoutCachedWidth =10622
  369. LayoutCachedHeight =315
  370. BorderThemeColorIndex =0
  371. BorderShade =100.0
  372. End
  373. Begin TextBox
  374. IMESentenceMode =3
  375. Left =58
  376. Width =1071
  377. Height =315
  378. TabIndex =5
  379. ForeColor =4210752
  380. Name ="Matricule"
  381. ControlSource ="Matricule"
  382. GridlineColor =10921638
  383. LayoutCachedLeft =58
  384. LayoutCachedWidth =1129
  385. LayoutCachedHeight =315
  386. BorderThemeColorIndex =0
  387. BorderShade =100.0
  388. End
  389. End
  390. End
  391. Begin PageFooter
  392. Height =428
  393. Name ="ZonePiedPage"
  394. AlternateBackThemeColorIndex =1
  395. AlternateBackShade =95.0
  396. BackThemeColorIndex =1
  397. Begin
  398. Begin TextBox
  399. OldBorderStyle =0
  400. TextAlign =3
  401. BackStyle =0
  402. IMESentenceMode =3
  403. Left =7086
  404. Top =56
  405. Width =3600
  406. Height =315
  407. BorderColor =10921638
  408. ForeColor =4210752
  409. Name ="Texte17"
  410. ControlSource ="=\"Page \" & [Page] & \" sur \" & [Pages]"
  411. GridlineColor =10921638
  412. LayoutCachedLeft =7086
  413. LayoutCachedTop =56
  414. LayoutCachedWidth =10686
  415. LayoutCachedHeight =371
  416. End
  417. End
  418. End
  419. Begin FormFooter
  420. KeepTogether = NotDefault
  421. Height =0
  422. Name ="PiedÉtat"
  423. AlternateBackThemeColorIndex =1
  424. AlternateBackShade =95.0
  425. BackThemeColorIndex =1
  426. End
  427. End
  428. End
  429. CodeBehindForm
  430. Attribute VB_GlobalNameSpace = False
  431. Attribute VB_Creatable = True
  432. Attribute VB_PredeclaredId = True
  433. Attribute VB_Exposed = False
  434. Option Compare Database
  435. Private Sub Report_Open(Cancel As Integer)
  436. Me.OrderBy = "[Nom]"
  437. Me.OrderByOn = True
  438. End Sub