Histórico da Página

User Function M486PEADJU()
    Local cSerieDoc := PARAMIXB[1] //Serie
    Local cNumDoc   := PARAMIXB[2] //Numero de Documento
    Local cCodCli   := PARAMIXB[3] //Código de Cliente
    Local cCodLoj   := PARAMIXB[4] //Código de la Tienda
	Local cPrefijo  := PARAMIXB[5] //f-Factura, c-Nota de Crédito, d-Nota de Débito y n - Nota de Ajuste  
	Local cAdjunto  := "0"
	
	cAdjunto := "1"
Return cAdjunto

El Punto de Entrada M486PEADJU recibe como parámetros Serie, Folio, Cliente, Loja y Prefijo (f - Factura, c - Nota de Crédito, d - Nota de Débito y n - Nota de Ajuste) del Documento a transmitir, y debe retornar un valor de tipo String con las opciones permitidas para el atributo Adjuntos, de acuerdo a lo definido por parte del Proveedor Tecnológico denominado The Factory HKA.

Se recomienda inicializar la variable de retorno con el valor "0", para que en caso de no cumplirse la Regla de Negocio, el atributo Adjuntos sea informado como No se admiten adjuntos.

User Function M486PELEYE()
	Local aColorPE := {}

	aAdd(aColorPE, {"BR_PINK",OemToAnsi("En espera de adjunto")})

Return aColorPE

El Punto de Entrada M486PELEYE, debe retornar un arreglo con 2 posiciones para incluir nuevas Leyendas, donde la primera posición indica el Código del Color y la segunda posición el Texto con el que se visualizará la leyenda.

User Function M486PESTA()
	Local nTipoD := PARAMIXB //1 = SF2, 2 = SF1 y 3 = SFE
	Local aEstatus := {}

	If nTipoD == 1
		aAdd(aEstatus, {"F2_FLFTEX=='2' .AND. F2_CODMUN =='05001'","BR_PINK"})
    ElseIf nTipoD == 2  
		aAdd(aEstatus, {"F1_FLFTEX=='2' .AND. F1_CODMUN =='05001'","BR_PINK"})
	EndIf
Return aEstatus