Static Function ReportDef() Local aOrdem := {STR0004,STR0005,STR0006,STR0007,STR0008,STR0009} //" Codigo Produto " ### " Ordem Producao " ### " Tipo Produto" ### "Grupo Produto" ### "Centro Custo" ### "Nr. Documento " Local cTitle := STR0001 //"Relacao das Movimentacoes Internas" Local oReport Local oSection1 Local cAliasSD3 := GetNextAlias() Pergunte("RMTR300",.F.) oReport:= TReport():New("RMATR300",cTitle,"RMTR300", {|oReport| ReportPrint(oReport,aOrdem,cAliasSD3)},STR0002+" "+ STR0003 ) //"Lista as movimentacoes internas da empresa ,ou seja ,Requisicoes ,""Devolucoes ,Producoes e Estornos de Producao." oReport:SetTotalInLine(.F.) oReport:SetLandscape() oSection1:= TRSection():New(oReport,STR0047,{"SD3","SB1","SF5","CTT"},aOrdem) // "Produtos" oSection1:SetTotalInLine(.F.) oSection1:SetHeaderPage() oSection1:SetPreview() Return(oReport)