feat: json for billing order

Author: jayy-lmao

src/order_taking/common/decimal.gleam

@@ -1,19 +1,19 @@
 import gleam/int
-import gleam/option.{type Option, None, Some}
+import gleam/option
 import gleam/string
 
 pub type Decimal {
   Decimal(before: Int, after: Int)
 }
 
-pub fn parse(d: String) -> Option(Decimal) {
+pub fn parse(d: String) -> option.Option(Decimal) {
   case string.split(d, ".") {
     [whole, dec] ->
       case int.parse(whole), int.parse(dec) {
-        Ok(i1), Ok(i2) -> Some(Decimal(before: i1, after: i2))
-        _, _ -> None
+        Ok(i1), Ok(i2) -> option.Some(Decimal(before: i1, after: i2))
+        _, _ -> option.None
       }
-    _ -> None
+    _ -> option.None
   }
 }
 

src/order_taking/place_order/dto/address_dto.gleam

@@ -17,6 +17,7 @@ pub type AddressDto {
   )
 }
 
+// For serialising
 pub fn to_json(dto: AddressDto) {
   json.object([
     #("address_line_1", json.string(dto.address_line_1)),
@@ -38,6 +39,8 @@ pub fn to_json(dto: AddressDto) {
         |> option.map(json.string)
         |> option.unwrap(json.null()),
     ),
+    #("city", json.string(dto.city)),
+    #("zip_code", json.string(dto.zip_code)),
   ])
 }
 

src/order_taking/place_order/dto/billable_order_placed_dto.gleam

@@ -1,17 +1,31 @@
-import order_taking/common/decimal.{type Decimal}
+import gleam/json
+import order_taking/common/decimal
 import order_taking/common/public_types
 import order_taking/common/simple_types/billing_amount
 import order_taking/common/simple_types/order_id
-import order_taking/place_order/dto/address_dto.{type AddressDto}
+import order_taking/place_order/dto/address_dto
 
 pub type BillableOrderPlacedDto {
   BillableOrderPlacedDto(
     order_id: String,
-    billing_address: AddressDto,
-    amount_to_bill: Decimal,
+    billing_address: address_dto.AddressDto,
+    amount_to_bill: decimal.Decimal,
   )
 }
 
+// For serialising
+pub fn to_json(dto: BillableOrderPlacedDto) {
+  json.object([
+    #("order_id", json.string(dto.order_id)),
+    #("amount_to_bill", json.string(decimal.to_string(dto.amount_to_bill))),
+    #(
+      "address",
+      dto.billing_address
+        |> address_dto.to_json,
+    ),
+  ])
+}
+
 /// Convert a BillableOrderPlaced object into the corresponding DTO.
 /// Used when exporting from the domain to the outside world.
 pub fn from_domain(