quarta-feira, 3 de junho de 2015

Função Consulta Taxa Moeda (RecMoeda)

Rotina que faz a verificação de valor da moeda em determinada data:
nTaxa := RecMoeda(dData,cMoeda)
nTaxa := Retorna valor da moeda solicitada
dData := Data da consulta da moeda
cMoeda := Moeda a qual deseja-se verIficar o valor

terça-feira, 2 de junho de 2015

Função de Consulta Saldo em Estoque

Rotina padrão do sistema que consulta saldo em estoque para um determinado produto e armazém.
SaldoSb2()

Exemplo:
dbSelectArea("SB2")
dbSeek(xFilial("SB2") + SB1->B1_COD + SB1->B1_LOCPAD)
nSaldo := Transform(SaldoSb2(),”@E 9,999,999.99")


Obs.: o registro deve estar posicionado na tabela SB2

Criar Registro Saldos em Estoque - ADVPL

CriaSB2(cProduto,cLocInf)
cProduto = Código do produto;
cLocInf = Código do armazém que deseja criar;

segunda-feira, 30 de junho de 2014

Customizando Erro msExecAuto




A inclusão do complemento do erro do msExecAuto deve ser feito somente após executar o msExecAuto e também somente se a variável de controle de erro for verdadeira, pois se adicionar a informação, a chamada da função AutoGrLog irá setar o lMSErroAuto como verdadeiro, ou seja, como se houvesse algum erro.

lMsErroAuto := .F.
MSExecAuto({|x,y,z| Fina050(x,y,z)},aVetor,,3)
If lMsErroAuto
   AutoGrLog( "Data.........: " + DtoC(Date()) )
   AutoGrLog( "Hora.........: " + Time() )
   AutoGrLog( "Aonde........: ExcluiOP " )
   AutoGrLog( "Registro.....: " + TMP->PREFIXO + TMP->PARCELA + TMP->TITULO )

   MostraErro()
EndIf

segunda-feira, 28 de abril de 2014

PROCEDIMENTO PARA GERAR O REGISTRO F100 - VIA DOCUMENTO DE ENTRADA


1º - CRIAR NO CONFIGURADOR NA TABELA GENÉRICA 42 UMA ESPÉCIE DE DOCUMENTO.
Exemplo: ND - NOTA DE DESPESA


2º - INFORMAR ESTA ESPÉCIE NO PARÂMETRO MV_DOCSPD
EXEMPLO: MV_DOCSPD=ND

3º - CRIAR NATUREZA, PREENCHER OS CAMPOS:

Apur. PIS (ED_APURPIS)=CREDITO


Apur. COFINS (ED_APURCOF)=CREDITO


% Ap. PIS (ED_PCAPPIS)

% Ap. COFINS (ED_PCAPCPF)

Tipo Natureza (ED_TIPO)

Cond Natureza (ED_COND)

Tp Reg (ED_TPREG)

CST COFINS (ED_CSTCOF)

CST PIS (ED_CSTPIS)

Op. Financ (ED_CLASFIS)

Ind Cmulat (ED_INDCMLT)


4º - CRIAR TES

O TES não fará escrituração de nenhum livro fiscal:

Gera Duplic. (F4_DUPLIC) = ****SIM *****

Calcula PIS e COFINS (F4_PISCOF) = NÃO PRECISAR PREENCHER

Credito de PIS/COFINS (F4_PISCRED)= NÃO PRECISAR PREENCHER

Sit. Trib. PIS (F4_CSTPIS) = NÃO PRECISAR PREENCHER

Sit. Trib. COF (F4_CSTCOF) = NÃO PRECISAR PREENCHER


5º - GERAR A NOTA COM A SÉRIE/ESPÉCIE CRIADA

6º - GERAR O ARQUIVO DO SPED PIS COFINS E CONFERIR O REGISTRO F100.




Fonte: http://tdn.totvs.com/pages/releaseview.action;jsessionid=D1AF99B80A609CE8D8EA8EB51EA8CE8D?pageId=49283644

quarta-feira, 9 de abril de 2014

Como é nomeado o arquivo de apuração de Impostos?

Versões Protheus 10, Protheus 11



Ao realizar a apuração de ICMS ou IPI o sistema, por padrão, salva um arquivo na pasta SYSTEM do sistema, este arquivo obedece a configuração abaixo:
A – Número do Livro Selecionado, se for * o Sistema fixa a letra A, se no cadastro do TES for informado o número do livro e nos parâmetros da Apuração for informado o número do livro de 1 à 9 ele preenche com o próprio número do livro 1F010101.IC0

AA010101.IC0

A – Mês de apuração de ICMS/IPI, conforme tabela abaixo:
A Janeiro; B Fevereiro; C Março; D Abril; E Maio; F Junho; G Julho; H Agosto; I Setembro; J Outubro; K Novembro; L Dezembro; S Semestral; X Anual.
01 – Ano de apuração, últimos 2 dígitos.
01 – Código da Empresa.
01 – Código da Filial.

IC* - Extensão do Arquivo, IC – ICMS, IP – IPI CP - PIS e COFINS:

* 1 – Primeiro Decêndio

* 2 – Segundo Decêndio

* 3 – Terceiro Decêndio

* 0 – Mensal

* 1 – Primeira Quinzena

* 2 – Segunda Quinzena



Observando as informações Exemplo: AA010101.IC0;

Entende-se

A - LIVRO

l - MÊS

12 - ANO

02 - COD. DA EMPRESA

03 - COD. DA FILIAL

.ic0 ou .ip0




FONTE: http://tdn.totvs.com/pages/releaseview.action?pageId=51253287

segunda-feira, 7 de abril de 2014

STATUS DA TABELA SPED050 E SPED052

==============================================================
STATUS DA TABELA SPED050      
                                
Status NFe                                              
[1] NFe Recebida                                  
[2] NFe Assinada                                  
[3] NFe com falha no schema XML                    
[4] NFe transmitida                                 
[5] NFe com problemas                              
[6] NFe autorizada                                 
[7] Cancelamento
                                  
Status Cancelamento/inutilizacão                        
[1] NFe Recebida                                  
[2] NFe Cancelada                                  
[3] NFe com falha de cancelamento/inutilizacao

Status Mail                                              
[1] A transmitir                                  
[2] Transmitido                                      
[3] Bloqueio de transmissão - cancelamento/inutiliza

Status da SPED052                                         
[1] Lote transmitido                                 
[2] Lote recebido com sucesso                    
[3] Lote com erro
====================