firebird/firebird-mirror
firebird/firebird-mirror
8
0
Fork 1
mirror of https://github.com/FirebirdSQL/firebird.git synced 2025-01-22 20:03:02 +01:00
Code Issues

Fix #8063 - (var)char variables/parameters assignments fail in Stored Procedures with subroutines.

Browse Source
This commit is contained in:
Adriano dos Santos Fernandes 2024-04-02 11:09:54 -03:00
parent 53a3bf1af0
commit 48915d1264
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/dsql/ExprNodes.cpp
View File

@ -13864,10 +13864,12 @@ dsc* VariableNode::execute(thread_db* tdbb, Request* request) const
request->req_flags |= req_null;
else
{
EVL_make_value(tdbb, &varImpure->vlu_desc, impure);
auto varDesc = varImpure->vlu_desc;
if (impure->vlu_desc.dsc_dtype == dtype_text)
INTL_adjust_text_descriptor(tdbb, &impure->vlu_desc);
if (varDesc.dsc_dtype == dtype_text)
INTL_adjust_text_descriptor(tdbb, &varDesc);
EVL_make_value(tdbb, &varDesc, impure);
}
if (!(varImpure->vlu_flags & VLU_checked))