Sistema Hospitalario OSIRIS

SourceForge.net: Hospital System Osiris (HIS): Hospital System Osiris (HIS) - Develop

2011-09-07T15:04:00.000-07:00

SourceForge.net: Hospital System Osiris (HIS): Hospital System Osiris (HIS) - Develop

Export to ods for C# (mono)

2011-08-24T16:09:00.000-07:00

He conseguido exportar un query a una hoja de calculo de tipo ods, espero que sea de ayuda

He tenido que recompilar AODL ya que para linux no tenia soporte.

using System;
using SmartXLS; // libreria para crear archivo xls es de paga
using Npgsql;
using Gtk;
using Glade;
// libreria creada con el proyecto AODL 1.4 que usa
using AODL;
using AODL.Document.SpreadsheetDocuments;
using AODL.Document.Content;
using AODL.Document.Content.Tables;
using AODL.Document;
using AODL.Package;
using AODL.Document.Collections;
using NUnit.Framework;

namespace osiris
{
public class class_traslate_spreadsheet
{
string connectionString;
string nombrebd;
class_conexion conexion_a_DB = new class_conexion();

//Declaracion de ventana de error
protected Gtk.Window MyWinError;
protected Gtk.Window MyWin;

public class_traslate_spreadsheet (string numeroatencion_)
{
int files_field = 0;
string[] args_names_field = {"foliodeservicio","descripcion_producto","idproducto","cantidadaplicada","preciounitario","ppcantidad"};
string[] args_type_field = {"float","string","string","float","float","float"};
connectionString = conexion_a_DB._url_servidor+conexion_a_DB._port_DB+conexion_a_DB._usuario_DB+conexion_a_DB._passwrd_user_DB;
nombrebd = conexion_a_DB._nombrebd;
//Create new spreadsheet open document (.ods)
AODL.Document.SpreadsheetDocuments.SpreadsheetDocument spreadsheetDocument = new AODL.Document.SpreadsheetDocuments.SpreadsheetDocument();
spreadsheetDocument.New();
//Create a new table
AODL.Document.Content.Tables.Table table = new AODL.Document.Content.Tables.Table(spreadsheetDocument, "hoja1", "tablefirst");
NpgsqlConnection conexion;
conexion = new NpgsqlConnection (connectionString+nombrebd);
// Verifica que la base de datos este conectada
try{
conexion.Open ();
NpgsqlCommand comando;
comando = conexion.CreateCommand ();
comando.CommandText = "SELECT osiris_erp_cobros_deta.folio_de_servicio AS foliodeservicio,descripcion_producto,to_char(osiris_erp_cobros_deta.id_producto,'999999999999') AS idproducto, "+
"to_char(osiris_erp_cobros_deta.cantidad_aplicada,'99999.99') AS cantidadaplicada,to_char(osiris_erp_cobros_deta.precio_producto,'99999999.99') AS preciounitario,"+
"to_char(osiris_erp_cobros_deta.cantidad_aplicada * osiris_erp_cobros_deta.precio_producto,'99999999.99') AS ppcantidad,"+
"to_char(osiris_erp_cobros_deta.fechahora_creacion,'dd-MM-yyyy HH24:mi:ss') AS fechcreacion, osiris_his_tipo_admisiones.descripcion_admisiones,"+
"osiris_erp_cobros_deta.id_tipo_admisiones AS idtipoadmision,descripcion_grupo_producto,osiris_productos.aplicar_iva," +
"to_char(osiris_erp_cobros_deta.id_secuencia,'9999999999') AS secuencia " +
"FROM osiris_erp_cobros_deta,osiris_productos,osiris_his_tipo_admisiones,osiris_grupo_producto " +
"WHERE osiris_erp_cobros_deta.id_producto = osiris_productos.id_producto " +
"AND osiris_erp_cobros_deta.id_tipo_admisiones = osiris_his_tipo_admisiones.id_tipo_admisiones " +
"AND osiris_productos.id_grupo_producto = osiris_grupo_producto.id_grupo_producto " +
"AND osiris_erp_cobros_deta.eliminado = false " +
"AND osiris_erp_cobros_deta.folio_de_servicio IN('"+numeroatencion_+"') " +
"ORDER BY to_char(osiris_erp_cobros_deta.fechahora_creacion,'yyyy-MM-dd HH24:mm:ss'),osiris_erp_cobros_deta.id_tipo_admisiones ASC," +
"osiris_productos.id_grupo_producto;";
comando.ExecuteNonQuery(); comando.Dispose();
//Console.WriteLine(comando.CommandText);
NpgsqlDataReader lector = comando.ExecuteReader ();
while (lector.Read()){
for (int colum_field = 0; colum_field < args_names_field.Length; colum_field++){
AODL.Document.Content.Tables.Cell cell = table.CreateCell ();
//cell.OfficeValueType ="float";
AODL.Document.Content.Text.Paragraph paragraph = new AODL.Document.Content.Text.Paragraph(spreadsheetDocument);
string text = lector[(string) args_names_field[ colum_field ]].ToString().Trim();
paragraph.TextContent.Add(new AODL.Document.Content.Text.SimpleText(spreadsheetDocument,text));
cell.Content.Add(paragraph);
cell.OfficeValueType = (string) args_type_field [colum_field];
cell.OfficeValue = text;
table.InsertCellAt (files_field, colum_field, cell);
}
files_field++;
}
conexion.Close();
//Insert table into the spreadsheet document
spreadsheetDocument.TableCollection.Add(table);
spreadsheetDocument.SaveTo("export.ods");
// open the document automatic
System.Diagnostics.Process.Start("export.ods");
}catch(NpgsqlException ex){
MessageDialog msgBoxError = new MessageDialog (MyWinError,DialogFlags.DestroyWithParent,
MessageType.Error,
ButtonsType.Close,"PostgresSQL error: {0}",ex.Message);
msgBoxError.Run (); msgBoxError.Destroy();
}

/*
// Usando libreria SmartXLS
WorkBook book = new WorkBook();

try{
//Sets the number of worksheets in this workbook
book.NumSheets = 2;
// set sheet names
book.setSheetName(0, "hoja1"); // renombrando la pestaña
book.setSheetName(1, "hoja2"); // renombrando la pestaña
book.Sheet = 0;
// book.setText(Fila, columna , "texto");
book.setText(0, 0, "foliodeservicio");
book.setText(0, 1, "descripcion_producto");
book.setText(0, 2, "idproducto");
book.setText(0, 3, "cantidadaplicada");
book.setText(0, 4, "preciounitario");
book.setText(0, 5, "ppcantidad");
book.setText(0, 6, "fechcreacion");
book.setText(0, 7, "descripcion_admisiones");
book.setText(0, 8, "idtipoadmision");
book.setText(0, 8, "descripcion_grupo_producto");
book.setText(0, 8, "aplicar_iva");

NpgsqlConnection conexion;
conexion = new NpgsqlConnection (connectionString+nombrebd);
// Verifica que la base de datos este conectada
try{
conexion.Open ();
NpgsqlCommand comando;
comando = conexion.CreateCommand ();
comando.CommandText = "SELECT osiris_erp_cobros_deta.folio_de_servicio AS foliodeservicio,descripcion_producto,to_char(osiris_erp_cobros_deta.id_producto,'999999999999') AS idproducto, "+
"to_char(osiris_erp_cobros_deta.cantidad_aplicada,'99999.99') AS cantidadaplicada,to_char(osiris_erp_cobros_deta.precio_producto,'99999999.99') AS preciounitario,"+
"to_char(osiris_erp_cobros_deta.cantidad_aplicada * osiris_erp_cobros_deta.precio_producto,'99999999.99') AS ppcantidad,"+
"to_char(osiris_erp_cobros_deta.fechahora_creacion,'dd-MM-yyyy HH24:mi:ss') AS fechcreacion, osiris_his_tipo_admisiones.descripcion_admisiones,"+
"osiris_erp_cobros_deta.id_tipo_admisiones AS idtipoadmision,descripcion_grupo_producto,osiris_productos.aplicar_iva," +
"to_char(osiris_erp_cobros_deta.id_secuencia,'9999999999') AS secuencia " +
"FROM osiris_erp_cobros_deta,osiris_productos,osiris_his_tipo_admisiones,osiris_grupo_producto " +
"WHERE osiris_erp_cobros_deta.id_producto = osiris_productos.id_producto " +
"AND osiris_erp_cobros_deta.id_tipo_admisiones = osiris_his_tipo_admisiones.id_tipo_admisiones " +
"AND osiris_productos.id_grupo_producto = osiris_grupo_producto.id_grupo_producto " +
"AND osiris_erp_cobros_deta.eliminado = false " +
"AND osiris_erp_cobros_deta.folio_de_servicio IN('"+numeroatencion_+"') " +
"ORDER BY to_char(osiris_erp_cobros_deta.fechahora_creacion,'yyyy-MM-dd HH24:mm:ss'),osiris_erp_cobros_deta.id_tipo_admisiones ASC," +
"osiris_productos.id_grupo_producto;";
comando.ExecuteNonQuery(); comando.Dispose();
//Console.WriteLine(comando.CommandText);
NpgsqlDataReader lector = comando.ExecuteReader ();
while (lector.Read()){
book.setNumber(number_file, 0, int.Parse(numeroatencion_));
book.setText(number_file, 1, (string) lector["descripcion_producto"]);
number_file++;
}
conexion.Close();
book.write("export.xls");

System.Diagnostics.Process.Start("export.xls");

}catch(NpgsqlException ex){
MessageDialog msgBoxError = new MessageDialog (MyWinError,DialogFlags.DestroyWithParent,
MessageType.Error,
ButtonsType.Close,"PostgresSQL error: {0}",ex.Message);
msgBoxError.Run (); msgBoxError.Destroy();
}

}catch (System.Exception ex){
Console.Error.WriteLine(ex);
}
*/
}
}
}

SourceForge.net: Hospital System Osiris (HIS): Project Donations: Hospital System Osiris (HIS)

2011-08-11T15:26:00.000-07:00

SourceForge.net: Hospital System Osiris (HIS): Project Donations: Hospital System Osiris (HIS)

Manual de Instalacion del Sistema Hospitalario OSIRIS

2010-09-13T15:21:00.000-07:00

Hola Amigos

le dejo el link del manual de instalacion del sistemas para GNU/Linux

http://www.scribd.com/doc/37039589/Manual-Instalacion-Sistema-Hospitalario-OSIRIS

Este manual esta un poco descontinuado, se hicieron modificaciones para no usar la libreria gnomeprint.

Se agregaron mas campos y tablas a la base de datos

cualquier duda para solicitar la base de datos envienme un correo a arcangeldoc@gmail.com

Saludos

Nuevas Mejoras

2010-05-08T10:09:00.001-07:00

He estado trabajando arduamente en este sistema se han corregido y mejorado bastantes bugs, asi mismo se han reducido los scrip y mejorando las classes de objetos.

He incorporado una agenda que permite realizar citas medicas y de quirofano esto nos pemitira tener una herramienta mas a nuestro sistema.

Se realizan muchas mejoras para poder enlasar en forma eficiente el expediente elecctronicono.

Estere postenado nuevas mejoras

Saludos

Problemas con libreria Gnome Print

2009-12-09T08:42:00.001-08:00

Hola a todos

En un trabajo titanico se ha logrado de traspasar OSIRIS a Windows me tope que los reportes no funcionan ya que Gnome Print no esta portado a Windows, asi que me he visto a traspasar todos a GTK# Print, aunque este no se comporta de igual manera en Linux y Windows.

Tendre Noticias Pronto con un demo de un Reporte 100% en Windows

Saludos

Leer textos delimitados en C# y Mono

2009-08-05T13:32:00.000-07:00

Este pequeño ejemplo permite leer linea por linea de un texto o un campo text que este dentro de una tabla de base de datos, se probo con motor de base de datos PostgreSQL

//char[] delimiterChars = {';'}; // delimitador de Cadenas
char[] delimiterChars = {' '}; // delimitador de Cadenas
//string texto = (string) lector["prueba"]; // puede ser una campo de la base de datos tipo Text
string texto = "1;daniel;olivares;cuevas\n"+
"2;genaro;cuevas;bazaldua\n"+
"3;gladys;perez;orellana\n";
string[] words = texto.Split(delimiterChars); // Separa las Cadenas
string lineas_texto = "";

// Recorre la variable
foreach (string s in words){
if (s.Length > 0){
//comprueba si hay historial de contrato "s" tiene historial
Console.WriteLine(s.ToString()+"\n");
lineas_texto += s;
}
}

si le ponen el delimitador ";" en consola aparareceran valor por valor del text
1
daniel
olivares
cuevas

si esta vacio aprecera
1;daniel;olivares;cuevas

Espero que sirva de algo

¿Y que es el Open Source?

2009-04-24T08:35:00.001-07:00

El Open Source es un movimiento con un principio muy simple y poderoso, fomentar la difusión del código fuente de los programas. ¿Y que es el código fuente? ¿y por que es importante su difusión? aquí va una explicación:

Los programadores escriben los programas en un lenguaje entendible por los humanos (bueno al menos por los programadores) estos lenguajes pueden ser C, C++, Java, PHP, Fortran, Visual Basic, etc., el código escrito en estos lenguajes es el llamado código fuente.
Una comparación simple podria ser las partituras musicales, que no son la musica pero la representan. Si tenemos una partitura podemos entender la musica, modificarla o tocarla con otros instrumentos. Si enc ambio solo escuchamos la musica, construir la partitura en base a ella puede se muy dificil. Siguendo con nuestro ejemplo la partitura sería el Código fuentey el sonido de la musica o la partitura interpretada por un musico se llama Código Binario, el código binario es lo que entienden los computadores, estos códigos son un conjunto de 0 y 1 a los cuales se llega en base al código fuente usando métodos que no viene al caso explicar aquí. Este código de 0 y 1 es el llamado binario, por ejemplo los famosos archivos .exe son programas binarios, no son el programa fuente escrito por el programador, eso hace que sea imposible (o casi) modificar un programa .exe sin el código fuente (de igual forma que sin la partitura nos es difícil modificar la musica). Â¿y eso que importa? bueno, supongamos que tenemos el código fuente de un programa muy simple como este:
function nombre(){ var name = prompt("Cual es tu nombre?:", "Escribe tu nombre aqui"); alert("Hola "+name+", este es un programa muy simple!") } Ver aqui

Si alguien por ejemplo quiere traducir el programa al Ingles, no es muy difícil ver cuales son las modificaciones necesarias, pero si solo tengo el código binario seguramente tendré algo así:

0000000001010010001111111111100100010000100010101111
0001010000011001000111111111110010001000010001010110
0100011111111111001000100001000101011110001010000011
1001000111111111110010001000010001010110010001111111
1111001000100001000101011110001010000011001000111110
0100011111111111001000100001000101011110001010000011
0001010111100010100000110010011100101001001001110010
0100100100111001001001010000111110101010010010010101
0010100100100100100100111001010010010011100111000011

lo que puede convertir una labor simple como una traducción, en un infierno.

Durante años las empresas han guardado sus códigos fuente como su gran fortaleza (de forma similar a como los estudios discográficos mantienen las cintas master de sus artistas) Pero el movimiento Open Source promueve la libre distribución del código fuente de los programas. ¿Pero como? ¡De esa forma cualquiera tendría el programa he incluso podría modificarlo a su antojo! ¡Las empresas no podrían cobrar licencias y los negocios de software desaparecerían! Esto temores aunque pueden parecer obvios son infundados, de hecho el Open Source es una alternativa de negocios que han tomado innumerables empresas, aquí algunas explicaciones de como esto es posible.

Bajos costos y mejor calidad: La metodología de desarrollo de software en el mundo Open Source rompe el estándar tradicional, este estándar indica que un proyecto de software debe ser realizado por un grupo pequeño y acotado de programadores, con planes de desarrollo claros y acotados, con una fase de pruebas que ocurra luego del desarrollo y antes que los programas sean entregados al publico. En el mundo Open Source al no existir un celo particular por el código este es distribuido masivamente en estados primarios de desarrollo, siendo mucha veces completado y mejorado para luego volver al creador inicial quien organiza y ordena las colaboraciones realizadas por individuos, pequeños grupos he incluso grandes corporaciones o Universidades. Esto convierte al desarrollo de software en un proceso dinámico en el cual participan cientos o miles de individuos. Un buen análisis de esto está descrito en el famoso paper de Eric Raymond The Cathedral and the Bazaar. Las empresas y desarrolladores se benefician de un conjunto inagotable de desarrolladores, código y colaboración en distintos niveles a costos mínimos. ¿Pero como se mantienen? ¿cual es el negocio?

Ley de Moore Para entender donde esta el negocio es importante entender la ley de moore, la cual dice que cada 18 meses la tecnología baja su costo a la mitad o duplica su capacidad o potencia. Lo relevante de esta ley es que muestra claramente que los activos tecnológicos? no son un buen negocio, osea dentro de los activos la tecnología se convierte en un bien perecible, por lo tanto el negocio son los servicios. ¿Como las compañías de teléfono pueden hacer negocio vendiendo bajo el costo los celulares o incluso regalándolos? es fácil darse cuenta que el negocio mas que el aparato son los servicios asociados (como los minutos, mensajes de texto, etc) de la misma forma las empresas que desarrollan productos en modalidad Open Source ofrecen servicios de soporte, certificación, consultoría, etc. Lo interesante es que cualquier persona o empresa puede ofrecer servicios sobre las mismas aplicaciones, pero los creadores tienen la ventaja de la identidad al ser los lideres de los productos que desarrollan. La tecnología como cosa se convierte en un commodity desechable, sabemos que va a cambiar.

La oportunidad para Chile Nuestro país tiene una oportunidad importante de subirse a esta ola, en la cual estamos atarazados en comparación con otros países como Argentina o Brasil, pero el movimiento todavía está en pañales a nivel mundial. Podemos acceder a tecnología de punta sin mayores costos, podemos participar de los procesos de desarrollo y activar la industria convirtiéndonos produciendo servicios mas haya que la exportación de materias primas, si Nokia era una empresa que hacia botas y hoy es líder en celulares en un país con un tercio de habitantes que el nuestro, ¿por que nosotros no podremos hacerlos?

Pantalla de Registro y Admsion en Windows XP

2009-04-09T09:33:00.000-07:00

Esta pantalla es la de registro y admision de pacientes a los diferentes departamento, cuando son servicios directos como Imagenologia, Laboratorio la informacio llenada es simple. Cuando un paciente se debe internar a los diferentes departamentos como Hospital, Quirofano, etc. el sistema permite acceder mediante el boton internar paciente.

Realmente la operatividad de este sistema es muy facil y se puede adecuar segun las necesidades de cada institucion medica.

OSIRIS trabajando en Windows XP

2009-04-09T09:19:00.000-07:00

Esta pantalla muestra que OSIRIS funciona tanto en GNU/Linux como en Windows, estoy trabajando en las impresiones de los reportes, ya que la libreria que use es GnomePrint y no esta portada a windows, ya encontre la solucion a este problema.

Intentare realizar los cambios lo antes posible para tener soportado OSIRIS 100% en Windows ya que este sistema esta desarrollado integramante en Monodevelop+GTK#, y funciona 100% en GNU/Linux

Estos son avances significativos, dentro de este proyecto

Equivalente de rc.local en Debian

2009-01-30T09:00:00.000-08:00

Varias veces se ha preguntado en la lista cual es el equivalente de rc.local en Debian.
La respuesta estandar es que no existe porque es absurdo distribuir un archivo "local" como rc.local que se supone que solo es util localmente (en una sola maquina) y que hay que hacerse uno mismo sus propios scripts.

Hay otra forma:
Hay un directorio (vacio por defecto) llamado /etc/rc.boot en donde uno puede depositar sus scripts locales. Los scripts de booteo invocaran al final de todo lo demas cada uno de los scripts puestos aca usando el programa run-parts.

La ventaja de tener un directorio donde poner scripts en vez de un script unico, es que uno puede agregar o quitar funcionalidad simplemente agregando o quitando scripts autocontenidos.

Un instalador de un programa podria poner ahi un script, y al desisntalar, eliminarlo, sin preocuparse de cualquier otra cosa presente en ese directorio.

Programacion de Cirugias

2008-12-23T10:38:00.000-08:00

Esta pantalla es la programacion de cirugias, esta se debe validar con las admisiones de los pacientes, para poder comprar los datos de los pacientes, ademas va de la mano con la separacion de cirugias

System.Windows.Forms

2008-12-17T14:04:00.000-08:00

Este es un ejemplo para uso del API de Windows.Forms en Mono

//Ejemplo Windows Forms (EjemploWinForms.cs)
using System.Drawing;
using System.Windows.Forms;
using System;

class EjemploWinForms : Form
{

static void Main()
{
Application.Run(new EjemploWinForms());
}

public EjemploWinForms() {
//Crear e iniciar el boton, y sus propiedades
Button boton = new Button();
boton.Location = new Point(0, -1);
boton.Name = "boton";
boton.Size = new System.Drawing.Size(193, 60);
boton.TabIndex = 0;
boton.Text = "Haz Click Aqui..";
//Asignar un evento al evento Clic del boton
boton.Click += new System.EventHandler(hola);
//Indicar el tamanyo de la ventana
ClientSize = new System.Drawing.Size(193, 60);
//Anyadir el boton
Controls.Add(boton);
Text = "Ventana";
ResumeLayout(false);
}

private void hola(object sender, EventArgs e)
{
Console.WriteLine("Un mensaje!");
MessageBox.Show("Mensaje de prueba");
Close ();
}
}

la Compilacion de

gmcs ejemplo.cs -r:System.Windows.Forms,System.Drawing.dll -out:ejemplo.exe

http://chileforge.cl/projects/osiris

Pantalla de Moviemtos de productos por paciente

2008-12-05T16:05:00.001-08:00

Esta panta muestra el movieminto de produtos por paciente, solo debe seleccionar el producto, tiene la opcion de poder elegir los diferentes departamentos, tiene la opcion de poder imprimir los movimientos de estos productos

Pantalla de Alta de Productos

2008-12-05T15:50:00.000-08:00

Esta pantalla es donde se dan de alta los productos dentro del sistema OSIRIS, estan considerados 3 niveles de productos, ademas un calculo automatico de ganancia dependiendo de la tabla de ganancia financiera

Compra de Medicamentos en Caso de Urgencia

2008-10-29T08:41:00.000-07:00

Esta pantalla permite capturar una orden de compra en caso de que el medicamento no se encuentre en los almacenes, ademas sirve para la solicitud en el caso de que existiera una farmacia dentro del hospital, ya que este proceso alimenta el almacen donde se realizo la solicitud

Pantalla de Requisicion de Materiales a Compras

2008-10-29T08:31:00.000-07:00

Esta pantalla es la que solicita porductos a Compras, cabe mencionar que para que esto funcione correctamente deben estar actualizados el catalogos general de productos

Encriptacion de datos MD5 en mono C#

2008-07-09T15:46:00.000-07:00

Es importante que utilizen las siguientes librerias

using System.Collections;
using System.Security.Cryptography;

// Funcion de Encriptacion en MD5
public static string CreatePasswordMD5(string password)
{
MD5CryptoServiceProvider md5 = new MD5CryptoServiceProvider();
byte[] bs = System.Text.Encoding.UTF8.GetBytes(password);
bs = md5.ComputeHash(bs);
System.Text.StringBuilder s = new System.Text.StringBuilder();
foreach (byte b in bs){
s.Append(b.ToString("x2").ToLower());
}
return s.ToString();
}
espero que este scrip sea de ayuda

como usarlo

Console.WriteLine((string) CreatePasswordMD5(contraseña_que_quiere_encriptar));

Ocupacion Hospitalaria

2008-05-30T12:33:00.001-07:00

ASIGNACION DE CAMAS

2008-05-30T12:31:00.000-07:00

Reporte de Costos por productos cargados

2007-11-14T10:03:00.000-08:00

Traductor de numeros a letras en C#

2007-08-13T10:52:00.000-07:00

// traductor de numeros a letras
public string[] sUnidades = {"", "un", "dos", "tres", "cuatro", "cinco", "seis", "siete", "ocho", "nueve", "diez",
"once", "doce", "trece", "catorce", "quince", "dieciseis", "diecisiete", "dieciocho", "diecinueve", "veinte",
"veintiún", "veintidos", "veintitres", "veinticuatro", "veinticinco", "veintiseis", "veintisiete", "veintiocho", "veintinueve"};
public string[] sDecenas = {"", "diez", "veinte", "treinta", "cuarenta", "cincuenta", "sesenta", "setenta", "ochenta", "noventa"};
public string[] sCentenas = {"", "ciento", "doscientos", "trescientos", "cuatrocientos", "quinientos", "seiscientos", "setecientos", "ochocientos", "novecientos"};
public string sResultado = "";

public string traduce_numeros (string sNumero) {
double dNumero;
double dNumAux = 0;
char x;
string sAux;

sResultado = " ";
try {
dNumero = Convert.ToDouble (sNumero);
}
catch {
return "";
}

if (dNumero > 999999999999)
return "";

if (dNumero > 999999999) {
dNumAux = dNumero % 1000000000000;
sResultado += Numeros (dNumAux, 1000000000) + " mil ";
}

if (dNumero > 999999) {
dNumAux = dNumero % 1000000000;
sResultado += Numeros (dNumAux, 1000000) + " millones ";
}

if (dNumero > 999) {
dNumAux = dNumero % 1000000;
sResultado += Numeros (dNumAux, 1000) + " mil ";
}

dNumAux = dNumero % 1000;
sResultado += Numeros (dNumAux, 1);

//Enseguida verificamos si contiene punto, si es así, los convertimos a texto.
sAux = dNumero.ToString();

if (sAux.IndexOf(".") >= 0)
sResultado += ObtenerDecimales (sAux);

//Las siguientes líneas convierten el primer caracter a mayúscula.
sAux = sResultado;
x = char.ToUpper (sResultado[1]);
sResultado = x.ToString ();

for (int i = 2; i 999999999999)
return "";

if (dNumero > 999999999) {
dNumAux = dNumero % 1000000000000;
sResultado += Numeros (dNumAux, 1000000000) + " mil ";
}

if (dNumero > 999999) {
dNumAux = dNumero % 1000000000;
sResultado += Numeros (dNumAux, 1000000) + " millones ";
}

if (dNumero > 999) {
dNumAux = dNumero % 1000000;
sResultado += Numeros (dNumAux, 1000) + " mil ";
}

dNumAux = dNumero % 1000;
sResultado += Numeros (dNumAux, 1);

//Enseguida verificamos si contiene punto, si es así, los convertimos a texto.
sAux = dNumero.ToString();

if (sAux.IndexOf(".") >= 0)
sResultado += ObtenerDecimales (sAux);

//Las siguientes líneas convierten el primer caracter a mayúscula.
sAux = sResultado;
x = char.ToUpper (sResultado[1]);
sResultado = x.ToString ();

for (int i = 2; i= 100){
dNumero = dCociente / 100;
sNumero = dNumero.ToString();
iNumero = int.Parse (sNumero[0].ToString());
sTexto += this.sCentenas [iNumero] + " ";
}

dCociente = dCociente % 100;
if (dCociente >= 30){
dNumero = dCociente / 10;
sNumero = dNumero.ToString();
iNumero = int.Parse (sNumero[0].ToString());
if (iNumero > 0)
sTexto += this.sDecenas [iNumero] + " ";

dNumero = dCociente % 10;
sNumero = dNumero.ToString();
iNumero = int.Parse (sNumero[0].ToString());
if (iNumero > 0)
sTexto += "y " + this.sUnidades [iNumero] + " ";
}

else {
dNumero = dCociente;
sNumero = dNumero.ToString();
if (sNumero.Length > 1)
if (sNumero[1] != '.')
iNumero = int.Parse (sNumero[0].ToString() + sNumero[1].ToString());
else
iNumero = int.Parse (sNumero[0].ToString());
else
iNumero = int.Parse (sNumero[0].ToString());
sTexto += this.sUnidades[iNumero] + " ";
}

return sTexto;
}

private string ObtenerDecimales (string sNumero) {
string[] sNumPuntos;
string sTexto = "";
double dNumero = 0;

sNumPuntos = sNumero.Split('.');

dNumero = Convert.ToDouble(sNumPuntos[1]);
sTexto = "peso "+dNumero.ToString().Trim()+"/100 M.N.";
//sTexto = "peso con " + Numeros(dNumero,1);

return sTexto;
}

Procedimiento de Medico

2007-07-24T10:39:00.000-07:00

Pantalla de Facturacion 2

2007-07-24T10:26:00.001-07:00

Patalla del Facturador

2007-07-24T10:03:00.000-07:00

Busqueda de Productos en Caja

2007-05-23T15:40:00.001-07:00

Creacion de treeview

2007-05-23T15:36:00.000-07:00

void crea_treeview_busqueda()
{
treeViewEngineBusca2 = new TreeStore(typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(string),
typeof(bool),
typeof(bool),
typeof(bool));
lista_de_producto.Model = treeViewEngineBusca2;

lista_de_producto.RulesHint = true;

lista_de_producto.RowActivated += on_selecciona_producto_clicked; // Doble click selecciono producto*/

TreeViewColumn col_idproducto = new TreeViewColumn();
CellRendererText cellr0 = new CellRendererText();
col_idproducto.Title = "ID Producto"; // titulo de la cabecera de la columna, si está visible
col_idproducto.PackStart(cellr0, true);
col_idproducto.AddAttribute (cellr0, "text", 0); // la siguiente columna será 1 en vez de 1
col_idproducto.SortColumnId = (int) Column_prod.col_idproducto;

TreeViewColumn col_desc_producto = new TreeViewColumn();
CellRendererText cellr1 = new CellRendererText();
col_desc_producto.Title = "Descripcion de Producto"; // titulo de la cabecera de la columna, si está visible
col_desc_producto.PackStart(cellr1, true);
col_desc_producto.AddAttribute (cellr1, "text", 1); // la siguiente columna será 1 en vez de 1
col_desc_producto.SortColumnId = (int) Column_prod.col_desc_producto;
//cellr0.Editable = true; // Permite edita este campo

TreeViewColumn col_precioprod = new TreeViewColumn();
CellRendererText cellrt2 = new CellRendererText();
col_precioprod.Title = "Precio Producto";
col_precioprod.PackStart(cellrt2, true);
col_precioprod.AddAttribute (cellrt2, "text", 2); // la siguiente columna será 1 en vez de 2
col_precioprod.SortColumnId = (int) Column_prod.col_precioprod;

TreeViewColumn col_ivaprod = new TreeViewColumn();
CellRendererText cellrt3 = new CellRendererText();
col_ivaprod.Title = "I.V.A.";
col_ivaprod.PackStart(cellrt3, true);
col_ivaprod.AddAttribute (cellrt3, "text", 3); // la siguiente columna será 2 en vez de 3
col_ivaprod.SortColumnId = (int) Column_prod.col_ivaprod;

TreeViewColumn col_totalprod = new TreeViewColumn();
CellRendererText cellrt4 = new CellRendererText();
col_totalprod.Title = "Total";
col_totalprod.PackStart(cellrt4, true);
col_totalprod.AddAttribute (cellrt4, "text", 4); // la siguiente columna será 3 en vez de 4
col_totalprod.SortColumnId = (int) Column_prod.col_totalprod;

TreeViewColumn col_descuentoprod = new TreeViewColumn();
CellRendererText cellrt5 = new CellRendererText();
col_descuentoprod.Title = "% Descuento";
col_descuentoprod.PackStart(cellrt5, true);
col_descuentoprod.AddAttribute (cellrt5, "text", 5); // la siguiente columna será 5 en vez de 6
col_descuentoprod.SortColumnId = (int) Column_prod.col_descuentoprod;

TreeViewColumn col_preciocondesc = new TreeViewColumn();
CellRendererText cellrt6 = new CellRendererText();
col_preciocondesc.Title = "Precio con Desc.";
col_preciocondesc.PackStart(cellrt6, true);
col_preciocondesc.AddAttribute (cellrt6, "text", 6); // la siguiente columna será 6 en vez de 7
col_preciocondesc.SortColumnId = (int) Column_prod.col_preciocondesc;

TreeViewColumn col_grupoprod = new TreeViewColumn();
CellRendererText cellrt7 = new CellRendererText();
col_grupoprod.Title = "Grupo Producto";
col_grupoprod.PackStart(cellrt7, true);
col_grupoprod.AddAttribute (cellrt7, "text", 7); // la siguiente columna será 7 en vez de 8
col_grupoprod.SortColumnId = (int) Column_prod.col_grupoprod;

TreeViewColumn col_grupo1prod = new TreeViewColumn();
CellRendererText cellrt8 = new CellRendererText();
col_grupo1prod.Title = "Grupo1 Producto";
col_grupo1prod.PackStart(cellrt8, true);
col_grupo1prod.AddAttribute (cellrt8, "text", 8); // la siguiente columna será 9 en vez de
col_grupo1prod.SortColumnId = (int) Column_prod.col_grupo1prod;

TreeViewColumn col_grupo2prod = new TreeViewColumn();
CellRendererText cellrt9 = new CellRendererText();
col_grupo2prod.Title = "Grupo2 Producto";
col_grupo2prod.PackStart(cellrt9, true);
col_grupo2prod.AddAttribute (cellrt9, "text", 9); // la siguiente columna será 10 en vez de 9
col_grupo2prod.SortColumnId = (int) Column_prod.col_grupo2prod;

lista_de_producto.AppendColumn(col_idproducto); // 0
lista_de_producto.AppendColumn(col_desc_producto); // 1
lista_de_producto.AppendColumn(col_precioprod); //2
lista_de_producto.AppendColumn(col_ivaprod); // 3
lista_de_producto.AppendColumn(col_totalprod); // 4
lista_de_producto.AppendColumn(col_descuentoprod); //5
lista_de_producto.AppendColumn(col_preciocondesc); // 6
lista_de_producto.AppendColumn(col_grupoprod); //7
lista_de_producto.AppendColumn(col_grupo1prod); //8
lista_de_producto.AppendColumn(col_grupo2prod); //9

}

Pantalla de Caja

2007-05-23T15:32:00.000-07:00

Menu Principal del Sistema OSIRIS

2007-04-23T13:06:00.000-07:00

Pantalla de Internamiento

2007-04-17T09:45:00.000-07:00

Esta es la pantalla de Internamiento

2007-04-17T08:38:00.000-07:00

Esta es la Pantalla de Registro de Paciente

2007-01-18T19:00:00.001-08:00

Ya voy a publicar el modulo de admision y registro con sus respectivas pantallas

Sistema Hospitalario

2006-11-22T12:18:00.000-08:00

Hace bastantante tiempo que programo en diferentes lenguajes y he realizado de todo tipo de sistemas pero en la parte hospitalaria no he realizado nada, por lo tanto se crea un necesidad de hacer un sistema, tome esa decision ya que actualmente trabajo en un hospital que no tiene un sistema, inicialmente lo estaba realizando un proveedor a base de care2x (www.care2x.org) no dio los resultados esperados y finalmente se desecho.
Con un afan de realizar este sistema y poder compartirlo con cualquiera he creado este blog, estube investigando varios lenguajes ya que la plataforma usada en todo el hospita es linux, asi que me di un tarea probar varios lenguajes ejemplo: python, java, php con html, mono, perl, gamba etc, y lo otro era definir si la interfaz usada era la adeacuada, web y ventanas, elegi la ventanas por comodidad a los usuarios.

Asi que usare las siguientes herramientas Mono, Gtk, Glade y motor de base de datos Postgresql

A lo largo de este proceso estare subiendo las ventanas y los programas para que les pueda servir de algo

Es un placer poder realizar este trabajo y compartirlo

Daniel Olivares C.
Monterrey - Mexico