Histórico da Página

#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'FWMVCDEF.CH'
User Function TMKGRAVA(dDataRet,cCodAte,aCampos,nOpc)

	dRetorno      Default dDataRet	:=PARAMIXB[1] dDataBase	//Data da ligação pendente
	cCodigoDefault  cCodAte     :=PARAMIXB[2]  "" 			//CodigoCódigo do atendimento
	Default aCampos       :=PARAMIXB[3]  {}			//Array de uso interno
	nOpc          :=PARAMIXB[4] Default nOpc		:= 3			//Operação selecionada 3-incluir/4-alterar

	If nOpc = 4
		MsgAlert("Gravadas alterações")
	EndIf


Return NIL