Jacob Schmidt
ff7ff0c4e5
## Summary This finishes the org credit line workflow so it behaves like reserved treasury-backed credit instead of a simple member allowance. ## What changed - reserve org funds immediately when a credit line is assigned - track credit lines with: - approved amount - available amount - outstanding principal - interest rate - amount due - consume reserved credit during store checkout without charging org funds a second time - add credit line repayment through the bank app - sync richer credit line state into org and bank payloads/UI - keep legacy `amount` compatibility mapped to available credit for older consumers ## User-facing behavior - assigning a credit line now reduces available org funds immediately - spending on `credit_line` reduces available credit and creates debt with interest - the bank app now shows outstanding credit debt and allows repayment from personal bank funds - the org treasury view now shows reserved credit and outstanding due totals ## Validation - `cargo fmt` - `npm run build:webui` - `cargo test -p forge-services --quiet` - `cargo test -p forge-server --quiet` ## Follow-up checks - validate in-game that assigning a credit line reduces org funds immediately - validate store checkout with `credit_line` updates available credit and debt correctly - validate bank repayment decreases player bank balance, increases org funds, and reduces amount due Co-authored-by: Jacob Schmidt <innovativestudios@outlook.com> Reviewed-on: #2
60 lines
2.1 KiB
Plaintext
60 lines
2.1 KiB
Plaintext
#include "script_component.hpp"
|
|
|
|
PREP_RECOMPILE_START;
|
|
#include "XEH_PREP.hpp"
|
|
PREP_RECOMPILE_END;
|
|
|
|
// private _category = [QUOTE(MOD_NAME), LLSTRING(displayName)];
|
|
|
|
[QGVAR(requestCategory), {
|
|
params [["_uid", "", [""]], ["_category", "", [""]]];
|
|
|
|
if (_uid isEqualTo "" || { _category isEqualTo "" }) exitWith {
|
|
diag_log "[FORGE:Server:Store] Invalid category request payload."
|
|
};
|
|
|
|
private _player = [_uid] call EFUNC(common,getPlayer);
|
|
if (_player isEqualTo objNull) exitWith {};
|
|
|
|
if (isNil QGVAR(StoreCatalogService)) exitWith {
|
|
diag_log "[FORGE:Server:Store] Store catalog service is unavailable."
|
|
};
|
|
|
|
private _result = GVAR(StoreCatalogService) call ["buildCategoryResponse", [_category]];
|
|
[CRPC(store,responseCategory), [_result], _player] call CFUNC(targetEvent);
|
|
}] call CFUNC(addEventHandler);
|
|
|
|
[QGVAR(requestHydrateStore), {
|
|
params [["_uid", "", [""]], ["_bridgeEvent", "store::hydrate", [""]]];
|
|
|
|
if (_uid isEqualTo "") exitWith {
|
|
diag_log "[FORGE:Server:Store] Invalid hydrate request payload."
|
|
};
|
|
|
|
if !(_bridgeEvent in ["store::hydrate", "store::config::hydrate"]) then {
|
|
_bridgeEvent = "store::hydrate";
|
|
};
|
|
|
|
private _player = [_uid] call EFUNC(common,getPlayer);
|
|
if (_player isEqualTo objNull) exitWith {};
|
|
|
|
private _payload = GVAR(StoreStore) call ["buildHydratePayload", [_uid]];
|
|
if (_payload isEqualTo createHashMap) exitWith {};
|
|
|
|
[CRPC(store,responseHydrateStore), [_payload, _bridgeEvent], _player] call CFUNC(targetEvent);
|
|
}] call CFUNC(addEventHandler);
|
|
|
|
[QGVAR(requestCheckout), {
|
|
params [["_uid", "", [""]], ["_payloadJson", "", [""]]];
|
|
|
|
if (_uid isEqualTo "" || { _payloadJson isEqualTo "" }) exitWith {
|
|
diag_log "[FORGE:Server:Store] Invalid checkout request payload."
|
|
};
|
|
|
|
private _player = [_uid] call EFUNC(common,getPlayer);
|
|
if (_player isEqualTo objNull) exitWith {};
|
|
|
|
private _result = GVAR(StoreStore) call ["checkout", [_uid, _player, _payloadJson]];
|
|
[CRPC(store,responseCheckout), [_result], _player] call CFUNC(targetEvent);
|
|
}] call CFUNC(addEventHandler);
|