0% encontró este documento útil (0 votos)
62 vistas5 páginas

Traspaso de Medicamentos en Farmacias

Cargado por

Alex
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como PDF, TXT o lee en línea desde Scribd
0% encontró este documento útil (0 votos)
62 vistas5 páginas

Traspaso de Medicamentos en Farmacias

Cargado por

Alex
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como PDF, TXT o lee en línea desde Scribd

Caso de uso: Traspasar medicamentos (Entrada)

Complejidad: Media Prioridad: Baja


Actores: Auxiliar y sistema
Breve descripción: Se realizará un traspaso de medicamentos, de una farmacia a otra.
Descripción paso a 1. El sistema mostrara los traspasos que estén pendientes.
paso: 2. El auxiliar seleccionará el traspaso.
3. El sistema mostrara pendiente del traspaso.
4. El sistema cambiara el estatus del traspaso a aceptado.
5. El sistema guardará los cambios hechos en la farmacia.
Ejercicio 1: Power builder (IF, CASE)

string ls_password = ''


integer li_supervisor=0

gs_user = sle_usuario.text
ls_password = sle_password.text

IF gs_user<>'' AND ls_password<>'' THEN


SELECT ES_SUPERVISOR INTO :li_supervisor
FROM USUARIO
WHERE ( CODIGO_USUARIO = :gs_user ) AND
( CVE_ACCESO = :ls_password );

CHOOSE CASE [Link]


CASE -1
MessageBox('Error', 'Error conectandose a la base de datos' + [Link])
Close (w_login)
CASE 0
IF li_supervisor = 1 THEN gb_supervisor = True
Close (w_login)
// Open MDI frame window
Open (w_genapp_frame)
CASE 100
MessageBox('Error', 'Datos incorrectos, intente nuevamente')
sle_usuario.setfocus()
END CHOOSE
END IF
Ejercicio 2: C (WHILE, IF, DO-WHILE)

/* Demonstration of using scanf() */


#include <stdio.h>
#define QUIT 4
int get_menu_choice( void );
main()
{
int choice = 0;
int int_var = 0;
float float_var = 0.0;
unsigned unsigned_var = 0;
while (choice != QUIT)
{
choice = get_menu_choice();
if (choice == 1)
{
puts("\nEnter a signed decimal integer (i.e. -123)");
scanf("%d", &int_var);
}
if (choice == 2)
{
puts("\nEnter a decimal floating-point number (i.e. 1.23)");
scanf("%f", &float_var);
}
if (choice == 3)
{
puts("\nEnter an unsigned decimal integer (i.e. 123)" );
scanf( "%u", &unsigned_var );
}
}
printf("\nYour values are: int: %d float: %f unsigned: %u \n", int_var, float_var, unsigned_var );

return 0;
}

int get_menu_choice( void )


{
int selection = 0;
do
{
puts( "\n1 - Get a signed decimal integer" );
puts( "2 - Get a decimal floating-point number" );
puts( "3 - Get an unsigned decimal integer" );
puts( "4 - Quit" );
puts( "\nEnter a selection:" );

scanf( "%d", &selection );


}while ( selection < 1 || selection > 4 );
return selection;
}
Ejercicio 3: Ruby (WHILE, IF)

# Adivina el número
numero_secreto = rand(1..10)
intentos = 0
adivinaste = false

puts "¡Adivina el número entre 1 y 10!"

while intentos < 5 && !adivinaste


print "Introduce tu número: "
numero_usuario = gets.to_i
intentos += 1

if numero_usuario == numero_secreto
puts "¡Felicidades! Adivinaste en #{intentos} intentos."
adivinaste = true
elsif numero_usuario < numero_secreto
puts "Demasiado bajo. Intenta de nuevo."
else
puts "Demasiado alto. Intenta de nuevo."
end
end

puts "El número secreto era #{numero_secreto}." unless adivinaste

También podría gustarte