Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
titleAF125OKT
linenumberstrue
#Include "PROTHEUS.CH"

//P_E****************************************************************************************
//P_E - Ponto de Entrada para validação da inclusão e exclusão da solicitação de transferência
//P_E - Parâmetros : nOpc, cCBASE, cItem, cGeraNF, cClasNFE, cTESNFS, cTESNF, cNota, cSerie,
//P_E   cCondPg, cHistSol, cCCustoDst , cLocalDst, cFilDest      
//P_E - Retorno : .F. - Deve bloquear a linha de digitação e .T. - Liberar a linha digitada.
//P_E****************************************************************************************

User Function AF125OKT AF125OKT() 

Local nOpc := paramixb[1]

Local cCBASE := paramixb[2]

Local cItem := paramixb[3]

Local cGeraNF := paramixb[4]

Local cClasNFE := paramixb[5]

Local cTESNFS := paramixb[6]

Local cTESNFE := paramixb[7]

Local cNota := paramixb[8]

Local cSerie := paramixb[9]

Local cCondPg := paramixb[10]

Local cHistSol := paramixb[11]

Local cCCustoDst := paramixb[12]

Local cLocalDst := paramixb[13]

Local cFilDest := paramixb[14]

Local lRet := .T.


//Exemplo de customização !!!

Alert("EXECUTADO PONTO DE ENTRADA AF125OKT")

//Exemplo de customização !!!


Return lRet 

...