#line 16675 "qb64pe.bas"
void SUB_EMITASSIGNWHOLE(qbs*_SUB_EMITASSIGNWHOLE_STRING_LREF,int32*_SUB_EMITASSIGNWHOLE_LONG_LTYP,int32*_SUB_EMITASSIGNWHOLE_LONG_LIDNUM,int32*_SUB_EMITASSIGNWHOLE_LONG_LMEMBER,qbs*_SUB_EMITASSIGNWHOLE_STRING_RREF,int32*_SUB_EMITASSIGNWHOLE_LONG_RTYP,int32*_SUB_EMITASSIGNWHOLE_LONG_RIDNUM,int32*_SUB_EMITASSIGNWHOLE_LONG_RMEMBER){
#line 16675 "qb64pe.bas"
qbs *tqbs;
#line 16675 "qb64pe.bas"
ptrszint tmp_long;
#line 16675 "qb64pe.bas"
int32 tmp_fileno;
#line 16675 "qb64pe.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 16675 "qb64pe.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 16675 "qb64pe.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 16675 "qb64pe.bas"
#include "data40.txt"
#line 16675 "qb64pe.bas"
mem_lock *sf_mem_lock;
#line 16675 "qb64pe.bas"
new_mem_lock();
#line 16675 "qb64pe.bas"
sf_mem_lock=mem_lock_tmp;
#line 16675 "qb64pe.bas"
sf_mem_lock->type=3;
#line 16675 "qb64pe.bas"
libqb_check_stack();
#line 16675 "qb64pe.bas"
if (is_error_pending()) goto exit_subfunc;
#line 16676 "qb64pe.bas"
do{
#line 16676 "qb64pe.bas"
if(!qbevent)break;evnt(16676);}while(r);
#line 16677 "qb64pe.bas"
do{
#line 16677 "qb64pe.bas"
if(!qbevent)break;evnt(16677);}while(r);
#line 16678 "qb64pe.bas"
do{
#line 16678 "qb64pe.bas"
if(!qbevent)break;evnt(16678);}while(r);
#line 16679 "qb64pe.bas"
do{
#line 16679 "qb64pe.bas"
if(!qbevent)break;evnt(16679);}while(r);
#line 16681 "qb64pe.bas"
S_19134:;
#line 16681 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_LMEMBER== 0 ))||is_error_pending()){
#line 16681 "qb64pe.bas"
if(qbevent){evnt(16681);if(r)goto S_19134;}
#line 16682 "qb64pe.bas"
do{
#line 16682 "qb64pe.bas"
SUB_GETID(_SUB_EMITASSIGNWHOLE_LONG_LIDNUM);
#line 16682 "qb64pe.bas"
if(!qbevent)break;evnt(16682);}while(r);
#line 16683 "qb64pe.bas"
S_19136:;
#line 16683 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16683 "qb64pe.bas"
if(qbevent){evnt(16683);if(r)goto S_19136;}
#line 16683 "qb64pe.bas"
do{
#line 16683 "qb64pe.bas"
goto exit_subfunc;
#line 16683 "qb64pe.bas"
if(!qbevent)break;evnt(16683);}while(r);
#line 16683 "qb64pe.bas"
}
#line 16684 "qb64pe.bas"
do{
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+0))),(((char*)__UDT_ID)+((0+0))+((0+0))),256);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+256))),(((char*)__UDT_ID)+((0+0))+((0+256))),256);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+512))),(((char*)__UDT_ID)+((0+0))+((0+512))),4);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+516))),(((char*)__UDT_ID)+((0+0))+((0+516))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+518))),(((char*)__UDT_ID)+((0+0))+((0+518))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+520))),(((char*)__UDT_ID)+((0+0))+((0+520))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+522))),(((char*)__UDT_ID)+((0+0))+((0+522))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+524))),(((char*)__UDT_ID)+((0+0))+((0+524))),8);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+532))),(((char*)__UDT_ID)+((0+0))+((0+532))),8);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+540))),(((char*)__UDT_ID)+((0+0))+((0+540))),4);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+544))),(((char*)__UDT_ID)+((0+0))+((0+544))),4);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+548))),(((char*)__UDT_ID)+((0+0))+((0+548))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+550))),(((char*)__UDT_ID)+((0+0))+((0+550))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+552))),(((char*)__UDT_ID)+((0+0))+((0+552))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+554))),(((char*)__UDT_ID)+((0+0))+((0+554))),256);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+810))),(((char*)__UDT_ID)+((0+0))+((0+810))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+812))),(((char*)__UDT_ID)+((0+0))+((0+812))),1);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+813))),(((char*)__UDT_ID)+((0+0))+((0+813))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+815))),(((char*)__UDT_ID)+((0+0))+((0+815))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+817))),(((char*)__UDT_ID)+((0+0))+((0+817))),400);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+1217))),(((char*)__UDT_ID)+((0+0))+((0+1217))),400);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+1617))),(((char*)__UDT_ID)+((0+0))+((0+1617))),256);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+1873))),(((char*)__UDT_ID)+((0+0))+((0+1873))),256);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2129))),(((char*)__UDT_ID)+((0+0))+((0+2129))),256);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2385))),(((char*)__UDT_ID)+((0+0))+((0+2385))),4);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2389))),(((char*)__UDT_ID)+((0+0))+((0+2389))),256);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2645))),(((char*)__UDT_ID)+((0+0))+((0+2645))),4);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2649))),(((char*)__UDT_ID)+((0+0))+((0+2649))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2651))),(((char*)__UDT_ID)+((0+0))+((0+2651))),100);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2751))),(((char*)__UDT_ID)+((0+0))+((0+2751))),100);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2851))),(((char*)__UDT_ID)+((0+0))+((0+2851))),100);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2951))),(((char*)__UDT_ID)+((0+0))+((0+2951))),4);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2955))),(((char*)__UDT_ID)+((0+0))+((0+2955))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2957))),(((char*)__UDT_ID)+((0+0))+((0+2957))),2);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2959))),(((char*)__UDT_ID)+((0+0))+((0+2959))),4);
#line 16684 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2963))),(((char*)__UDT_ID)+((0+0))+((0+2963))),2);
#line 16684 "qb64pe.bas"
qbs_set(*(qbs**)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2965))),*(qbs**)(((char*)__UDT_ID)+((0+0))+((0+2965))));
#line 16684 "qb64pe.bas"
if(!qbevent)break;evnt(16684);}while(r);
#line 16685 "qb64pe.bas"
do{
#line 16685 "qb64pe.bas"
qbs_set(_SUB_EMITASSIGNWHOLE_STRING_LDESC,qbs_rtrim(qbs_new_fixed((((uint8*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+554))),256,1)));
#line 16685 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16685 "qb64pe.bas"
if(!qbevent)break;evnt(16685);}while(r);
#line 16686 "qb64pe.bas"
do{
#line 16686 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LTYP=*(int32*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+512)));
#line 16686 "qb64pe.bas"
if(!qbevent)break;evnt(16686);}while(r);
#line 16687 "qb64pe.bas"
do{
#line 16687 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LSIZE=*(int32*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+544)));
#line 16687 "qb64pe.bas"
if(!qbevent)break;evnt(16687);}while(r);
#line 16688 "qb64pe.bas"
do{
#line 16688 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LDIMS=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+516)));
#line 16688 "qb64pe.bas"
if(!qbevent)break;evnt(16688);}while(r);
#line 16689 "qb64pe.bas"
S_19144:;
#line 16689 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_LDIMS<= 0 ))||is_error_pending()){
#line 16689 "qb64pe.bas"
if(qbevent){evnt(16689);if(r)goto S_19144;}
#line 16689 "qb64pe.bas"
do{
#line 16689 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LDIMS=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*_SUB_EMITASSIGNWHOLE_LONG_LIDNUM)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])];
#line 16689 "qb64pe.bas"
if(!qbevent)break;evnt(16689);}while(r);
#line 16689 "qb64pe.bas"
}
#line 16690 "qb64pe.bas"
do{
#line 16690 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LMODE=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+522)));
#line 16690 "qb64pe.bas"
if(!qbevent)break;evnt(16690);}while(r);
#line 16691 "qb64pe.bas"
S_19148:;
#line 16691 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_LMODE== 0 ))||is_error_pending()){
#line 16691 "qb64pe.bas"
if(qbevent){evnt(16691);if(r)goto S_19148;}
#line 16691 "qb64pe.bas"
do{
#line 16691 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LMODE=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+520)));
#line 16691 "qb64pe.bas"
if(!qbevent)break;evnt(16691);}while(r);
#line 16691 "qb64pe.bas"
}
#line 16692 "qb64pe.bas"
S_19151:;
#line 16692 "qb64pe.bas"
if ((*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+520))))||is_error_pending()){
#line 16692 "qb64pe.bas"
if(qbevent){evnt(16692);if(r)goto S_19151;}
#line 16692 "qb64pe.bas"
do{
#line 16692 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LPHYSDYN= -1 ;
#line 16692 "qb64pe.bas"
if(!qbevent)break;evnt(16692);}while(r);
#line 16692 "qb64pe.bas"
}else{
#line 16692 "qb64pe.bas"
do{
#line 16692 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LPHYSDYN= 0 ;
#line 16692 "qb64pe.bas"
if(!qbevent)break;evnt(16692);}while(r);
#line 16692 "qb64pe.bas"
}
#line 16693 "qb64pe.bas"
do{
#line 16693 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LOWNS= -1 ;
#line 16693 "qb64pe.bas"
if(!qbevent)break;evnt(16693);}while(r);
#line 16694 "qb64pe.bas"
}else{
#line 16695 "qb64pe.bas"
do{
#line 16695 "qb64pe.bas"
SUB_BUILDUDTMEMBERARG(_SUB_EMITASSIGNWHOLE_STRING_LREF,_SUB_EMITASSIGNWHOLE_STRING_LDESC,_SUB_EMITASSIGNWHOLE_STRING_LPREP,_SUB_EMITASSIGNWHOLE_LONG_LDIMS);
#line 16695 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16695 "qb64pe.bas"
if(!qbevent)break;evnt(16695);}while(r);
#line 16696 "qb64pe.bas"
S_19159:;
#line 16696 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16696 "qb64pe.bas"
if(qbevent){evnt(16696);if(r)goto S_19159;}
#line 16696 "qb64pe.bas"
do{
#line 16696 "qb64pe.bas"
goto exit_subfunc;
#line 16696 "qb64pe.bas"
if(!qbevent)break;evnt(16696);}while(r);
#line 16696 "qb64pe.bas"
}
#line 16697 "qb64pe.bas"
do{
#line 16697 "qb64pe.bas"
SUB_GETID(_SUB_EMITASSIGNWHOLE_LONG_LIDNUM);
#line 16697 "qb64pe.bas"
if(!qbevent)break;evnt(16697);}while(r);
#line 16698 "qb64pe.bas"
S_19163:;
#line 16698 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16698 "qb64pe.bas"
if(qbevent){evnt(16698);if(r)goto S_19163;}
#line 16698 "qb64pe.bas"
do{
#line 16698 "qb64pe.bas"
goto exit_subfunc;
#line 16698 "qb64pe.bas"
if(!qbevent)break;evnt(16698);}while(r);
#line 16698 "qb64pe.bas"
}
#line 16699 "qb64pe.bas"
do{
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+0))),(((char*)__UDT_ID)+((0+0))+((0+0))),256);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+256))),(((char*)__UDT_ID)+((0+0))+((0+256))),256);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+512))),(((char*)__UDT_ID)+((0+0))+((0+512))),4);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+516))),(((char*)__UDT_ID)+((0+0))+((0+516))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+518))),(((char*)__UDT_ID)+((0+0))+((0+518))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+520))),(((char*)__UDT_ID)+((0+0))+((0+520))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+522))),(((char*)__UDT_ID)+((0+0))+((0+522))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+524))),(((char*)__UDT_ID)+((0+0))+((0+524))),8);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+532))),(((char*)__UDT_ID)+((0+0))+((0+532))),8);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+540))),(((char*)__UDT_ID)+((0+0))+((0+540))),4);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+544))),(((char*)__UDT_ID)+((0+0))+((0+544))),4);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+548))),(((char*)__UDT_ID)+((0+0))+((0+548))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+550))),(((char*)__UDT_ID)+((0+0))+((0+550))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+552))),(((char*)__UDT_ID)+((0+0))+((0+552))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+554))),(((char*)__UDT_ID)+((0+0))+((0+554))),256);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+810))),(((char*)__UDT_ID)+((0+0))+((0+810))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+812))),(((char*)__UDT_ID)+((0+0))+((0+812))),1);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+813))),(((char*)__UDT_ID)+((0+0))+((0+813))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+815))),(((char*)__UDT_ID)+((0+0))+((0+815))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+817))),(((char*)__UDT_ID)+((0+0))+((0+817))),400);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+1217))),(((char*)__UDT_ID)+((0+0))+((0+1217))),400);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+1617))),(((char*)__UDT_ID)+((0+0))+((0+1617))),256);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+1873))),(((char*)__UDT_ID)+((0+0))+((0+1873))),256);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2129))),(((char*)__UDT_ID)+((0+0))+((0+2129))),256);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2385))),(((char*)__UDT_ID)+((0+0))+((0+2385))),4);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2389))),(((char*)__UDT_ID)+((0+0))+((0+2389))),256);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2645))),(((char*)__UDT_ID)+((0+0))+((0+2645))),4);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2649))),(((char*)__UDT_ID)+((0+0))+((0+2649))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2651))),(((char*)__UDT_ID)+((0+0))+((0+2651))),100);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2751))),(((char*)__UDT_ID)+((0+0))+((0+2751))),100);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2851))),(((char*)__UDT_ID)+((0+0))+((0+2851))),100);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2951))),(((char*)__UDT_ID)+((0+0))+((0+2951))),4);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2955))),(((char*)__UDT_ID)+((0+0))+((0+2955))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2957))),(((char*)__UDT_ID)+((0+0))+((0+2957))),2);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2959))),(((char*)__UDT_ID)+((0+0))+((0+2959))),4);
#line 16699 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2963))),(((char*)__UDT_ID)+((0+0))+((0+2963))),2);
#line 16699 "qb64pe.bas"
qbs_set(*(qbs**)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+0))+((0+2965))),*(qbs**)(((char*)__UDT_ID)+((0+0))+((0+2965))));
#line 16699 "qb64pe.bas"
if(!qbevent)break;evnt(16699);}while(r);
#line 16700 "qb64pe.bas"
do{
#line 16700 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LTYP=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_EMITASSIGNWHOLE_LONG_LMEMBER)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])];
#line 16700 "qb64pe.bas"
if(!qbevent)break;evnt(16700);}while(r);
#line 16701 "qb64pe.bas"
do{
#line 16701 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LSIZE=((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*_SUB_EMITASSIGNWHOLE_LONG_LMEMBER)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])];
#line 16701 "qb64pe.bas"
if(!qbevent)break;evnt(16701);}while(r);
#line 16702 "qb64pe.bas"
do{
#line 16702 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LMODE=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+522)));
#line 16702 "qb64pe.bas"
if(!qbevent)break;evnt(16702);}while(r);
#line 16703 "qb64pe.bas"
S_19170:;
#line 16703 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_LMODE== 0 ))||is_error_pending()){
#line 16703 "qb64pe.bas"
if(qbevent){evnt(16703);if(r)goto S_19170;}
#line 16703 "qb64pe.bas"
do{
#line 16703 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LMODE=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+520)));
#line 16703 "qb64pe.bas"
if(!qbevent)break;evnt(16703);}while(r);
#line 16703 "qb64pe.bas"
}
#line 16704 "qb64pe.bas"
S_19173:;
#line 16704 "qb64pe.bas"
if ((*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+520)))&FUNC_UDTMEMBERDYNDESC(_SUB_EMITASSIGNWHOLE_LONG_LMEMBER))||is_error_pending()){
#line 16704 "qb64pe.bas"
if(qbevent){evnt(16704);if(r)goto S_19173;}
#line 16704 "qb64pe.bas"
do{
#line 16704 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LOWNS= -1 ;
#line 16704 "qb64pe.bas"
if(!qbevent)break;evnt(16704);}while(r);
#line 16704 "qb64pe.bas"
}else{
#line 16704 "qb64pe.bas"
do{
#line 16704 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LOWNS= 0 ;
#line 16704 "qb64pe.bas"
if(!qbevent)break;evnt(16704);}while(r);
#line 16704 "qb64pe.bas"
}
#line 16705 "qb64pe.bas"
}
#line 16707 "qb64pe.bas"
S_19179:;
#line 16707 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_RMEMBER== 0 ))||is_error_pending()){
#line 16707 "qb64pe.bas"
if(qbevent){evnt(16707);if(r)goto S_19179;}
#line 16708 "qb64pe.bas"
do{
#line 16708 "qb64pe.bas"
SUB_GETID(_SUB_EMITASSIGNWHOLE_LONG_RIDNUM);
#line 16708 "qb64pe.bas"
if(!qbevent)break;evnt(16708);}while(r);
#line 16709 "qb64pe.bas"
S_19181:;
#line 16709 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16709 "qb64pe.bas"
if(qbevent){evnt(16709);if(r)goto S_19181;}
#line 16709 "qb64pe.bas"
do{
#line 16709 "qb64pe.bas"
goto exit_subfunc;
#line 16709 "qb64pe.bas"
if(!qbevent)break;evnt(16709);}while(r);
#line 16709 "qb64pe.bas"
}
#line 16710 "qb64pe.bas"
do{
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+0))),(((char*)__UDT_ID)+((0+0))+((0+0))),256);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+256))),(((char*)__UDT_ID)+((0+0))+((0+256))),256);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+512))),(((char*)__UDT_ID)+((0+0))+((0+512))),4);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+516))),(((char*)__UDT_ID)+((0+0))+((0+516))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+518))),(((char*)__UDT_ID)+((0+0))+((0+518))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+520))),(((char*)__UDT_ID)+((0+0))+((0+520))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+522))),(((char*)__UDT_ID)+((0+0))+((0+522))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+524))),(((char*)__UDT_ID)+((0+0))+((0+524))),8);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+532))),(((char*)__UDT_ID)+((0+0))+((0+532))),8);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+540))),(((char*)__UDT_ID)+((0+0))+((0+540))),4);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+544))),(((char*)__UDT_ID)+((0+0))+((0+544))),4);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+548))),(((char*)__UDT_ID)+((0+0))+((0+548))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+550))),(((char*)__UDT_ID)+((0+0))+((0+550))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+552))),(((char*)__UDT_ID)+((0+0))+((0+552))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+554))),(((char*)__UDT_ID)+((0+0))+((0+554))),256);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+810))),(((char*)__UDT_ID)+((0+0))+((0+810))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+812))),(((char*)__UDT_ID)+((0+0))+((0+812))),1);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+813))),(((char*)__UDT_ID)+((0+0))+((0+813))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+815))),(((char*)__UDT_ID)+((0+0))+((0+815))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+817))),(((char*)__UDT_ID)+((0+0))+((0+817))),400);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+1217))),(((char*)__UDT_ID)+((0+0))+((0+1217))),400);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+1617))),(((char*)__UDT_ID)+((0+0))+((0+1617))),256);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+1873))),(((char*)__UDT_ID)+((0+0))+((0+1873))),256);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2129))),(((char*)__UDT_ID)+((0+0))+((0+2129))),256);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2385))),(((char*)__UDT_ID)+((0+0))+((0+2385))),4);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2389))),(((char*)__UDT_ID)+((0+0))+((0+2389))),256);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2645))),(((char*)__UDT_ID)+((0+0))+((0+2645))),4);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2649))),(((char*)__UDT_ID)+((0+0))+((0+2649))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2651))),(((char*)__UDT_ID)+((0+0))+((0+2651))),100);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2751))),(((char*)__UDT_ID)+((0+0))+((0+2751))),100);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2851))),(((char*)__UDT_ID)+((0+0))+((0+2851))),100);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2951))),(((char*)__UDT_ID)+((0+0))+((0+2951))),4);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2955))),(((char*)__UDT_ID)+((0+0))+((0+2955))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2957))),(((char*)__UDT_ID)+((0+0))+((0+2957))),2);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2959))),(((char*)__UDT_ID)+((0+0))+((0+2959))),4);
#line 16710 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2963))),(((char*)__UDT_ID)+((0+0))+((0+2963))),2);
#line 16710 "qb64pe.bas"
qbs_set(*(qbs**)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2965))),*(qbs**)(((char*)__UDT_ID)+((0+0))+((0+2965))));
#line 16710 "qb64pe.bas"
if(!qbevent)break;evnt(16710);}while(r);
#line 16711 "qb64pe.bas"
do{
#line 16711 "qb64pe.bas"
qbs_set(_SUB_EMITASSIGNWHOLE_STRING_RDESC,qbs_rtrim(qbs_new_fixed((((uint8*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+554))),256,1)));
#line 16711 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16711 "qb64pe.bas"
if(!qbevent)break;evnt(16711);}while(r);
#line 16712 "qb64pe.bas"
do{
#line 16712 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RTYP=*(int32*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+512)));
#line 16712 "qb64pe.bas"
if(!qbevent)break;evnt(16712);}while(r);
#line 16713 "qb64pe.bas"
do{
#line 16713 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RSIZE=*(int32*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+544)));
#line 16713 "qb64pe.bas"
if(!qbevent)break;evnt(16713);}while(r);
#line 16714 "qb64pe.bas"
do{
#line 16714 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RDIMS=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+516)));
#line 16714 "qb64pe.bas"
if(!qbevent)break;evnt(16714);}while(r);
#line 16715 "qb64pe.bas"
S_19189:;
#line 16715 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_RDIMS<= 0 ))||is_error_pending()){
#line 16715 "qb64pe.bas"
if(qbevent){evnt(16715);if(r)goto S_19189;}
#line 16715 "qb64pe.bas"
do{
#line 16715 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RDIMS=((int16*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]))[array_check((*_SUB_EMITASSIGNWHOLE_LONG_RIDNUM)-__ARRAY_INTEGER_ARRAYELEMENTSLIST[4],__ARRAY_INTEGER_ARRAYELEMENTSLIST[5])];
#line 16715 "qb64pe.bas"
if(!qbevent)break;evnt(16715);}while(r);
#line 16715 "qb64pe.bas"
}
#line 16716 "qb64pe.bas"
do{
#line 16716 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RMODE=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+522)));
#line 16716 "qb64pe.bas"
if(!qbevent)break;evnt(16716);}while(r);
#line 16717 "qb64pe.bas"
S_19193:;
#line 16717 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_RMODE== 0 ))||is_error_pending()){
#line 16717 "qb64pe.bas"
if(qbevent){evnt(16717);if(r)goto S_19193;}
#line 16717 "qb64pe.bas"
do{
#line 16717 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RMODE=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+520)));
#line 16717 "qb64pe.bas"
if(!qbevent)break;evnt(16717);}while(r);
#line 16717 "qb64pe.bas"
}
#line 16718 "qb64pe.bas"
S_19196:;
#line 16718 "qb64pe.bas"
if ((*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+520))))||is_error_pending()){
#line 16718 "qb64pe.bas"
if(qbevent){evnt(16718);if(r)goto S_19196;}
#line 16718 "qb64pe.bas"
do{
#line 16718 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RPHYSDYN= -1 ;
#line 16718 "qb64pe.bas"
if(!qbevent)break;evnt(16718);}while(r);
#line 16718 "qb64pe.bas"
}else{
#line 16718 "qb64pe.bas"
do{
#line 16718 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RPHYSDYN= 0 ;
#line 16718 "qb64pe.bas"
if(!qbevent)break;evnt(16718);}while(r);
#line 16718 "qb64pe.bas"
}
#line 16719 "qb64pe.bas"
do{
#line 16719 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_ROWNS= -1 ;
#line 16719 "qb64pe.bas"
if(!qbevent)break;evnt(16719);}while(r);
#line 16720 "qb64pe.bas"
}else{
#line 16721 "qb64pe.bas"
do{
#line 16721 "qb64pe.bas"
SUB_BUILDUDTMEMBERARG(_SUB_EMITASSIGNWHOLE_STRING_RREF,_SUB_EMITASSIGNWHOLE_STRING_RDESC,_SUB_EMITASSIGNWHOLE_STRING_RPREP,_SUB_EMITASSIGNWHOLE_LONG_RDIMS);
#line 16721 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16721 "qb64pe.bas"
if(!qbevent)break;evnt(16721);}while(r);
#line 16722 "qb64pe.bas"
S_19204:;
#line 16722 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16722 "qb64pe.bas"
if(qbevent){evnt(16722);if(r)goto S_19204;}
#line 16722 "qb64pe.bas"
do{
#line 16722 "qb64pe.bas"
goto exit_subfunc;
#line 16722 "qb64pe.bas"
if(!qbevent)break;evnt(16722);}while(r);
#line 16722 "qb64pe.bas"
}
#line 16723 "qb64pe.bas"
do{
#line 16723 "qb64pe.bas"
SUB_GETID(_SUB_EMITASSIGNWHOLE_LONG_RIDNUM);
#line 16723 "qb64pe.bas"
if(!qbevent)break;evnt(16723);}while(r);
#line 16724 "qb64pe.bas"
S_19208:;
#line 16724 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16724 "qb64pe.bas"
if(qbevent){evnt(16724);if(r)goto S_19208;}
#line 16724 "qb64pe.bas"
do{
#line 16724 "qb64pe.bas"
goto exit_subfunc;
#line 16724 "qb64pe.bas"
if(!qbevent)break;evnt(16724);}while(r);
#line 16724 "qb64pe.bas"
}
#line 16725 "qb64pe.bas"
do{
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+0))),(((char*)__UDT_ID)+((0+0))+((0+0))),256);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+256))),(((char*)__UDT_ID)+((0+0))+((0+256))),256);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+512))),(((char*)__UDT_ID)+((0+0))+((0+512))),4);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+516))),(((char*)__UDT_ID)+((0+0))+((0+516))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+518))),(((char*)__UDT_ID)+((0+0))+((0+518))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+520))),(((char*)__UDT_ID)+((0+0))+((0+520))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+522))),(((char*)__UDT_ID)+((0+0))+((0+522))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+524))),(((char*)__UDT_ID)+((0+0))+((0+524))),8);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+532))),(((char*)__UDT_ID)+((0+0))+((0+532))),8);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+540))),(((char*)__UDT_ID)+((0+0))+((0+540))),4);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+544))),(((char*)__UDT_ID)+((0+0))+((0+544))),4);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+548))),(((char*)__UDT_ID)+((0+0))+((0+548))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+550))),(((char*)__UDT_ID)+((0+0))+((0+550))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+552))),(((char*)__UDT_ID)+((0+0))+((0+552))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+554))),(((char*)__UDT_ID)+((0+0))+((0+554))),256);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+810))),(((char*)__UDT_ID)+((0+0))+((0+810))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+812))),(((char*)__UDT_ID)+((0+0))+((0+812))),1);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+813))),(((char*)__UDT_ID)+((0+0))+((0+813))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+815))),(((char*)__UDT_ID)+((0+0))+((0+815))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+817))),(((char*)__UDT_ID)+((0+0))+((0+817))),400);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+1217))),(((char*)__UDT_ID)+((0+0))+((0+1217))),400);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+1617))),(((char*)__UDT_ID)+((0+0))+((0+1617))),256);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+1873))),(((char*)__UDT_ID)+((0+0))+((0+1873))),256);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2129))),(((char*)__UDT_ID)+((0+0))+((0+2129))),256);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2385))),(((char*)__UDT_ID)+((0+0))+((0+2385))),4);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2389))),(((char*)__UDT_ID)+((0+0))+((0+2389))),256);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2645))),(((char*)__UDT_ID)+((0+0))+((0+2645))),4);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2649))),(((char*)__UDT_ID)+((0+0))+((0+2649))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2651))),(((char*)__UDT_ID)+((0+0))+((0+2651))),100);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2751))),(((char*)__UDT_ID)+((0+0))+((0+2751))),100);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2851))),(((char*)__UDT_ID)+((0+0))+((0+2851))),100);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2951))),(((char*)__UDT_ID)+((0+0))+((0+2951))),4);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2955))),(((char*)__UDT_ID)+((0+0))+((0+2955))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2957))),(((char*)__UDT_ID)+((0+0))+((0+2957))),2);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2959))),(((char*)__UDT_ID)+((0+0))+((0+2959))),4);
#line 16725 "qb64pe.bas"
memcpy((((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2963))),(((char*)__UDT_ID)+((0+0))+((0+2963))),2);
#line 16725 "qb64pe.bas"
qbs_set(*(qbs**)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+0))+((0+2965))),*(qbs**)(((char*)__UDT_ID)+((0+0))+((0+2965))));
#line 16725 "qb64pe.bas"
if(!qbevent)break;evnt(16725);}while(r);
#line 16726 "qb64pe.bas"
do{
#line 16726 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RTYP=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_EMITASSIGNWHOLE_LONG_RMEMBER)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])];
#line 16726 "qb64pe.bas"
if(!qbevent)break;evnt(16726);}while(r);
#line 16727 "qb64pe.bas"
do{
#line 16727 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RSIZE=((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*_SUB_EMITASSIGNWHOLE_LONG_RMEMBER)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])];
#line 16727 "qb64pe.bas"
if(!qbevent)break;evnt(16727);}while(r);
#line 16728 "qb64pe.bas"
do{
#line 16728 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RMODE=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+522)));
#line 16728 "qb64pe.bas"
if(!qbevent)break;evnt(16728);}while(r);
#line 16729 "qb64pe.bas"
S_19215:;
#line 16729 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_RMODE== 0 ))||is_error_pending()){
#line 16729 "qb64pe.bas"
if(qbevent){evnt(16729);if(r)goto S_19215;}
#line 16729 "qb64pe.bas"
do{
#line 16729 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RMODE=*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+520)));
#line 16729 "qb64pe.bas"
if(!qbevent)break;evnt(16729);}while(r);
#line 16729 "qb64pe.bas"
}
#line 16730 "qb64pe.bas"
S_19218:;
#line 16730 "qb64pe.bas"
if ((*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+520)))&FUNC_UDTMEMBERDYNDESC(_SUB_EMITASSIGNWHOLE_LONG_RMEMBER))||is_error_pending()){
#line 16730 "qb64pe.bas"
if(qbevent){evnt(16730);if(r)goto S_19218;}
#line 16730 "qb64pe.bas"
do{
#line 16730 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_ROWNS= -1 ;
#line 16730 "qb64pe.bas"
if(!qbevent)break;evnt(16730);}while(r);
#line 16730 "qb64pe.bas"
}else{
#line 16730 "qb64pe.bas"
do{
#line 16730 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_ROWNS= 0 ;
#line 16730 "qb64pe.bas"
if(!qbevent)break;evnt(16730);}while(r);
#line 16730 "qb64pe.bas"
}
#line 16731 "qb64pe.bas"
}
#line 16733 "qb64pe.bas"
do{
#line 16733 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LCMP=*_SUB_EMITASSIGNWHOLE_LONG_LTYP&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 4095ll +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH+*__LONG_ISOFFSET+*__LONG_ISOFFSETINBITS);
#line 16733 "qb64pe.bas"
if(!qbevent)break;evnt(16733);}while(r);
#line 16734 "qb64pe.bas"
do{
#line 16734 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RCMP=*_SUB_EMITASSIGNWHOLE_LONG_RTYP&(*__LONG_ISFLOAT+*__LONG_ISUDT+ 4095ll +*__LONG_ISUNSIGNED+*__LONG_ISSTRING+*__LONG_ISFIXEDLENGTH+*__LONG_ISOFFSET+*__LONG_ISOFFSETINBITS);
#line 16734 "qb64pe.bas"
if(!qbevent)break;evnt(16734);}while(r);
#line 16735 "qb64pe.bas"
S_19226:;
#line 16735 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_LCMP!=*_SUB_EMITASSIGNWHOLE_LONG_RCMP))||is_error_pending()){
#line 16735 "qb64pe.bas"
if(qbevent){evnt(16735);if(r)goto S_19226;}
#line 16735 "qb64pe.bas"
do{
#line 16735 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot assign arrays of different types",39));
#line 16735 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16735 "qb64pe.bas"
if(!qbevent)break;evnt(16735);}while(r);
#line 16735 "qb64pe.bas"
do{
#line 16735 "qb64pe.bas"
goto exit_subfunc;
#line 16735 "qb64pe.bas"
if(!qbevent)break;evnt(16735);}while(r);
#line 16735 "qb64pe.bas"
}
#line 16736 "qb64pe.bas"
S_19230:;
#line 16736 "qb64pe.bas"
if (((-((*_SUB_EMITASSIGNWHOLE_LONG_LCMP&*__LONG_ISFIXEDLENGTH)!= 0 ))&(-(*_SUB_EMITASSIGNWHOLE_LONG_LSIZE!=*_SUB_EMITASSIGNWHOLE_LONG_RSIZE)))||is_error_pending()){
#line 16736 "qb64pe.bas"
if(qbevent){evnt(16736);if(r)goto S_19230;}
#line 16736 "qb64pe.bas"
do{
#line 16736 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot assign fixed-length STRING arrays with different element sizes",69));
#line 16736 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16736 "qb64pe.bas"
if(!qbevent)break;evnt(16736);}while(r);
#line 16736 "qb64pe.bas"
do{
#line 16736 "qb64pe.bas"
goto exit_subfunc;
#line 16736 "qb64pe.bas"
if(!qbevent)break;evnt(16736);}while(r);
#line 16736 "qb64pe.bas"
}
#line 16737 "qb64pe.bas"
S_19234:;
#line 16737 "qb64pe.bas"
if (((-(*_SUB_EMITASSIGNWHOLE_LONG_LDIMS<= 0 ))|(-(*_SUB_EMITASSIGNWHOLE_LONG_RDIMS<= 0 )))||is_error_pending()){
#line 16737 "qb64pe.bas"
if(qbevent){evnt(16737);if(r)goto S_19234;}
#line 16737 "qb64pe.bas"
do{
#line 16737 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot assign arrays with unknown dimensions",44));
#line 16737 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16737 "qb64pe.bas"
if(!qbevent)break;evnt(16737);}while(r);
#line 16737 "qb64pe.bas"
do{
#line 16737 "qb64pe.bas"
goto exit_subfunc;
#line 16737 "qb64pe.bas"
if(!qbevent)break;evnt(16737);}while(r);
#line 16737 "qb64pe.bas"
}
#line 16738 "qb64pe.bas"
S_19238:;
#line 16738 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_LDIMS!=*_SUB_EMITASSIGNWHOLE_LONG_RDIMS))||is_error_pending()){
#line 16738 "qb64pe.bas"
if(qbevent){evnt(16738);if(r)goto S_19238;}
#line 16738 "qb64pe.bas"
do{
#line 16738 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot assign arrays with different dimensions",46));
#line 16738 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16738 "qb64pe.bas"
if(!qbevent)break;evnt(16738);}while(r);
#line 16738 "qb64pe.bas"
do{
#line 16738 "qb64pe.bas"
goto exit_subfunc;
#line 16738 "qb64pe.bas"
if(!qbevent)break;evnt(16738);}while(r);
#line 16738 "qb64pe.bas"
}
#line 16740 "qb64pe.bas"
S_19242:;
#line 16740 "qb64pe.bas"
if ((*_SUB_EMITASSIGNWHOLE_LONG_LCMP&*__LONG_ISUDT)||is_error_pending()){
#line 16740 "qb64pe.bas"
if(qbevent){evnt(16740);if(r)goto S_19242;}
#line 16741 "qb64pe.bas"
do{
#line 16741 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LUDT=*_SUB_EMITASSIGNWHOLE_LONG_LCMP& 4095ll ;
#line 16741 "qb64pe.bas"
if(!qbevent)break;evnt(16741);}while(r);
#line 16742 "qb64pe.bas"
do{
#line 16742 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RUDT=*_SUB_EMITASSIGNWHOLE_LONG_RCMP& 4095ll ;
#line 16742 "qb64pe.bas"
if(!qbevent)break;evnt(16742);}while(r);
#line 16743 "qb64pe.bas"
S_19245:;
#line 16743 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_LUDT!=*_SUB_EMITASSIGNWHOLE_LONG_RUDT))||is_error_pending()){
#line 16743 "qb64pe.bas"
if(qbevent){evnt(16743);if(r)goto S_19245;}
#line 16743 "qb64pe.bas"
do{
#line 16743 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot assign arrays of different types",39));
#line 16743 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16743 "qb64pe.bas"
if(!qbevent)break;evnt(16743);}while(r);
#line 16743 "qb64pe.bas"
do{
#line 16743 "qb64pe.bas"
goto exit_subfunc;
#line 16743 "qb64pe.bas"
if(!qbevent)break;evnt(16743);}while(r);
#line 16743 "qb64pe.bas"
}
#line 16745 "qb64pe.bas"
S_19249:;
#line 16745 "qb64pe.bas"
if ((*_SUB_EMITASSIGNWHOLE_LONG_LMEMBER)||is_error_pending()){
#line 16745 "qb64pe.bas"
if(qbevent){evnt(16745);if(r)goto S_19249;}
#line 16746 "qb64pe.bas"
S_19250:;
#line 16746 "qb64pe.bas"
if ((*_SUB_EMITASSIGNWHOLE_LONG_LOWNS)||is_error_pending()){
#line 16746 "qb64pe.bas"
if(qbevent){evnt(16746);if(r)goto S_19250;}
#line 16747 "qb64pe.bas"
do{
#line 16747 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LPHYSDYN= -1 ;
#line 16747 "qb64pe.bas"
if(!qbevent)break;evnt(16747);}while(r);
#line 16748 "qb64pe.bas"
S_19252:;
#line 16748 "qb64pe.bas"
}else{
#line 16748 "qb64pe.bas"
if (*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_LID)+((0+520)))){
#line 16748 "qb64pe.bas"
if(qbevent){evnt(16748);if(r)goto S_19252;}
#line 16749 "qb64pe.bas"
S_19253:;
#line 16749 "qb64pe.bas"
if ((FUNC_UDTDYNHASMEMBERARRAYS(_SUB_EMITASSIGNWHOLE_LONG_LUDT,_SUB_EMITASSIGNWHOLE_LONG_LMODE))||is_error_pending()){
#line 16749 "qb64pe.bas"
if(qbevent){evnt(16749);if(r)goto S_19253;}
#line 16749 "qb64pe.bas"
do{
#line 16749 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_LPHYSDYN= -1 ;
#line 16749 "qb64pe.bas"
if(!qbevent)break;evnt(16749);}while(r);
#line 16749 "qb64pe.bas"
}
#line 16750 "qb64pe.bas"
}
#line 16750 "qb64pe.bas"
}
#line 16751 "qb64pe.bas"
}
#line 16752 "qb64pe.bas"
S_19258:;
#line 16752 "qb64pe.bas"
if ((*_SUB_EMITASSIGNWHOLE_LONG_RMEMBER)||is_error_pending()){
#line 16752 "qb64pe.bas"
if(qbevent){evnt(16752);if(r)goto S_19258;}
#line 16753 "qb64pe.bas"
S_19259:;
#line 16753 "qb64pe.bas"
if ((*_SUB_EMITASSIGNWHOLE_LONG_ROWNS)||is_error_pending()){
#line 16753 "qb64pe.bas"
if(qbevent){evnt(16753);if(r)goto S_19259;}
#line 16754 "qb64pe.bas"
do{
#line 16754 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RPHYSDYN= -1 ;
#line 16754 "qb64pe.bas"
if(!qbevent)break;evnt(16754);}while(r);
#line 16755 "qb64pe.bas"
S_19261:;
#line 16755 "qb64pe.bas"
}else{
#line 16755 "qb64pe.bas"
if (*(int16*)(((char*)_SUB_EMITASSIGNWHOLE_UDT_RID)+((0+520)))){
#line 16755 "qb64pe.bas"
if(qbevent){evnt(16755);if(r)goto S_19261;}
#line 16756 "qb64pe.bas"
S_19262:;
#line 16756 "qb64pe.bas"
if ((FUNC_UDTDYNHASMEMBERARRAYS(_SUB_EMITASSIGNWHOLE_LONG_RUDT,_SUB_EMITASSIGNWHOLE_LONG_RMODE))||is_error_pending()){
#line 16756 "qb64pe.bas"
if(qbevent){evnt(16756);if(r)goto S_19262;}
#line 16756 "qb64pe.bas"
do{
#line 16756 "qb64pe.bas"
*_SUB_EMITASSIGNWHOLE_LONG_RPHYSDYN= -1 ;
#line 16756 "qb64pe.bas"
if(!qbevent)break;evnt(16756);}while(r);
#line 16756 "qb64pe.bas"
}
#line 16757 "qb64pe.bas"
}
#line 16757 "qb64pe.bas"
}
#line 16758 "qb64pe.bas"
}
#line 16760 "qb64pe.bas"
S_19267:;
#line 16760 "qb64pe.bas"
if ((-(*_SUB_EMITASSIGNWHOLE_LONG_LPHYSDYN!=*_SUB_EMITASSIGNWHOLE_LONG_RPHYSDYN))||is_error_pending()){
#line 16760 "qb64pe.bas"
if(qbevent){evnt(16760);if(r)goto S_19267;}
#line 16760 "qb64pe.bas"
do{
#line 16760 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot assign these TYPE values because their nested-array storage layouts are incompatible",91));
#line 16760 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16760 "qb64pe.bas"
if(!qbevent)break;evnt(16760);}while(r);
#line 16760 "qb64pe.bas"
do{
#line 16760 "qb64pe.bas"
goto exit_subfunc;
#line 16760 "qb64pe.bas"
if(!qbevent)break;evnt(16760);}while(r);
#line 16760 "qb64pe.bas"
}
#line 16761 "qb64pe.bas"
S_19271:;
#line 16761 "qb64pe.bas"
if ((*_SUB_EMITASSIGNWHOLE_LONG_LPHYSDYN&(-(*_SUB_EMITASSIGNWHOLE_LONG_LMODE!=*_SUB_EMITASSIGNWHOLE_LONG_RMODE)))||is_error_pending()){
#line 16761 "qb64pe.bas"
if(qbevent){evnt(16761);if(r)goto S_19271;}
#line 16761 "qb64pe.bas"
do{
#line 16761 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot assign these TYPE values because their nested-array storage layouts are incompatible",91));
#line 16761 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16761 "qb64pe.bas"
if(!qbevent)break;evnt(16761);}while(r);
#line 16761 "qb64pe.bas"
do{
#line 16761 "qb64pe.bas"
goto exit_subfunc;
#line 16761 "qb64pe.bas"
if(!qbevent)break;evnt(16761);}while(r);
#line 16761 "qb64pe.bas"
}
#line 16762 "qb64pe.bas"
}
#line 16764 "qb64pe.bas"
S_19276:;
#line 16764 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_EMITASSIGNWHOLE_STRING_LPREP,qbs_new_txt_len("",0))))||is_error_pending()){
#line 16764 "qb64pe.bas"
if(qbevent){evnt(16764);if(r)goto S_19276;}
#line 16764 "qb64pe.bas"
do{
#line 16764 "qb64pe.bas"
SUB_WRITEBUFRAWDATA(&(pass2278=*__LONG_MAINTXTBUF),_SUB_EMITASSIGNWHOLE_STRING_LPREP);
#line 16764 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16764 "qb64pe.bas"
if(!qbevent)break;evnt(16764);}while(r);
#line 16764 "qb64pe.bas"
}
#line 16765 "qb64pe.bas"
S_19279:;
#line 16765 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(_SUB_EMITASSIGNWHOLE_STRING_RPREP,qbs_new_txt_len("",0))))||is_error_pending()){
#line 16765 "qb64pe.bas"
if(qbevent){evnt(16765);if(r)goto S_19279;}
#line 16765 "qb64pe.bas"
do{
#line 16765 "qb64pe.bas"
SUB_WRITEBUFRAWDATA(&(pass2279=*__LONG_MAINTXTBUF),_SUB_EMITASSIGNWHOLE_STRING_RPREP);
#line 16765 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16765 "qb64pe.bas"
if(!qbevent)break;evnt(16765);}while(r);
#line 16765 "qb64pe.bas"
}
#line 16767 "qb64pe.bas"
S_19282:;
#line 16767 "qb64pe.bas"
if ((*_SUB_EMITASSIGNWHOLE_LONG_LCMP&*__LONG_ISUDT)||is_error_pending()){
#line 16767 "qb64pe.bas"
if(qbevent){evnt(16767);if(r)goto S_19282;}
#line 16768 "qb64pe.bas"
S_19283:;
#line 16768 "qb64pe.bas"
if (((-(*_SUB_EMITASSIGNWHOLE_LONG_LMEMBER== 0 ))&*_SUB_EMITASSIGNWHOLE_LONG_LPHYSDYN&(FUNC_UDTDYNHASMEMBERARRAYS(_SUB_EMITASSIGNWHOLE_LONG_LUDT,_SUB_EMITASSIGNWHOLE_LONG_LMODE)))||is_error_pending()){
#line 16768 "qb64pe.bas"
if(qbevent){evnt(16768);if(r)goto S_19283;}
#line 16769 "qb64pe.bas"
do{
#line 16769 "qb64pe.bas"
SUB_APPENDDYNUDTARRAYASSIGN(_SUB_EMITASSIGNWHOLE_STRING_LDESC,_SUB_EMITASSIGNWHOLE_STRING_RDESC,_SUB_EMITASSIGNWHOLE_LONG_LUDT,_SUB_EMITASSIGNWHOLE_LONG_LMODE,_SUB_EMITASSIGNWHOLE_LONG_LDIMS);
#line 16769 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16769 "qb64pe.bas"
if(!qbevent)break;evnt(16769);}while(r);
#line 16770 "qb64pe.bas"
}else{
#line 16771 "qb64pe.bas"
do{
#line 16771 "qb64pe.bas"
SUB_APPENDWHOLEARRAYASSIGN(_SUB_EMITASSIGNWHOLE_STRING_LDESC,_SUB_EMITASSIGNWHOLE_STRING_RDESC,_SUB_EMITASSIGNWHOLE_LONG_LCMP,_SUB_EMITASSIGNWHOLE_LONG_LSIZE,_SUB_EMITASSIGNWHOLE_LONG_LDIMS,_SUB_EMITASSIGNWHOLE_LONG_LPHYSDYN,_SUB_EMITASSIGNWHOLE_LONG_LMODE);
#line 16771 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16771 "qb64pe.bas"
if(!qbevent)break;evnt(16771);}while(r);
#line 16772 "qb64pe.bas"
}
#line 16773 "qb64pe.bas"
}else{
#line 16774 "qb64pe.bas"
do{
#line 16774 "qb64pe.bas"
SUB_APPENDWHOLEARRAYASSIGN(_SUB_EMITASSIGNWHOLE_STRING_LDESC,_SUB_EMITASSIGNWHOLE_STRING_RDESC,_SUB_EMITASSIGNWHOLE_LONG_LCMP,_SUB_EMITASSIGNWHOLE_LONG_LSIZE,_SUB_EMITASSIGNWHOLE_LONG_LDIMS,&(pass2280= 0 ),&(pass2281= 0 ));
#line 16774 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16774 "qb64pe.bas"
if(!qbevent)break;evnt(16774);}while(r);
#line 16775 "qb64pe.bas"
}
#line 16776 "qb64pe.bas"
exit_subfunc:;
#line 16776 "qb64pe.bas"
free_mem_lock(sf_mem_lock);
#line 16776 "qb64pe.bas"
#include "free40.txt"
#line 16776 "qb64pe.bas"
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;
#line 16776 "qb64pe.bas"
cmem_sp=tmp_cmem_sp;
#line 16776 "qb64pe.bas"
}
