Review fixes G0019, G0108: added hidden tests; revalidated

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
This commit is contained in:
Kral
2026-10-03 16:35:20 +02:00
parent 7510131a7d
commit 0e96c6708e
31 changed files with 632 additions and 608 deletions

View File

@@ -13,6 +13,7 @@ CLASS {{p}}t16_hidden DEFINITION PUBLIC FINAL CREATE PUBLIC
METHODS rate_national FOR TESTING.
METHODS rate_international FOR TESTING.
METHODS rate_other FOR TESTING.
METHODS charge_other FOR TESTING.
METHODS charge_no_discount FOR TESTING.
METHODS charge_long_discount FOR TESTING.
METHODS charge_rounding FOR TESTING.
@@ -83,6 +84,11 @@ CLASS {{p}}t16_hidden IMPLEMENTATION.
assert_amount( iv_exp = CONV decfloat34( '0.15' ) iv_act = CONV decfloat34( lv_rate ) ).
ENDMETHOD.
METHOD charge_other.
SELECT SINGLE charge FROM {{p}}i_call_charge WHERE call_id = 'C4' INTO @DATA(lv_charge).
assert_amount( iv_exp = CONV decfloat34( '0.30' ) iv_act = CONV decfloat34( lv_charge ) ).
ENDMETHOD.
METHOD charge_no_discount.
SELECT SINGLE charge FROM {{p}}i_call_charge WHERE call_id = 'C1' INTO @DATA(lv_charge).
assert_amount( iv_exp = CONV decfloat34( '0.27' ) iv_act = CONV decfloat34( lv_charge ) ).