int16 FUNC_UDTDYNHASVARDESC(int32*_FUNC_UDTDYNHASVARDESC_LONG_UDT_INDEX,int32*_FUNC_UDTDYNHASVARDESC_LONG_LAYOUT_MODE){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_fileno;
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
uint8 *tmp_mem_static_pointer=mem_static_pointer;
uint32 tmp_cmem_sp=cmem_sp;
#include "data272.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
libqb_check_stack();
if (is_error_pending()) goto exit_subfunc;
do{
if(!qbevent)break;evnt(28172,1019,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(28172,1020,"type.bas");}while(r);
do{
*_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_FUNC_UDTDYNHASVARDESC_LONG_UDT_INDEX)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])];
if(!qbevent)break;evnt(28172,1022,"type.bas");}while(r);
S_41919:;
while((*_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID)||is_error_pending()){
if(qbevent){evnt(28172,1023,"type.bas");if(r)goto S_41919;}
S_41920:;
if ((FUNC_UDTMEMBERDYNDESC(_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID))||is_error_pending()){
if(qbevent){evnt(28172,1024,"type.bas");if(r)goto S_41920;}
do{
*_FUNC_UDTDYNHASVARDESC_LONG_SEEN_DYN= -1 ;
if(!qbevent)break;evnt(28172,1025,"type.bas");}while(r);
S_41922:;
if ((FUNC_DYNMEMVARSTR(_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID))||is_error_pending()){
if(qbevent){evnt(28172,1026,"type.bas");if(r)goto S_41922;}
do{
*_FUNC_UDTDYNHASVARDESC_INTEGER_UDTDYNHASVARDESC= -1 ;
if(!qbevent)break;evnt(28172,1027,"type.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28172,1028,"type.bas");}while(r);
}
S_41926:;
if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 ))||is_error_pending()){
if(qbevent){evnt(28172,1030,"type.bas");if(r)goto S_41926;}
do{
*_FUNC_UDTDYNHASVARDESC_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
if(!qbevent)break;evnt(28172,1031,"type.bas");}while(r);
S_41928:;
if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_FUNC_UDTDYNHASVARDESC_LONG_NESTED_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])||is_error_pending()){
if(qbevent){evnt(28172,1032,"type.bas");if(r)goto S_41928;}
do{
*_FUNC_UDTDYNHASVARDESC_INTEGER_UDTDYNHASVARDESC= -1 ;
if(!qbevent)break;evnt(28172,1033,"type.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28172,1034,"type.bas");}while(r);
}
S_41932:;
if ((FUNC_UDTDYNHASVARDESC(_FUNC_UDTDYNHASVARDESC_LONG_NESTED_UDT,_FUNC_UDTDYNHASVARDESC_LONG_LAYOUT_MODE))||is_error_pending()){
if(qbevent){evnt(28172,1036,"type.bas");if(r)goto S_41932;}
do{
*_FUNC_UDTDYNHASVARDESC_INTEGER_UDTDYNHASVARDESC= -1 ;
if(!qbevent)break;evnt(28172,1037,"type.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28172,1038,"type.bas");}while(r);
}
}
S_41937:;
}else{
if (-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 )){
if(qbevent){evnt(28172,1041,"type.bas");if(r)goto S_41937;}
do{
*_FUNC_UDTDYNHASVARDESC_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
if(!qbevent)break;evnt(28172,1042,"type.bas");}while(r);
S_41939:;
if ((FUNC_UDTDYNHASVARDESC(_FUNC_UDTDYNHASVARDESC_LONG_NESTED_UDT,_FUNC_UDTDYNHASVARDESC_LONG_LAYOUT_MODE))||is_error_pending()){
if(qbevent){evnt(28172,1043,"type.bas");if(r)goto S_41939;}
do{
*_FUNC_UDTDYNHASVARDESC_INTEGER_UDTDYNHASVARDESC= -1 ;
if(!qbevent)break;evnt(28172,1044,"type.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28172,1045,"type.bas");}while(r);
}
}
}
do{
*_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_FUNC_UDTDYNHASVARDESC_LONG_MEMBER_ID)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])];
if(!qbevent)break;evnt(28172,1048,"type.bas");}while(r);
dl_continue_4977:;
}
dl_exit_4977:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free272.txt"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
cmem_sp=tmp_cmem_sp;
return *_FUNC_UDTDYNHASVARDESC_INTEGER_UDTDYNHASVARDESC;
}
