AMSSpecialist

Label.SetText("Label2", sUSUARIO.."");--lee el usuario con que se ingreso desde la tabla --USUARIO-- y encadenamos para obtener el nombre del USUARIO logueado 

Input.SetText("Input1", sUSUARIO.."");

Paragraph.SetText("Paragraph1", sUSUARIO.."");

xButton.SetText("xButton1", sUSUARIO.."");

ListBox.AddItem("ListBox1", sUSUARIO.."");

ComboBox.AddItem("ComboBox1", sUSUARIO.."");

local A = ComboBox.GetText("Input1");
local B = Input.GetText("Input2");
local C = Input.GetText("Input3");
local D = Input.GetText("Input4");
local E = Input.GetText("Input5");
if A  == "" or B  == "" or C  == "" or D == "" or E == "" then
Dialog.Message("Atencion", "faltan campos por ingresar", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
--aqui la accion cuando esta todo diligenciado
end

bIsEmpty = false;--intercambiador booleano para ver si estan vacios los inputs...
object_names = Page.EnumerateObjects();

--compruebo si hay errores...
error = Application.GetLastError();

-- si la has cagado salta un error...
if (error ~= 0) then
    Dialog.Message("Error", _tblErrorMessages[error], MB_OK, MB_ICONEXCLAMATION);
else--¿que ha salido todo cojonudo? me debes una cerveza...
			
			SalidaModoTexto = "";--Preparo un string para crear un texto en dialogo...
            
            for index, object in pairs(object_names) do--hago looping para buscar todos los objetos...
            type = Page.GetObjectType(object);--busco los objetos que hay en la pagina
			
			tblEmptyInputs = {}--creo una tabla para meter lso inputs que luego ira encontrando..
           
            if (type == OBJECT_INPUT) then--me aseguro que el tipo de objeto sea inputs no otra cosa.
           
            inputstextos = Input.GetText(object);--meto la variable convertida en string del loop para saber los inputs estan vacios..

					if inputstextos == "" then--¿que lo estan? Ooostia tio, tienes que arreglarlo!
					
					Table.Insert(tblEmptyInputs, 1, object);--meto los que faltan por rellenar...
					faltantes = Table.Concat(tblEmptyInputs, "\r\n", 1, TABLE_ALL);--los separo en lineas mas legibles dentro de la tabla.
						totalVacios = Table.Count(tblEmptyInputs);--cuento cuantas cajas estan vacias...
						if totalVacios ~= 0 then-- si estan algunas o todas vacias
						bIsEmpty = true;--lo pongo en true (que faltan campos a rellenar)
						SalidaModoTexto = SalidaModoTexto..faltantes.."\r\n";
						else--si estan todas completas y no vacias...
						bIsEmpty = false;
						end
					

					end


            end
        end
					if bIsEmpty == false then
					Dialog.TimedMessage("Please Wait...", "Datos rellenados correctamente", 2000, MB_ICONINFORMATION);

					else
					Dialog.Message("Atencion", "faltan campos por ingresar:\r\n"..SalidaModoTexto, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
					end
end

--