void SUB_APPENDDYNUDTOWNINITAT(qbs*_SUB_APPENDDYNUDTOWNINITAT_STRING_BASE_EXPR,int32*_SUB_APPENDDYNUDTOWNINITAT_LONG_UDT_INDEX,int32*_SUB_APPENDDYNUDTOWNINITAT_LONG_ROOT_OFFSET,qbs*_SUB_APPENDDYNUDTOWNINITAT_STRING_ELEM_BYTES,qbs*_SUB_APPENDDYNUDTOWNINITAT_STRING_INDEX_EXPR,qbs*_SUB_APPENDDYNUDTOWNINITAT_STRING_ACC,int32*_SUB_APPENDDYNUDTOWNINITAT_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 "data280.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,1282,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(28172,1283,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(28172,1284,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(28172,1285,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(28172,1286,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(28172,1287,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(28172,1288,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(28172,1289,"type.bas");}while(r);
do{
qbs_set(_SUB_APPENDDYNUDTOWNINITAT_STRING_CR,qbs_add(func_chr( 13 ),func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28172,1291,"type.bas");}while(r);
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_UDT_INDEX)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])];
if(!qbevent)break;evnt(28172,1292,"type.bas");}while(r);
S_42133:;
while((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)||is_error_pending()){
if(qbevent){evnt(28172,1293,"type.bas");if(r)goto S_42133;}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_OFFSET=*_SUB_APPENDDYNUDTOWNINITAT_LONG_ROOT_OFFSET+(qb_safe_idiv(FUNC_UDTDYNMEMBEROFFSET(_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID), 8 ));
if(!qbevent)break;evnt(28172,1294,"type.bas");}while(r);
S_42135:;
if ((FUNC_UDTMEMBERDYNDESC(_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID))||is_error_pending()){
if(qbevent){evnt(28172,1295,"type.bas");if(r)goto S_42135;}
S_42136:;
if ((-(*_SUB_APPENDDYNUDTOWNINITAT_LONG_DESC_INITED== 0 ))||is_error_pending()){
if(qbevent){evnt(28172,1296,"type.bas");if(r)goto S_42136;}
do{
SUB_APPENDDYNUDTDESCINITAT(_SUB_APPENDDYNUDTOWNINITAT_STRING_BASE_EXPR,_SUB_APPENDDYNUDTOWNINITAT_LONG_UDT_INDEX,_SUB_APPENDDYNUDTOWNINITAT_LONG_ROOT_OFFSET,_SUB_APPENDDYNUDTOWNINITAT_STRING_ELEM_BYTES,_SUB_APPENDDYNUDTOWNINITAT_STRING_INDEX_EXPR,_SUB_APPENDDYNUDTOWNINITAT_STRING_ACC,_SUB_APPENDDYNUDTOWNINITAT_LONG_LAYOUT_MODE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28172,1297,"type.bas");}while(r);
S_42138:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(28172,1298,"type.bas");if(r)goto S_42138;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28172,1298,"type.bas");}while(r);
}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_DESC_INITED= -1 ;
if(!qbevent)break;evnt(28172,1299,"type.bas");}while(r);
}
S_42143:;
}else{
if (((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]){
if(qbevent){evnt(28172,1301,"type.bas");if(r)goto S_42143;}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_ELEM_STEP=FUNC_UDTDYNINLINEELEMBYTES(_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID,_SUB_APPENDDYNUDTOWNINITAT_LONG_LAYOUT_MODE);
if(!qbevent)break;evnt(28172,1302,"type.bas");}while(r);
S_42145:;
if (((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)!= 0 ))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 )))||is_error_pending()){
if(qbevent){evnt(28172,1303,"type.bas");if(r)goto S_42145;}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_ELEM_STEP=FUNC_UDT_ARRAY_MEMBER_BYTES(_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID);
if(!qbevent)break;evnt(28172,1304,"type.bas");}while(r);
S_42147:;
fornext_value5020= 0 ;
fornext_finalvalue5020=((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]- 1 ;
fornext_step5020= 1 ;
if (fornext_step5020<0) fornext_step_negative5020=1; else fornext_step_negative5020=0;
if (is_error_pending()) goto fornext_error5020;
goto fornext_entrylabel5020;
while(1){
fornext_value5020=fornext_step5020+(*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_IDX);
fornext_entrylabel5020:
*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_IDX=fornext_value5020;
if (fornext_step_negative5020){
if (fornext_value5020<fornext_finalvalue5020) break;
}else{
if (fornext_value5020>fornext_finalvalue5020) break;
}
fornext_error5020:;
if(qbevent){evnt(28172,1305,"type.bas");if(r)goto S_42147;}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_OFFSET=*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_OFFSET+(*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_IDX**_SUB_APPENDDYNUDTOWNINITAT_LONG_ELEM_STEP);
if(!qbevent)break;evnt(28172,1306,"type.bas");}while(r);
do{
qbs_set(_SUB_APPENDDYNUDTOWNINITAT_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTOWNINITAT_STRING_ACC,_SUB_APPENDDYNUDTOWNINITAT_STRING_CR),qbs_new_txt_len("*(qbs**)(((uint8*)(",19)),_SUB_APPENDDYNUDTOWNINITAT_STRING_BASE_EXPR),qbs_new_txt_len("))+",3)),_SUB_APPENDDYNUDTOWNINITAT_STRING_ELEM_BYTES),qbs_new_txt_len("*(",2)),_SUB_APPENDDYNUDTOWNINITAT_STRING_INDEX_EXPR),qbs_new_txt_len(")+",2)),qbs_ltrim(qbs_str((int32)(*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_OFFSET)))),qbs_new_txt_len(")=qbs_new(0,0);",15)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28172,1307,"type.bas");}while(r);
fornext_continue_5019:;
}
fornext_exit_5019:;
S_42151:;
}else{
if (-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 )){
if(qbevent){evnt(28172,1309,"type.bas");if(r)goto S_42151;}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
if(!qbevent)break;evnt(28172,1310,"type.bas");}while(r);
S_42153:;
if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_NESTED_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]|FUNC_UDTDYNHASMEMBERARRAYS(_SUB_APPENDDYNUDTOWNINITAT_LONG_NESTED_UDT,_SUB_APPENDDYNUDTOWNINITAT_LONG_LAYOUT_MODE))||is_error_pending()){
if(qbevent){evnt(28172,1311,"type.bas");if(r)goto S_42153;}
S_42154:;
fornext_value5022= 0 ;
fornext_finalvalue5022=((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]- 1 ;
fornext_step5022= 1 ;
if (fornext_step5022<0) fornext_step_negative5022=1; else fornext_step_negative5022=0;
if (is_error_pending()) goto fornext_error5022;
goto fornext_entrylabel5022;
while(1){
fornext_value5022=fornext_step5022+(*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_IDX);
fornext_entrylabel5022:
*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_IDX=fornext_value5022;
if (fornext_step_negative5022){
if (fornext_value5022<fornext_finalvalue5022) break;
}else{
if (fornext_value5022>fornext_finalvalue5022) break;
}
fornext_error5022:;
if(qbevent){evnt(28172,1312,"type.bas");if(r)goto S_42154;}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_OFFSET=*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_OFFSET+(*_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_IDX**_SUB_APPENDDYNUDTOWNINITAT_LONG_ELEM_STEP);
if(!qbevent)break;evnt(28172,1313,"type.bas");}while(r);
do{
SUB_APPENDDYNUDTOWNINITAT(_SUB_APPENDDYNUDTOWNINITAT_STRING_BASE_EXPR,_SUB_APPENDDYNUDTOWNINITAT_LONG_NESTED_UDT,_SUB_APPENDDYNUDTOWNINITAT_LONG_ARRAY_OFFSET,_SUB_APPENDDYNUDTOWNINITAT_STRING_ELEM_BYTES,_SUB_APPENDDYNUDTOWNINITAT_STRING_INDEX_EXPR,_SUB_APPENDDYNUDTOWNINITAT_STRING_ACC,_SUB_APPENDDYNUDTOWNINITAT_LONG_LAYOUT_MODE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28172,1314,"type.bas");}while(r);
S_42157:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(28172,1315,"type.bas");if(r)goto S_42157;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28172,1315,"type.bas");}while(r);
}
fornext_continue_5021:;
}
fornext_exit_5021:;
}
}
}
S_42163:;
}else{
if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)!= 0 ))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))){
if(qbevent){evnt(28172,1319,"type.bas");if(r)goto S_42163;}
do{
qbs_set(_SUB_APPENDDYNUDTOWNINITAT_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTOWNINITAT_STRING_ACC,_SUB_APPENDDYNUDTOWNINITAT_STRING_CR),qbs_new_txt_len("*(qbs**)(((uint8*)(",19)),_SUB_APPENDDYNUDTOWNINITAT_STRING_BASE_EXPR),qbs_new_txt_len("))+",3)),_SUB_APPENDDYNUDTOWNINITAT_STRING_ELEM_BYTES),qbs_new_txt_len("*(",2)),_SUB_APPENDDYNUDTOWNINITAT_STRING_INDEX_EXPR),qbs_new_txt_len(")+",2)),qbs_ltrim(qbs_str((int32)(*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_OFFSET)))),qbs_new_txt_len(")=qbs_new(0,0);",15)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28172,1320,"type.bas");}while(r);
S_42165:;
}else{
if (-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 )){
if(qbevent){evnt(28172,1321,"type.bas");if(r)goto S_42165;}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
if(!qbevent)break;evnt(28172,1322,"type.bas");}while(r);
S_42167:;
if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_NESTED_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]|FUNC_UDTDYNHASMEMBERARRAYS(_SUB_APPENDDYNUDTOWNINITAT_LONG_NESTED_UDT,_SUB_APPENDDYNUDTOWNINITAT_LONG_LAYOUT_MODE))||is_error_pending()){
if(qbevent){evnt(28172,1323,"type.bas");if(r)goto S_42167;}
do{
SUB_APPENDDYNUDTOWNINITAT(_SUB_APPENDDYNUDTOWNINITAT_STRING_BASE_EXPR,_SUB_APPENDDYNUDTOWNINITAT_LONG_NESTED_UDT,_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_OFFSET,_SUB_APPENDDYNUDTOWNINITAT_STRING_ELEM_BYTES,_SUB_APPENDDYNUDTOWNINITAT_STRING_INDEX_EXPR,_SUB_APPENDDYNUDTOWNINITAT_STRING_ACC,_SUB_APPENDDYNUDTOWNINITAT_LONG_LAYOUT_MODE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28172,1324,"type.bas");}while(r);
S_42169:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(28172,1325,"type.bas");if(r)goto S_42169;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28172,1325,"type.bas");}while(r);
}
}
}
}
}
}
do{
*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_APPENDDYNUDTOWNINITAT_LONG_MEMBER_ID)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])];
if(!qbevent)break;evnt(28172,1328,"type.bas");}while(r);
dl_continue_5018:;
}
dl_exit_5018:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free280.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;
}
