r_FormDep_1.bas 4.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159
  1. Operation =1
  2. Option =0
  3. Begin InputTables
  4. Name ="tbl_ImportRH"
  5. Name ="r_VehiculePerso"
  6. End
  7. Begin OutputColumns
  8. Expression ="tbl_ImportRH.CodeAgent"
  9. Alias ="JourRH"
  10. Expression ="Day([DateRH])"
  11. Alias ="MoisRH"
  12. Expression ="Month([DateRH])"
  13. Alias ="AnneeRH"
  14. Expression ="Year([DateRH])"
  15. Expression ="tbl_ImportRH.Localisation"
  16. Expression ="tbl_ImportRH.DistanceTranche1"
  17. Expression ="tbl_ImportRH.VehiculePersoTranche1"
  18. Alias ="Distance1_perso"
  19. Expression ="[DistanceTranche1]*IIf([VehiculePersoTranche1]='true',1,0)"
  20. Expression ="tbl_ImportRH.DistanceTranche2"
  21. Expression ="tbl_ImportRH.VehiculePersoTranche2"
  22. Alias ="Distance2_perso"
  23. Expression ="[DistanceTranche2]*IIf([VehiculePersoTranche2]='true',1,0)"
  24. Alias ="Distance2_service"
  25. Expression ="[DistanceTranche2]*IIf([VehiculePersoTranche2]='true',0,1)"
  26. Expression ="tbl_ImportRH.Repas"
  27. Expression ="tbl_ImportRH.Remarque"
  28. Expression ="r_VehiculePerso.TypeVehicule"
  29. End
  30. Begin Joins
  31. LeftTable ="r_VehiculePerso"
  32. RightTable ="tbl_ImportRH"
  33. Expression ="r_VehiculePerso.CodeAgent = tbl_ImportRH.CodeAgent"
  34. Flag =3
  35. End
  36. Begin OrderBy
  37. Expression ="tbl_ImportRH.CodeAgent"
  38. Flag =0
  39. End
  40. dbBoolean "ReturnsRecords" ="-1"
  41. dbInteger "ODBCTimeout" ="60"
  42. dbByte "RecordsetType" ="0"
  43. dbBoolean "OrderByOn" ="-1"
  44. dbByte "Orientation" ="0"
  45. dbByte "DefaultView" ="2"
  46. dbBoolean "FilterOnLoad" ="0"
  47. dbBoolean "OrderByOnLoad" ="-1"
  48. dbBoolean "TotalsRow" ="0"
  49. dbMemo "OrderBy" ="[r_FormDep_1].[AnneeRH] DESC, [r_FormDep_1].[MoisRH] DESC"
  50. Begin
  51. Begin
  52. dbText "Name" ="tbl_ImportRH.CodeAgent"
  53. dbLong "AggregateType" ="-1"
  54. End
  55. Begin
  56. dbText "Name" ="tbl_ImportRH.VehiculePersoTranche1"
  57. dbLong "AggregateType" ="-1"
  58. dbInteger "ColumnWidth" ="3015"
  59. dbBoolean "ColumnHidden" ="0"
  60. End
  61. Begin
  62. dbText "Name" ="tbl_ImportRH.DistanceTranche2"
  63. dbLong "AggregateType" ="-1"
  64. dbInteger "ColumnWidth" ="2055"
  65. dbBoolean "ColumnHidden" ="0"
  66. End
  67. Begin
  68. dbText "Name" ="tbl_ImportRH.DistanceTranche1"
  69. dbLong "AggregateType" ="-1"
  70. dbInteger "ColumnWidth" ="2850"
  71. dbBoolean "ColumnHidden" ="0"
  72. End
  73. Begin
  74. dbText "Name" ="MoisRH"
  75. dbLong "AggregateType" ="-1"
  76. End
  77. Begin
  78. dbText "Name" ="JourRH"
  79. dbLong "AggregateType" ="-1"
  80. End
  81. Begin
  82. dbText "Name" ="AnneeRH"
  83. dbLong "AggregateType" ="-1"
  84. End
  85. Begin
  86. dbText "Name" ="tbl_ImportRH.Remarque"
  87. dbLong "AggregateType" ="-1"
  88. End
  89. Begin
  90. dbText "Name" ="tbl_ImportRH.VehiculePersoTranche2"
  91. dbLong "AggregateType" ="-1"
  92. dbInteger "ColumnWidth" ="2325"
  93. dbBoolean "ColumnHidden" ="0"
  94. End
  95. Begin
  96. dbText "Name" ="tbl_ImportRH.Repas"
  97. dbLong "AggregateType" ="-1"
  98. End
  99. Begin
  100. dbText "Name" ="Distance1_perso"
  101. dbLong "AggregateType" ="-1"
  102. dbInteger "ColumnWidth" ="1950"
  103. dbBoolean "ColumnHidden" ="0"
  104. End
  105. Begin
  106. dbText "Name" ="Distance2_perso"
  107. dbLong "AggregateType" ="-1"
  108. dbInteger "ColumnWidth" ="2355"
  109. dbBoolean "ColumnHidden" ="0"
  110. End
  111. Begin
  112. dbText "Name" ="Distance2_service"
  113. dbLong "AggregateType" ="-1"
  114. dbInteger "ColumnWidth" ="2325"
  115. dbBoolean "ColumnHidden" ="0"
  116. End
  117. Begin
  118. dbText "Name" ="tbl_ImportRH.Localisation"
  119. dbInteger "ColumnWidth" ="5160"
  120. dbBoolean "ColumnHidden" ="0"
  121. dbLong "AggregateType" ="-1"
  122. End
  123. Begin
  124. dbText "Name" ="r_VehiculePerso.TypeVehicule"
  125. dbLong "AggregateType" ="-1"
  126. End
  127. End
  128. Begin
  129. State =0
  130. Left =0
  131. Top =0
  132. Right =1099
  133. Bottom =840
  134. Left =-1
  135. Top =-1
  136. Right =677
  137. Bottom =229
  138. Left =0
  139. Top =0
  140. ColumnsShown =539
  141. Begin
  142. Left =48
  143. Top =12
  144. Right =253
  145. Bottom =240
  146. Top =0
  147. Name ="tbl_ImportRH"
  148. Name =""
  149. End
  150. Begin
  151. Left =301
  152. Top =12
  153. Right =510
  154. Bottom =185
  155. Top =0
  156. Name ="r_VehiculePerso"
  157. Name =""
  158. End
  159. End