Programa gestion de clinicas dentales, consultorio y gabinetes odontologicos, software gestional odontologico para la odontologia


Home	Contactar	Programa	Download	Usuarios	Comprar

<% dim accion dim cn dim cn4 dim rsAcceso dim rsControl dim rsParam dim sSql dim sSql2 dim sSql4 dim cadena dim Err accion=Request.QueryString("acc") if accion = "d" then Set cn4 = Server.CreateObject("ADODB.Connection") cn4.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.MapPath("/db/drtooth.mdb") set rsParam = server.CreateObject("ADODB.RecordSet") cadena = session("Log") & session("id") & date & session("Hora") sSql4="SELECT * FROM Control where id = '" & cadena & "'" rsParam.Open sSql4,cn4,2,3 if not rsParam.eof and not rsParam.bof then rsParam.MoveFirst rsParam.Fields("Fin") = time rsParam.Update rsParam.Close end if cn4.close session("Log")="" session("Pass")="" session("Hora") = "" session("id") = "" if session("Conect") <> 1 then session.abandon end if elseif accion="c" then response.expires = -1500 Set cn = Server.CreateObject("ADODB.Connection") cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.MapPath("/db/drtooth.mdb") set rsAcceso = server.CreateObject("ADODB.RecordSet") sSql = "SELECT * FROM acceso where user='" & request("txtLog") &"'" rsAcceso.Open sSql,cn,3 if rsAcceso.eof and rsAcceso.bof then Err = "Usuario no Valido" elseif rtrim(request("txtPass"))<> rtrim(rsAcceso("Pass")) then Err = "PassWord Incorrecta" else session("Log")=rtrim(rsAcceso("User")) session("Pass")=rtrim(rsAcceso("Pass")) session("Hora") = time session("id") = session.sessionid set rsControl = server.CreateObject("ADODB.RecordSet") sSql2 = "SELECT * FROM control" rsControl.Open sSql2,cn,2,3 rsControl.AddNew rsControl.fields("Log") = session("Log") rsControl.fields("IP") = Request.ServerVariables("HTTP_CLIENT_IP") rsControl.fields("Fecha") = date rsControl.fields("Inicio") = time rsControl.fields("sesion") = session("id") rsControl.fields("id") = session("Log") & session("id") & date & session("Hora") rsControl.Update rsControl.Close end if rsAcceso.Close cn.close end if %>

Area Usuarios

	<% if Err <> "" then %> <%=Err%> <%end if if session("pass") = "" or session("log") = "" then response.expires = -1500%> Login Password <%else%> Login > Password > <%end if%>

Sugerencias

	Ayudenos a mejorar, envienos sus sugerencias. [ Sugerir ]

Favoritos

	Añadir DrTooth.net a favoritos

Recomiende

	Recomiende esta página a un amigo

Valore

	¿Ha probado la Demo de Dr.Tooth.NET? Valore nuestro SoftWare de Gestión Integral Muticlinica


Ficha	Agenda	Situaciones	Estadistica	Correspondencia	Personalizaciones	Datos

ESTADÍSTICAS

Esta función permite realizar estadísticas de las intervenciones. Se pueden realizar sea de las intervenciones realizadas que de las presupuestadas. También se pueden realizar en síntesis o en detalle.

Realizadas por periodo

Estadística de un periodo determinado de las intervenciones realizadas.

Las estadísticas se pueden realizar generales de toda la consulta o particulares seleccionando uno o mas doctores o uno o mas grupos de pertenencia (ortodoncia, endodoncia, higiene etc.).

Hay que especificar el periodo en el cual se quiere realizar la estadística y si se quiere el precio unitario de las intervenciones.

Es posible también realizar una estadística detallada, por cada intervención realizada serán reflejados el doctor que la realizo, fecha de realización y paciente.

Una función a destacar de las estadísticas es que el informe sacara el precio medio de cada intervención (es decir cual ha sido el precio medio que se ha cobrado en el periodo seleccionado).

Realizadas por mes

Estadística de las intervenciones realizadas en el año agrupadas mes por mes.

Las estadísticas se pueden realizar generales de toda la consulta o particulares seleccionando uno o más doctores o uno o mas grupos de pertenencia (ortodoncia, endodoncia, higiene etc.).

Por realizar

Estadística de las intervenciones presupuestadas y no realizadas aún. Este informe permite tener una visión de los trabajos que se van a realizar para poder también prever la compras de materiales.

Volver

DrTooth es un programa especifico para la gestión de clínicas dentales, consultorio y gabinetes odontológicos desarrollado por Celdas. Este software odontológico realiza todas las funciones para la gestión de un gabinete odontológico: gestión ficha pacientes, odontograma, ficha periodontal, anamnesis, presupuestos, sesiones, extractos de cuentas, listados pacientes, agenda de citas, correspondencia, contabilidad etc.

Contactar Home Programa Download Usuarios Comprar Webmail
7 Motivos Fotocrop Ficha Pacientes Agenda Situaciones Estadisticas Correspondencia Personalizaciones Datos