4 Replies Latest reply: Oct 14, 2015 2:38 PM by agnaldo neves RSS

    Erro data Calendario

    agnaldo neves

      Peguei esta rotina do forum,

      Mas ele da erro na data Data_Efetivado_Estoque

      Quando seleciono o Ano e Mês, só funciona a tabela Plano Contas

      2015-10-13_20-42-38.jpg

       

      SET ThousandSep='.';
      SET DecimalSep=',';
      SET MoneyThousandSep='.';
      SET MoneyDecimalSep=',';
      SET MoneyFormat='R$  #.##0,00;-R$  #.##0,00';
      SET TimeFormat='hh:mm:ss';
      SET DateFormat='DD/MM/YYYY';
      SET TimestampFormat='DD/MM/YYYY hh:mm:ss[.fff]';
      SET MonthNames='jan;fev;mar;abr;mai;jun;jul;ago;set;out;nov;dez';
      SET DayNames='seg;ter;qua;qui;sex;sáb;dom';
      
      
      
      
      
      LET vDateMin=num(makedate(2015,01,01));
      LET vDateMax=floor(monthend(today()));
      LET vDateToday = num(today());
      
      
      Calender:
      LOAD Distinct Date($(vDateMin) + RowNo() - 1,'DD-MMM-YYYY') AS Date,
      month(Date($(vDateMin) + RowNo() - 1,'DD-MMM-YYYY')) AS Month,
      year(Date($(vDateMin) + RowNo() - 1,'DD-MMM-YYYY')) AS Year,
        monthname(Date($(vDateMin) + RowNo() - 1,'DD-MMM-YYYY')) AS Monthname,
        Week(Date($(vDateMin) + RowNo() - 1,'DD-MMM-YYYY')) AS Week
      
      AutoGenerate 1 While $(vDateMin) + IterNo() - 1 <=$(vDateMax);
      
      
      OLEDB CONNECT32 TO [Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Initial Catalog=S9_Real;Data Source=localhost\shopcontrol9;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=AGNALDO;Use Encryption for Data=False;Tag with column collation when possible=False] (XPassword is YMNUTJVMODaCWYIGTBDB);
      //-------- Start Multiple Select Statements ------
      
      
      Tab_Mov:
      LOAD
          "Movimento_Prod_Serv_Qtde",
          Movimento_Prod_Serv_Preco as Preco_Final,
          "Movimento_Tipo_Operacao",
          Data_Efetivado_Estoque AS Date;
      SQL SELECT *
      FROM "S9_Real".dbo."View_Vendas"
      WHERE Movimento_Data>= '2015-01-01';
      
      
      PlanoContas:
      LOAD
          Data_QuitacaoP as Date ,
          SituacaoP,
          "Tipo_ContaP",
          "Valor_BaseP",
          "Pagar_ReceberP",     
         Exclui_DRE,    
          CodigoFilialP,
          "Valor_QuitadoP";
      SQL SELECT *
      FROM "S9_Real".dbo."View_A_temp"
      WHERE Data_QuitacaoP>= '2015-01-01';;