Perguntas Execautos FINA070 e FINA040 dando erro, se juntos.

				//+----------------------------------------------------+
				//| Início da baixa do CDT e DBT do consultor(a).	   |
				//+----------------------------------------------------+
    				
    			aBaixa := {{"E1_PREFIXO"  ,"COM"                       ,Nil},;
					{"E1_NUM"	   ,"342425"                    ,Nil},; 
					{"E1_TIPO"	   ,"DBT"                        ,Nil},;
					{"E1_PARCELA"	   ,"1"                        ,Nil},;
					{"AUTMOTBX"	   ,"NOR"                       ,Nil},;
					{"AUTBANCO"    ,"CL1"                       ,Nil},;
					{"AUTAGENCIA"  ,"00001"             			,Nil},;
					{"AUTCONTA"    ,"0000000001"           		,Nil},;
					{"AUTDTBAIXA"  ,dDataBase                   ,Nil},;
					{"AUTDTCREDITO",dDataBase                   ,Nil},;
					{"AUTHIST"	   ,"BAIXA TESTE"               ,Nil},; 
					{"AUTJUROS",	0										,nIL},;
					{"AUTVALREC"    ,0                        ,Nil }}

                lMsErroAuto := .F.            

				Begin Transaction
								             
                MSExecAuto({|x,y| Fina070(x,y)},aBaixa,5)

                IF lMsErroAuto   
                	MostraErro()
    		        DisarmTransaction()
	                Break                  
                Endif            
                
                End Transaction

				//+----------------------------------------------------+
				//| Fim da baixa do CDT e DBT do consultor(a).	   	   |
				//+----------------------------------------------------+

				aTit := { {"E1_PREFIXO"	,"COM"		,Nil, .F.},; 
	   					{"E1_NUM"    	,cNumero   	,Nil, .F.},; 
						{"E1_PARCELA"	,"A"		,Nil},; 
			        	{"E1_TIPO"   	,cTipo      ,Nil, .F.},; 
			    	    {"E1_NATUREZ"	,GetMv("MV_NATCOMV")	,Nil},; 
			            {"E1_CLIENTE"	,cConsult	,Nil},; 
			        	{"E1_LOJA"   	,cLoja      ,Nil},; 
			            {"E1_EMISSAO"	,dDatabase	,Nil},; 
			    	    {"E1_VENCTO" 	,MV_PAR05  	,Nil},; 
			        	{"E1_VENCREA"	,MV_PAR05  	,Nil},; 
			            {"E1_VALOR"  	,nTotCons	,Nil},;
			            {"E1_ORIGEM"	,"RFINA11"	,Nil}} 
			            		
				lMsErroAuto := .F. 
	           
	            Begin Transaction
				
				MSExecAuto({|a,b| FINA040(a,b)},aTit ,3) 								

                IF lMsErroAuto   
                	MostraErro()
    		        DisarmTransaction()
	                Break                  
                Endif            
                
                End Transaction