3270 PRINT : PRINT "PRUEBA : ";C$