Histórico da Página
Popular automaticamente os campos [ N1_CBASE, N1_ITEM, N1_CHAPA, N1_FORNEC, N1_LOJA, N1_NSERIE e N1_NFISCAL ], mantendo a compatibilidade da versão P11.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços | ||||
Módulo: | SIGAATF - Ativo Fixo | ||||
Rotina: |
| ||||
Ponto de Entrada: | AF012COPY | ||||
Chamados Relacionados | 1333570 | ||||
País(es): | Todos homologados pelo Protheus | ||||
Banco(s) de Dados: | Todos homologados pelo Protheus | ||||
Sistema(s) Operacional(is): | Todos homologados pelo Protheus |
Descrição
O ponto de entrada AF012COPY permite o preenchimento automático dos campos [ N1_CBASE, N1_ITEM, N1_CHAPA, N1_FORNEC, N1_LOJA, N1_NSERIE e N1_NFISCAL ], do item posicionado.
Ponto de Entrada
Descrição: | O ponto de entrada AF012COPY permite o preenchimento automático dos campos [ N1_CBASE, N1_ITEM, N1_CHAPA, N1_FORNEC, N1_LOJA, N1_NSERIE e N1_NFISCAL ], do item posicionado. | ||||||||
Eventos: | ExistBlock("AF012COPY") | ||||||||
Programa Fonte: | ATFA012.PRX | ||||||||
Função: | AF012COPY() - Popula os campos [] mantendo a compatibilidade executada na versão P11. | ||||||||
Retorno: |
|
Exemplo:
#INCLUDE "PROTHEUS.CH"
User Function AF012COPY()
Local lRet := .F.
Local cMsg0 := ""
cMsg0 := oEmToAnsi("Popula os campos chave [N1_CBASE, N1_ITEM, N1_CHAPA], ") + CRLF
cMsg0 += oEmToAnsi("do fornecedor/loja [N1_FORNEC, N1_LOJA] e") + CRLF
cMsg0 += oEmToAnsi("da nota/serie [N1_NSERIE, N1_NFISCAL] do ") + CRLF
cMsg0 += oEmToAnsi("item posicionado? ") + CRLF
If MsgYesNo(cMsg0)
lRet := .T.
Else
lRet := .F.
EndIf
Return(lRet)
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas