Histórico da Página

//Encabezado e Ítems
User Function M447BFGA()

	Local aAddFlds := {}		  // Arreglo a retornar
	Local cAlias   := ParamIxb[1] // Primer parámetro, que contiene el alias de la tabla cuyo contenido es la información de encabezado e ítems.
	Local cTable   := ParamIxb[2] // Segundo parámetro, que contiene la tabla a la que se agregará(n) el/los nuevo(s) campo(s).
	
	If cTable == "RSE" //Encabezado
		aAdd( aAddFlds, {"F1_TEXTO1", (cAlias)->RSE_TEXTO1, Nil} )
		aAdd( aAddFlds, {"F1_TEXTO2", (cAlias)->RSE_TEXTO2, Nil} )
	ElseIf cTable == '"RSF'" //Ítems
		aAdd( aAddFlds, {"D1_TEXTO1", (cAlias)->RSF_TEXTO1, Nil} )
		aAdd( aAddFlds, {"D1_TEXTO2", (cAlias)->RSF_TEXTO2, Nil} )
	EndIf
	
Return (aAddFlds)


//Solo encabezado
User Function M447BFGA()

	Local aAddFlds := {}		  // Arreglo a retornar
	Local cAlias   := ParamIxb[1] // Primer parámetro, que contiene el alias de la tabla cuyo contenido es la información de encabezado e ítems.
	Local cTable   := ParamIxb[2] // Segundo parámetro, que contiene la tabla a la que se agregará(n) el/los nuevo(s) campo(s).
	
	If cTable == "RSE" //Encabezado
		aAdd( aAddFlds, {"F1_TEXTO1", (cAlias)->RSE_TEXTO1, Nil} )
		aAdd( aAddFlds, {"F1_TEXTO2", (cAlias)->RSE_TEXTO2, Nil} )
	EndIf
	
Return (aAddFlds)


//Solo ítems
User Function M447BFGA()

	Local aAddFlds := {}		  // Arreglo a retornar
	Local cAlias   := ParamIxb[1] // Primer parámetro, que contiene el alias de la tabla cuyo contenido es la información de encabezado e ítems.
	Local cTable   := ParamIxb[2] // Segundo parámetro, que contiene la tabla a la que se agregará(n) el/los nuevo(s) campo(s).
	
	If cTable == '"RSF'" //Ítems
		aAdd( aAddFlds, {"D1_TEXTO1", (cAlias)->RSF_TEXTO1, Nil} )
		aAdd( aAddFlds, {"D1_TEXTO2", (cAlias)->RSF_TEXTO2, Nil} )
	EndIf
	
Return (aAddFlds)