01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Logística
Módulo:SIGATMS - Gestão de Transportes 

02. DESCRIÇÃO

Ponto de entrada utilizado para o ajuste de informações nos dados da NF de Saída gerados a partir do Cálculo de documentos de transporte.

Retorno:

cRet- Texto a ser incluído na tabela SD2.

03. EXEMPLO DE UTILIZAÇÃO

Programa Fonte 

#INCLUDE 'TOTVS.CH'

User Function TM200SD2()

    Local cRet      := ""
    Local aStruSD2  := SD2->(dbStruct())
    Local lProc    := FUNNAME()=="XPTO"

    IF lProc
        conout("[TESTE TM200SD2] -> PASSOU")
        nPos := AScan(aStruSD2,{|x| Upper(alltrim(x[1])) == "D2_DIFAL"})
        If nPos > 0
            cRet +=  ',MaFisAlt("IT_DIFAL"  ,aItemOri[nY,'+ cValtochar(nPos)   + ' ],nY,.F.,,,,.F.) '
        EndIF

        nPos := AScan(aStruSD2,{|x| Upper(alltrim(x[1])) == "D2_ALFCCMP"})
        If nPos > 0
            cRet +=  ',MaFisAlt("IT_ALFCCMP"  ,aItemOri[nY,'+ cValtochar(nPos)   + ' ],nY,.F.,,,,.F.) '
        EndIF

        nPos := AScan(aStruSD2,{|x| Upper(alltrim(x[1])) == "D2_ALIQCMP"})
        If nPos > 0
            cRet +=  ',MaFisAlt("IT_ALIQCMP"  ,aItemOri[nY,'+ cValtochar(nPos)   + ' ],nY,.F.,,,,.F.)  '
        EndIF
        
        cRet += ", MaItArred(nY) "
        cRet += ", MaFisLF(nY) " // Atualiza livros fiscais
    ENDIF

Return cRet


04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS




<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>