01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:SIGAEIC
Função:EICLC100.PRW - Carta de Crédito
País:Brasil
Ticket:11433936
Requisito/Story/Issue (informe o requisito relacionado) :DTRADE-6341


02. SITUAÇÃO/REQUISITO

03. LOCALIZAÇÃO

04. PARÂMETROS


05. RETORNO

06. EXEMPLO


USER FUNCTION EICLC100() 
Local cParam := ""

If ValType(ParamIXB) == "C"      
   cParam:= ParamIXB
EndIf

If cParam == "INCLUI_BOTAO"   
	AAdd (aBotao,{ "PESQUISA" ,{|| MsgInfo("Botão Inclusão")} , "Botão Inclui" ,"Botão Novo" })
ElseIf cParam == "ALTERA_BOTAO"   
	AAdd (aBotao,{ "PESQUISA" ,{|| MsgInfo("Botão Altera")} , "Botão Altera" ,"Botão Novo" })
ElseIf cParam == "EXCLUI_BOTAO"   
	AAdd (aBotao,{ "PESQUISA" ,{|| MsgInfo("Botão Exclusão")} , "Botão Exclui" ,"Botão Novo" })
ElseIf cParam == "VISUAL_BOTAO"   
	AAdd (aBotao,{ "PESQUISA" ,{|| MsgInfo("Botão Visualiza")} , "Botão Visualiza" ,"Botão Novo" })
ElseIf cParam == "INCLUI_TELA"   
--Instruções--
ElseIf cParam == "INCLUI_VALID"  
	--Instruções--
ElseIf cParam == "ALTERA_TELA"   
	--Instruções--
ElseIf cParam == "ALTERA_VALID"  
	--Instruções--
ElseIf cParam == "VISUAL_TELA"   
	--Instruções--
ElseIf cParam == "EXCLUI_TELA"   
	--Instruções--
ElseIf cParam == "COLUNAS"
   If aScan(aCampos,"WC_VLRCLI") == 0         
      AADD(aHeader,{"WC_VLRCLI",,10,0})
      AADD(aCampos,"WC_VLRCLI")
   EndIf
ElseIf cParam == "GRAVA_TRB"
   TRB->WC_VLRCLI := IF(!lAltera, M->WC_VLRCLI,SWC->WC_VLRCLI) 
ElseIf cParam == "GRAVA_CARTA"
   //SWC->WC_VLRCLI := 10.00 //Exemplo de gravação de algum campo customizado na Carta de crédito
Endif

RETURN Nil