Diferencia entre revisiones de «Listado de Control de Fecha de Permanencia»

De Wiki
Saltar a: navegación, buscar
(MANUAL DEL USUARIO)
 
(No se muestran 5 ediciones intermedias del mismo usuario)
Línea 1: Línea 1:
==FORMULARIO==
+
=<div style="text-align:center;color:black">'''ORIGEN DE DATOS'''</div>=
  
[[Imagen:Fmr_Fec_Permanencia.PNG]]
 
  
==INFORME==
+
==Sitio de alojamiento dentro del ejecutable del Sistema==
  
[[Imagen:Frx_fec_permanencia.PNG]]
+
En el ejecutable de Werken2, se ubica en:
  
==CÓDIGO==
+
{|border="1" style="margin:4px 0px 0px 0px; background:none"
 +
||
 +
{| border="1" style="background:#ffffff" class="sortable wikitable"
 +
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Categoria'''</big>
 +
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Sub-Categoría'''</big>
 +
|-
 +
|Sueldos Y Haberes
 +
|
 +
|-
 +
|}
 +
|}
  
 +
==Origen del Código Fuente==
  
===Programa "prg_fec_permanencia.prg"===
+
{|border="1" style="margin:4px 0px 0px 0px; background:none"
 +
||
 +
{| border="1" style="background:#ffffff" class="sortable wikitable"
 +
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Formularios'''</big>
 +
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Programas'''</big>
 +
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Reportes'''</big>
 +
|-
 +
|frm_fec_permanencia.scx
 +
|prg_fec_permanencia.prg
 +
|frx_fec_permanencia.frx
 +
|-
 +
|}
 +
|}
  
  *---------------------------------------------------------------------------------------------------------
+
=<div style="text-align:center;color:black">'''TABLAS'''</div>=
  *--Parametros del Programa--------------------------------------------------------------------------------
 
  PARAMETERS mesVigente,anioVigente
 
  *---------------------------------------------------------------------------------------------------------
 
  *--Rutina de Inicialización-------------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  CLEAR
 
  CLOSE TABLES all
 
  SET CENTURY ON
 
  SET DATE TO french
 
  **Se construye la variable fecha a partir de los campos "Mes" y "Año" que se completan en el formulario.
 
  **Dicha fecha será utilizada para traer los empleados que esten activos al periodo de busqueda.
 
  fecha="{^"+ALLTRIM(anioVigente)+"-"+PADL(ALLTRIM(mesVigente),2,"0")+"-01}"
 
 
 
  PUBLIC periodoVigente
 
  periodoVigente=ALLTRIM(mesVigente)+"/"+ALLTRIM(anioVigente)
 
  *---------------------------------------------------------------------------------------------------------
 
  *--Llamo a la pantalla de espera--------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  procesando=vm_formularios+"frmprocesando.scx"
 
  DO FORM &procesando
 
  *---------------------------------------------------------------------------------------------------------
 
  *--Traigo los datos de las tablas DH01 y DH03-------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  **Tabla DH01**
 
  consulta01="select nro_legaj,desc_appat,desc_nombr";
 
  +" from dh01";
 
 
 
  nom01=SYS(3)
 
  CREATE SQL VIEW &nom01;
 
  CONNECTION con_pampasql;
 
  AS &consulta01
 
  SELE SELE(1)
 
  USE &nom01 ALIAS v01
 
  *Creo Tabla
 
  tabla01=vm_bases_informes+"dh01Activos"
 
  *Creo Consulta
 
  SELECT *;
 
  FROM v01;
 
  INTO TABLE &tabla01
 
  *Destruyo Vista
 
  SELECT v01
 
  USE
 
  DROP VIEW &nom01
 
 
 
  *SELECT dh01Activos
 
  *BROWSE
 
  *---------------------------------------------------------------------------------------------------------
 
  **Tabla DH03**
 
  consulta03="select nro_legaj,fec_alta,fec_baja,codc_categ,fechapermanencia";
 
  +" from dh03";
 
 
 
  nom03=SYS(3)
 
  CREATE SQL VIEW &nom03;
 
  CONNECTION con_pampasql;
 
  AS &consulta03
 
  SELE SELE(1)
 
  USE &nom03 ALIAS v03
 
  *Creo Tabla
 
  tabla03=vm_bases_informes+"dh03Activos"
 
  *Creo Consulta
 
  SELECT *;
 
  FROM v03;
 
  INTO TABLE &tabla03
 
  *Destruyo Vista
 
  SELECT v03
 
  USE
 
  DROP VIEW &nom03
 
 
 
  *SELECT dh03Activos
 
  *BROWSE
 
  *---------------------------------------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  *--Creo la Tabla Final------------------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  tablaFinal=vm_bases_informes+"fechaPermanencia"
 
 
 
  SELECT *;
 
  FROM dh01Activos INNER JOIN dh03Activos;
 
  ON dh01Activos.nro_legaj=dh03Activos.nro_legaj;
 
  WHERE (dh03Activos.fec_baja>=&fecha OR dh03Activos.fec_baja IS NULL);
 
  AND (VAL(dh03Activos.codc_categ) IN (3661,3662,3663,3664,3665,3666,3667,1,2,3,4,5,6,7,8,9,10,11));
 
  AND (dh03Activos.fechaperma<>dh03Activos.fec_alta OR dh03Activos.fechaperma IS NULL);
 
  ORDER BY dh01Activos.nro_legaj;
 
  INTO TABLE &tablaFinal
 
  *---------------------------------------------------------------------------------------------------------
 
  *--CIERRO EL CARTEL DE ESPERA------------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  frmprocesando.release
 
  *---------------------------------------------------------------------------------------------------------
 
  *--MUESTRO LA TABLA GENERAL-------------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  *SELECT fechaPermanencia
 
  *BROWSE
 
  *---------------------------------------------------------------------------------------------------------
 
  *--MUESTRO EL REPORTE FINAL-------------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  IF(RECCOUNT("fechaPermanencia")==0)
 
  MESSAGEBOX("Su consulta no genero resultados")
 
  ELSE
 
  informe=vm_informes+"frx_fec_permanencia.frx"
 
  report form &informe preview
 
  ENDIF
 
  
===Botón "Procesar" (btnProcesar)===
+
==Tablas Usadas==
  
  *---------------------------------------------------------------------------------------------------------
+
{|border="1" style="margin:4px 0px 0px 0px; background:none"
  *--CAPTURO LOS VALORES DE LOS COMBO QUE SERAN PASADO AL PROGRAMA COMO PARAMETRO---------------------------
+
||
  *---------------------------------------------------------------------------------------------------------
+
{| border="1" style="background:#ffffff" class="sortable wikitable"
  mesVigencia=THISFORM.cmbMes.value
+
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Tabla'''</big>
  anioVigencia=THISFORM.cmbAnio.value
+
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Path de acceso'''</big>
  *---------------------------------------------------------------------------------------------------------
+
|-
  *--LLAMO AL PROGRAMA--------------------------------------------------------------------------------------
+
|DH01
  *---------------------------------------------------------------------------------------------------------
+
|Base de Datos
  programa=vm_programas + "prg_fec_permanencia.prg"
+
|-
  DO &programa WITH mesVigencia,anioVigencia
+
|DH03
 +
|Base de Datos
 +
|-
 +
|}
 +
|}
  
===Botón "Cancelar" (btnCancelar)===
+
===Descripción Tablas===
  
  THISFORM.Release
+
Aquí se detallan las tablas con los campos utilizados de cada una.
  
===Botón "Ayuda"(btnAyuda)===
+
{| style="margin:4px 0px 0px 0px; background:none"
 +
||
 +
{| border="1" style="background:#ffffff" class="sortable wikitable"
 +
|+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''DH01'''</big>
 +
|-
 +
|nro_legaj
 +
|-
 +
|desc_appat
 +
|-
 +
|desc_nombr
 +
|-
 +
|}
 +
| style="border:1px solid transparent" |
 +
||
 +
{| border="1" style="background:#ffffff" class="sortable wikitable"
 +
|+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''DH03'''</big>
 +
|-
 +
|nro_legaj
 +
|-
 +
|fec_alta
 +
|-
 +
|fec_baja
 +
|-
 +
|codc_categ
 +
|-
 +
|fechapermanencia
 +
|-
 +
|}
 +
|}
  
  DECLARE INTEGER ShellExecute ;
+
==Tablas Generadas==
  IN SHELL32.DLL ;
 
  INTEGER nWinHandle,;
 
  STRING cOperation,;
 
  STRING cFileName,;
 
  STRING cParameters,;
 
  STRING cDirectory,;
 
  INTEGER nShowWindow
 
 
 
  V_busca='R:\werken\docs\List_Fec_Permanencia.pdf'
 
  ShellExecute(0,"open",V_busca,"", Fullpath(""),0)
 
  
===Combo "Año" (cmbAnio)===
+
{|border="1" style="margin:4px 0px 0px 0px; background:none"
 +
||
 +
{| border="1" style="background:#ffffff" class="sortable wikitable"
 +
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Tabla'''</big>
 +
| align="center" style="background:DarkSlateBlue; color:white"|<big>'''Path de acceso'''</big>
 +
|-
 +
|fechaPermanencia
 +
|c:\anexo\bases_informes
 +
|-
 +
|}
 +
|}
  
  *---------------------------------------------------------------------------------------------------------
+
'''NOTA: '''Cualquier otra tabla creada es de transición temporal y es destruida una vez finalizada la ejecución de la aplicación.
  *--CARGO EL COMBO DE LOS AÑOS-----------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  FOR I=(YEAR(DATE())-10) TO YEAR(DATE())
 
  THISFORM.cmbAnio.AddItem(STR(I))
 
  ENDFOR
 
  *---------------------------------------------------------------------------------------------------------
 
  *--SELECCIONO EL PRIMERO DE LOS ELEMENTOS DEL COMBO POR DEFECTO-------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  THISFORM.cmbAnio.SelectedID(11)=.T.
 
  
===Combo "Mes" (cmbMes)===
+
=<div style="text-align:center;color:black">'''ARCHIVOS'''</div>=
  
  *---------------------------------------------------------------------------------------------------------
+
==Archivos Usados==
  *--CARGO EL COMBO DE LOS MESES----------------------------------------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  FOR I=1 TO 12
 
  THISFORM.cmbMes.AddItem(STR(I))
 
  ENDFOR
 
  *---------------------------------------------------------------------------------------------------------
 
  *--SELECCIONO EL PRIMERO DE LOS ELEMENTOS DEL COMBO POR DEFECTO-------------------------------------------
 
  *---------------------------------------------------------------------------------------------------------
 
  THISFORM.cmbMes.SelectedID(1)=.T.
 
  
==MANUAL DEL USUARIO==
+
Esta aplicación '''NO''' utiliza ningún archivo.
  
El Sistema WERKEN permite generar un listado de los empleados no docentes activos que no tengan establecida la fecha de permanencia o que la misma sea distinta que la fecha de alta del empleado.
+
==Archivos Generados==
Se tomaran los empleados que cumplan con condición de vigencia a aquellos que tengan un cargo vigente al periodo establecido en el formulario inicial.
 
El informe generado por el sistema mostrará:
 
*Legajo del empleado.
 
*Apellido y nombre del mismo.
 
*Categoría.
 
*Fecha de Alta del Cargo
 
*Fecha de Baja del Cargo
 
*Fecha Permanencia.
 
  
===Procedimiento de Uso===
+
Esta aplicación '''NO''' genera ningún archivo.
  
1. Ingresar al Sistema WERKEN.
+
=<div style="text-align:center;color:black">'''OBSERVACIONES'''</div>=
  
2. Seleccionar la opción “01 - SUELDOS”.
 
  
3. Seleccionar “Listado de Control de Fecha de Permanencia”.
+
=<div style="text-align:center;color:black">'''MANUAL DEL USUARIO'''</div>=
 
 
4. Presionar el botón “Ejecutar”.
 
 
 
5. Se abrirá el formulario presentado antes.
 
 
 
6. Seleccionar “Mes” (de vigencia) y “Año” (de vigencia).
 
 
 
7. Presionar el botón “Procesar”
 
 
 
8. Se genera el informe correspondiente.
 

Revisión actual del 09:57 18 jun 2012

ORIGEN DE DATOS

Sitio de alojamiento dentro del ejecutable del Sistema

En el ejecutable de Werken2, se ubica en:

Categoria Sub-Categoría
Sueldos Y Haberes

Origen del Código Fuente

Formularios Programas Reportes
frm_fec_permanencia.scx prg_fec_permanencia.prg frx_fec_permanencia.frx

TABLAS

Tablas Usadas

Tabla Path de acceso
DH01 Base de Datos
DH03 Base de Datos

Descripción Tablas

Aquí se detallan las tablas con los campos utilizados de cada una.

DH01
nro_legaj
desc_appat
desc_nombr
DH03
nro_legaj
fec_alta
fec_baja
codc_categ
fechapermanencia

Tablas Generadas

Tabla Path de acceso
fechaPermanencia c:\anexo\bases_informes

NOTA: Cualquier otra tabla creada es de transición temporal y es destruida una vez finalizada la ejecución de la aplicación.

ARCHIVOS

Archivos Usados

Esta aplicación NO utiliza ningún archivo.

Archivos Generados

Esta aplicación NO genera ningún archivo.

OBSERVACIONES

MANUAL DEL USUARIO