01. DADOS GERAIS
Linha de Produto: | Microsiga Protheus® |
---|
Segmento: | Serviços |
---|
Módulo: | Fiscal |
---|
02. DESCRIÇÃO
O Ponto de entrada MT103GUIA permite ao Cliente gerar ou não a Guia de ICMS ST.
03. ESPECIFICAÇÃO
Parâmetros do ponto de entrada:
Nome | Tipo | Descrição |
---|
cAliasNFE | Array of Record | Alias da tabela de cabeçalho da NF |
cAliasFor | Array of Record | Alias da tabela de Fornecedor |
cCodFil | Array of Record | Código da Filial |
cCodFor | Array of Record | Código do Fornecedor |
cCodLoj | Array of Record | Código da Loja |
cEspDoc | Array of Record | Espécie do Documento |
Retorno
Nome | Tipo | Descrição |
---|
lResult | Lógico | .T. Gera - .F. Não gera |
04. EXEMPLO DE UTILIZAÇÃO
User Function MT103GUIA()
Local cAliasNFE := PARAMIXB[1]
Local cAliasFor := PARAMIXB[2]
Local cCodFil := PARAMIXB[3]
Local cCodFor := PARAMIXB[4]
Local cCodLoj := PARAMIXB[5]
Local cEspDoc := PARAMIXB[6]
Local lResult := .F.
Local aAliAtu := GetArea()
If AllTrim(cEspDoc) == "CTR"
dbSelectArea(cAliasFor)
dbSetOrder(1)
If dbSeek(cCodFil+cCodFor+cCodLoj) .and. A2_OPTCRPR == "S"
lResult := .T.
Endif
Endif
RestArea(aAliAtu)
Return lResult