Histórico da Página
...
Índice | ||||||
---|---|---|---|---|---|---|
|
Informações | ||
---|---|---|
| ||
Essa rotina foi ajustada para atender a Lei Geral de Proteção de Dados (Lei n° 13.70), sendo que alguns campos que apresentam informações consideradas como dados sensíveis e/ou pessoais, serão ofuscados deixando de ser legíveis. |
01. VISÃO GERAL
Essa rotina possibilita a geração dos cheques antes que seja realizada a baixa dos títulos, podendo ser gerado um único cheque para vários títulos do mesmo fornecedor. Quando ocorrer a baixa, fica vinculado o banco/agencia/conta/cheque.
...
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#Include 'Protheus.ch' //--------------------------------- // CHEQUE SOBRE TITULOS | //--------------------------------- User Function MyFA390() Local aArray := {} Local cCheque:= "2906001" Local nOpc := 2 // 2 - Chq s/ titulo, 3 - Avulso Private lMsErroAuto := .F. aArray := { { "AUTBANCO" , "237" , NIL },; { "AUTAGENCIA" , "33901" , NIL },; { "AUTCONTA" , "125008 " , , NIL },; { "AUTCHEQUE" , cCheque , NIL },; { "AUTVENCINI" , CtoD("21/06/2016") , NIL },; // Remover caso utilizar opc 3 { "AUTVENCFIM" , CtoD("29/06/2016"), NIL },; // Remover caso utilizar opc 3 // Remover caso utilizar opc 3 { "AUTVALOR" , 5000 { "AUTVALOR" , 5000, NIL },; { "AUTFORN" , "001" , NIL },; { "AUTBENEF" , "F PADRAO " , NIL },; { "AUTNATUREZA" , "10101 " , NIL } } MsExecAuto( { |x,y,z| FINA390(x,y,z)} ,0, aArray, nOpc) If lMsErroAuto MostraErro() Else Alert("O cheque "+cCheque+" foi gerado com sucesso!") Endif Return |
03. OPERAÇÕES
- Avulsos
Procedimento para inserção de cheques que não possuam nenhum titulo vinculado a eles.
- Cheque sobre títulos
Procedimento que permite ao usuário, inserir e vincular um cheque a titulo que ainda não sofreu baixas.
- Pesquisa
Pesquisa o titulo dentro do arquivo de contas a pagar, tendo como resultado o titulo posicionado e destacado na browse.
- Cancelar
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#Include 'Protheus.ch'
//---------------------------------
// CHEQUE SOBRE TITULOS |
//---------------------------------
User Function MyCanFA390()
Local aArray := {}
Local cCheque:= "2906001"
Private lMsErroAuto := .F.
aArray := { { "AUTBANCO" , "237" , NIL },;
{ "AUTAGENCIA" , "33901" , NIL },;
{ "AUTCONTA" , "125008 " , NIL },;
{ "AUTCHEQUE" , cCheque , NIL },;
{ "AUTCHQIMPR" , .T. , NIL }}// Identifica se deve ou não reutilizar o cheque caso impresso.
MsExecAuto( { |x,y,z| FINA390(x,y,z)} ,0, aArray, 5)
If lMsErroAuto
MostraErro()
Else
Alert("O cheque "+cCheque+" foi cancelado com sucesso!")
Endif
Return |
03. OPERAÇÕES
- Avulsos
Procedimento para inserção de cheques que não possuam nenhum titulo vinculado a eles.
- Cheque sobre títulos
Procedimento que permite ao usuário, inserir e vincular um cheque a titulo que ainda não sofreu baixas.
- Pesquisa
Pesquisa o titulo dentro do arquivo de contas a pagar, tendo como resultado o titulo posicionado e destacado na browse.
- Cancelar
Procedimento para exclusão do cheque Procedimento para exclusão do cheque e cancelamento do movimento bancário.
...
O cheque é pago quando há saldo na conta bancária que sera verificada na tabela SE8-Saldos bancários da empresa/unidade de negocio/filial onde o usuário estiver logado .Se não houver saldo, o cheque é considerado sem fundos e é devolvido, tendo que utilizar a operação Cancelarestiver logado .Se não houver saldo, o cheque é considerado sem fundos e é devolvido, tendo que utilizar a operação Cancelar.
Nota | ||
---|---|---|
| ||
Não será Possível gerar Cheques sobre Pagamentos Antecipados, Abatimentos, Notas de Débitos a Fornecedores e Títulos Provisórios. |
Informações | ||
---|---|---|
| ||
Caso queira, emitir cheques para Pagamentos Antecipados, favor utilizar Rotina Baixas Pagar Automática (FINA090), selecionando nos parâmetros(F12) a opção "Gera Cheque Autom."=Sim. |
06. CALCULO DE IMPOSTOS
Deck of Cards | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
...