with Ada.Text_IO; use Ada.Text_IO;
procedure Main is
begin
  Put_Line ("Practico Framework! Prueba de lenguaje ADA generada por el usuario {$PCOSESS_LoginUsuario} {$PCO_FechaOperacionGuiones} {$PCO_HoraOperacionPuntos}");
end Main;