@@ -41,7 +41,8 @@ init_(PaymentID, Params, Opts = #{timestamp := CreatedAt0}) ->
4141 context = Context ,
4242 transaction_info = TransactionInfo ,
4343 risk_score = RiskScore ,
44- occurred_at = OccurredAt
44+ occurred_at = OccurredAt ,
45+ recurrent_token = RecToken
4546 } = Params ,
4647 CreatedAt1 = genlib :define (OccurredAt , CreatedAt0 ),
4748 Revision = hg_domain :head (),
@@ -93,7 +94,10 @@ init_(PaymentID, Params, Opts = #{timestamp := CreatedAt0}) ->
9394 [
9495 ? route_changed (Route ),
9596 ? cash_flow_changed (FinalCashflow ),
96- hg_session :wrap_event (? processed (), hg_session :create ()),
97+ hg_session :wrap_event (? processed (), hg_session :create ())
98+ ] ++
99+ maybe_rec_token_event_list (RecToken ) ++
100+ [
97101 hg_session :wrap_event (? processed (), ? trx_bound (TransactionInfo )),
98102 hg_session :wrap_event (? processed (), ? session_finished (? session_succeeded ())),
99103 ? payment_status_changed (? processed ()),
@@ -181,6 +185,11 @@ maybe_risk_score_event_list(undefined) ->
181185maybe_risk_score_event_list (RiskScore ) ->
182186 [? risk_score_changed (RiskScore )].
183187
188+ maybe_rec_token_event_list (undefined ) ->
189+ [];
190+ maybe_rec_token_event_list (RecToken ) ->
191+ [? rec_token_acquired (RecToken )].
192+
184193get_merchant_payment_terms (Revision , Shop , VS ) ->
185194 TermSet = hg_invoice_utils :compute_shop_terms (Revision , Shop , VS ),
186195 TermSet # domain_TermSet .payments .
0 commit comments