Descrição

Caso o usuário definir que seja necessária a definição quanto as opções de geração de Guia de DIFAL, Lançamento Contábil On-line e Guia de FECP, poderá defini-las com "SIM" ou "NAO" neste ponto de entrada.

Observações

O retorno deve ser um array com quatro posições, com "SIM" ou "NAO", sendo:

  • Posição 1: define se gera Guia de DIFAL
  • Posição 2: define se Lançamento Contábil On-line
  • Posição 3: define se gera Guia de FECP
  • Posição 4: define se gera Guia referente a ICMS-ST

Exemplos

User Function LJRETGUIA()
Local aRet      := {}
Local lDifal    := .T.     //Gera Guia DIFAL
Local lLancCont := .T.  //Define se o Lancamento Contabil e On-line
Local lFecpDi   := .T.    //Gera Guia FECP Difal
Local lIcmsStDi := .T.  //Gera Guia Difal ICMS-ST

/*
O retorno deve ser um array com quatro posições, com "SIM" ou "NAO", sendo:
- Posição 1: define se gera Guia de DIFAL
- Posição 2: define se Lançamento Contábil On-line
- Posição 3: define se gera Guia de FECP
- Posição 4: define se gera Guia referente a ICMS-ST
*/

aAdd( aRet, IIF(lDifal   , "SIM", "NAO" ) ) //Posição 1: define se gera Guia de DIFAL
aAdd( aRet, IIF(lLancCont, "SIM", "NAO" ) ) //Posição 2: define se Lançamento Contábil On-line
aAdd( aRet, IIF(lFecpDi  , "SIM", "NAO" ) ) //Posição 3: define se gera Guia de FECP
aAdd( aRet, IIF(lIcmsStDi, "SIM", "NAO" ) ) //Posição 4: define se gera Guia referente a ICMS-ST

Return aRet

Idioma

Português(Brasil)

Versões

Microsiga Protheus11 ou Superior

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Retorno

Seu retorno deve ser um array de 4 posições contendo:

Array[1] == "SIM" ou "NAO"

Array[2] == "SIM" ou "NAO"

Array[3] == "SIM" ou "NAO"

Array[4] == "SIM" ou "NAO"

Programa Fonte

LOJXFUNK.PRW