Values.BonusPaymentSourceAn object representing a Bonus payment paid to a Worker.
type nonrec t = {workerId : CustomerId.t option;The ID of the Worker to whom the bonus was paid.
*)bonusAmount : CurrencyAmount.t option;assignmentId : EntityId.t option;The ID of the assignment associated with this bonus payment.
*)reason : String_.t option;The Reason text given when the bonus was granted, if any.
*)grantTime : Timestamp.t option;The date and time of when the bonus was granted.
*)}val make :
?workerId:CustomerId.t ->
?bonusAmount:CurrencyAmount.t ->
?assignmentId:EntityId.t ->
?reason:String_.t ->
?grantTime:Timestamp.t ->
unit ->
tval to_value :
t ->
[> `Structure of
(string * [> `String of CustomerId.t | `Timestamp of Timestamp.t ]) list ]