Histórico da Página

...

Bloco de código

language	vb
theme	Midnight
firstline	1
title	F200TIT
linenumbers	true

#INCLUDE "Totvs.ch"
  
/*/{Protheus.doc} F200TIT()
  
    Ponto de Entrada para tratamentos de dados após baixa de títulos do retorno de cobrança da rotina FINA200 -
    função fA200Ger
  
/*/
User Function F200TIT()
 
Local aAreaSE1 := GetArea()

DbSelectArea("SE1")

If (SE1->E1_SALDO == 0)
 .and. cNumTit == SE1->E1_PREFIXO+SE1->E1_NUM+SE1->E1_PARCELA)
	RecLock("SE1",.f.)
	    SE1->E1_BAIXA  := dBaixa
	SE1->E1_DTALT   := dDataBase
	    If cBanco <> "341"
		        SE1->E1_HISTBXHIST := "VLR. RECREC1. BCO. "+cBanco
	    Else
		        SE1->E1_HISTBXHIST := "COBR DIRETA ITAU"
	    EndIf
	    MsUnlock()
EndIf	  
 
RestArea(aAreaSE1)
 
Return

HTML

<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>

Árvore de páginas

Versões comparadas

Versão antiga 3

Nova versão Atual

Chave