Histórico da Página
...
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#INCLUDE "Protheus.ch" //------------------------------- // Baixa do titulo a receber //------------------------------- User Function BAIXA070() Local aBaixa := {} aBaixa := {{"E1_PREFIXO" ," " ,Nil },; {"E1_NUM" ,"200 " ,Nil },; {"E1_TIPO" ,"NF " ,Nil },; {"AUTMOTBX" ,"NOR" ,Nil },; {"AUTBANCO" ,"001" ,Nil },; {"AUTAGENCIA" ,"00001" ,Nil },; {"AUTCONTA" ,"0000000001" ,Nil },; {"AUTDTBAIXA" ,dDataBase ,Nil },; {"AUTDTCREDITO",dDataBase ,Nil },; {"AUTHIST" ,"BAIXA TESTE" ,Nil },; {"AUTJUROS" ,0 ,Nil,.T.},; {"AUTVALREC" ,700 ,Nil }} MSExecAuto({|x,y| Fina070(x,y)},aBaixa,3) Return //------------------------------- // BaixaCancelamento da baixa do titulo a receber //------------------------------- User Function CANC070() Local aBaixa := {} aBaixa := {{"E1_PREFIXO" ," " ,Nil },; {"E1_NUM" ,"200 " ,Nil },; {"E1_TIPO" ,"NF " ,Nil },; {"AUTMOTBX" ,"NOR" ,Nil },; {"AUTBANCO" ,"001" ,Nil },; {"AUTAGENCIA" ,"00001" ,Nil },; {"AUTCONTA" ,"0000000001" ,Nil },; {"AUTDTBAIXA" ,dDataBase ,Nil },; {"AUTDTCREDITO",dDataBase ,Nil },; {"AUTHIST" ,"BAIXA TESTE" ,Nil },; {"AUTJUROS" ,0 ,Nil,.T.},; {"AUTVALREC" ,700 ,Nil }} MSExecAuto({|x,y| Fina070(x,y)},aBaixa,5) Return |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas