Tabela
DTH	Destino de Calculo
Campo	Tipo	Tamanho	Decimal	Titulo	Formato	Validacao	F3	Contexto	Lista	Condicao	PYME
DTH_FILIAL	C	2	0	Filial							N
DTH_CLIDEV	C	6	0	Devedor	@!	ExistCpo("SA1",M->DTH_CLIDEV+AllTrim(M->DTH_LOJDEV))	SA1				N
DTH_LOJDEV	C	2	0	Loja Devedor	@!	ExistCpo("SA1",M->DTH_CLIDEV+M->DTH_LOJDEV)					N
DTH_NOMDEV	C	40	0	Nome Devedor	@!			V			N
DTH_CDRDES	C	6	0	Cod.Reg.Des.	@!	ExistCpo("DUY",NIL,1) .And. TmsA090Vld() .And. TmsTipReg(M->DTH_CDRDES,"2")	DUY				N
DTH_REGDES	C	30	0	Reg.Destino	@!	TmsPesqRegiao("DTH_CDRDES","DTH_REGDES")		V			N
DTH_CDRCAL	C	6	0	Cod.Reg.Cal.	@!	ExistCpo("DUY",NIL,1) .And. TmsA090Vld()	DUY				N
DTH_REGCAL	C	30	0	Reg.Calculo	@!	TmsPesqRegiao("DTH_CDRCAL","DTH_REGCAL")		V			N
DTH_ATIVO	C	1	0	Ativo	@!	Pertence("12")			1=Sim;2=Nao		N