|
|
| Línea 1: |
Línea 1: |
| − | ==FORMULARIO==
| |
| | | | |
| − | ===frm_separo_gen.scx===
| |
| − |
| |
| − | [[Imagen:Frm_separo_gen.PNG]]
| |
| − |
| |
| − | ==INFORME==
| |
| − |
| |
| − | Esta aplicación no genera '''Reportes'''.
| |
| − |
| |
| − | ==CÓDIGO==
| |
| − |
| |
| − |
| |
| − | ===Programa "separo_general.prg"===
| |
| − |
| |
| − | *****este programa extrae contratos
| |
| − |
| |
| − | parameters nro_liq
| |
| − |
| |
| − | set date to french
| |
| − | set talk off
| |
| − | set safe off
| |
| − | set delete on
| |
| − | SET TALK OFF
| |
| − | SET SAFETY OFF
| |
| − | SET EXCLU ON
| |
| − | SET DATE TO DMY
| |
| − | SET CENT ON
| |
| − | SET DELETED ON
| |
| − | *-------------------------------------------
| |
| − | *public v_campo,v_id,legajo,total,vm_importe
| |
| − | public vm_periodo
| |
| − | *--------------armo fecha del mes
| |
| − | tabla =vm_bases_informes+"dh22"
| |
| − | if used ("dh22")
| |
| − | sele dh22
| |
| − | use
| |
| − | endif
| |
| − | sele sele(1)
| |
| − | use &tabla excl
| |
| − | index on nro_liqui tag nro_liqui
| |
| − |
| |
| − | sele per_limes,per_liano from dh22 where val(nro_liq)=dh22.nro_liqui into cursor "dh22_mes"
| |
| − | sele dh22_mes
| |
| − | vm_periodo=padl(alltrim(str(per_limes)),2,"0")+right(alltrim(str(per_liano)),2)
| |
| − | *---------------------------------------------------------------------
| |
| − |
| |
| − |
| |
| − | **************
| |
| − | wait windows "pide dh21"
| |
| − | *----abro la vista del dh21 con el
| |
| − | cadena1= "select *";
| |
| − | + " from dh21 where nro_liqui = "+nro_liq
| |
| − |
| |
| − | nom1=sys(3)
| |
| − | create sql view &nom1;
| |
| − | connection "";
| |
| − | as &cadena1
| |
| − | **la paso a una tabla
| |
| − | sele sele (1)
| |
| − | use &nom1 alias v_21_0
| |
| − |
| |
| − |
| |
| − | tabla =vm_bases_informes+"dh21_0"
| |
| − | sele * from v_21_0 into table &tabla
| |
| − |
| |
| − | if used ("dh21_0")
| |
| − | sele dh21_0
| |
| − | use
| |
| − | endif
| |
| − | sele sele(1)
| |
| − | use &tabla excl
| |
| − | index on nro_legaj tag lega
| |
| − | sele v_21_0
| |
| − | use
| |
| − | drop view &nom1
| |
| − |
| |
| − |
| |
| − |
| |
| − | *!* *------------------------------------------------------------------------------------
| |
| − | sele distinc nro_legaj,nro_cargo from dh21_0 into table vm_bases_informes+"cargos_liq"
| |
| − | *-------------------------------------------------------------------------------------
| |
| − |
| |
| − | cadena2= "select * from dh03"
| |
| − |
| |
| − | nom2=sys(3)
| |
| − | create sql view &nom2;
| |
| − | connection "";
| |
| − | as &cadena2
| |
| − | **la paso a una tabla
| |
| − | sele sele (1)
| |
| − | use &nom2 alias v_dh03
| |
| − | tabla =vm_bases_informes+"dh03_0"+vm_periodo
| |
| − | nom_base="dh03_0"+vm_periodo
| |
| − | sele * from v_dh03 where not inlist(codc_carac,'CONT','JUNC','JUSC',;
| |
| − | 'JUDC') into table &tabla
| |
| − | ***jdcc 'JUDCI',,'JCON',LO SAQUE
| |
| − |
| |
| − | *!* ************armo archivo de general*******
| |
| − | select * from cargos_liq as c,&nom_base as d3 where c.nro_cargo=d3.nro_cargo ;
| |
| − | into table vm_bases_informes+"dh03_liq_0"+vm_periodo
| |
| − |
| |
| − | nom_base_d3d0="dh03_liq_0"+vm_periodo
| |
| − | select d21.*,codc_categ,codc_carac,fec_alta,fec_baja,hs_dedic ," " as barra;
| |
| − | from &nom_base_d3d0 as c,dh21_0 as d21 where c.nro_cargo_=d21.nro_cargo ;
| |
| − | into table vm_bases_informes+"dh21_0"+vm_periodo
| |
| − |
| |
| − | *!* ******************cruzo contratos con dh03 de contratos
| |
| − | *!* sele * from dh01 as d1,&nom_base_d3d0 as dliq;
| |
| − | *!* where d1.nro_legaj=dliq.nro_legaj;
| |
| − | *!* into table vm_bases_informes+"dh01_0"+vm_periodo
| |
| − |
| |
| − | *--copio a transacciones el archivo de contratos
| |
| − | nom_base_dh21="dh21_0"+vm_periodo
| |
| − | sele &nom_base_dh21
| |
| − | repla all barra with "0"
| |
| − | copy to "t:\liquidaciones\"+vm_periodo+"\"+nom_base_dh21
| |
| − |
| |
| − |
| |
| − | *----------------------------------
| |
| − |
| |
| − | ===Botón "Aceptar" (cmd_aceptar)===
| |
| − |
| |
| − | if thisform.lvwliq.selecteditem.index <> 0
| |
| − | v_fila= thisform.lvwliq.selecteditem.index
| |
| − | messagebox(str(v_fila))
| |
| − | nro_liq=thisform.lvwliq.listitems(v_fila).text
| |
| − | nom_liq=thisform.lvwliq.listitems(v_fila).SUBITEMS(1)
| |
| − | messagebox(nro_liq + " " + NOM_LIQ )
| |
| − | endif
| |
| − | programa=vm_programas + "separo_general.prg"
| |
| − | do &programa with nro_liq
| |
| − |
| |
| − | ===Botón "Salir" (Salir)===
| |
| − |
| |
| − | set filter to
| |
| − | close tables all
| |
| − | thisform.release
| |
| − |
| |
| − | ==TABLAS==
| |
| − |
| |
| − | Aquí se detallan las tablas con los campos utilizados de cada una.
| |
| − |
| |
| − |
| |
| − | {| border="1" style="background:#ffffff" class="sortable wikitable"
| |
| − | |+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''DH12'''</big>
| |
| − | |-
| |
| − | |codn_conce
| |
| − | |-
| |
| − | |vig_coano
| |
| − | |-
| |
| − | |vig_comes
| |
| − | |-
| |
| − | |desc_conce
| |
| − | |-
| |
| − | |desc_corta
| |
| − | |-
| |
| − | |tipo_conce
| |
| − | |-
| |
| − | |codc_vige1
| |
| − | |-
| |
| − | |desc_nove1
| |
| − | |-
| |
| − | |tipo_nove1
| |
| − | |-
| |
| − | |cant_ente1
| |
| − | |-
| |
| − | |cant_deci1
| |
| − | |-
| |
| − | |codc_vige2
| |
| − | |-
| |
| − | |desc_nove2
| |
| − | |-
| |
| − | |tipo_nove2
| |
| − | |-
| |
| − | |cant_ente2
| |
| − | |-
| |
| − | |cant_deci2
| |
| − | |-
| |
| − | |flag_acumu
| |
| − | |-
| |
| − | |flag_grupo
| |
| − | |-
| |
| − | |nro_orcal
| |
| − | |-
| |
| − | |nro_orimp
| |
| − | |-
| |
| − | |sino_legaj
| |
| − | |-
| |
| − | |tipo_distr
| |
| − | |-
| |
| − | |tipo_ganan
| |
| − | |-
| |
| − | |chk_acumsac
| |
| − | |-
| |
| − | |chk_acumproy
| |
| − | |-
| |
| − | |chk_dcto3
| |
| − | |-
| |
| − | |chkacumprhbrprom
| |
| − | |-
| |
| − | |subcicloliquida
| |
| − | |-
| |
| − | |chkdifhbrcargoasoc
| |
| − | |-
| |
| − | |chkptesubconcep
| |
| − | |-
| |
| − | |chkinfcuotasnovper
| |
| − | |-
| |
| − | |genconimp0
| |
| − | |-
| |
| − | |sino_visible
| |
| − | |-
| |
| − | |}
| |
| − |
| |
| − | ==INFORMACIÓN RELACIONADA==
| |
| − |
| |
| − |
| |
| − | {| border="1" style="background:#ffffff" class="sortable wikitable"
| |
| − | !+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''Descripción'''</big>
| |
| − | !+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''Reporte'''</big>
| |
| − | !+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''Tabla'''</big>
| |
| − | !+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''Indice'''</big>
| |
| − | !+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''PDF'''</big>
| |
| − | !+ align="center" style="background:DarkSlateBlue; color:white"|<big>'''Observación'''</big>
| |
| − | |-
| |
| − | |Total Universidad
| |
| − | |totales_proc_gene
| |
| − | |lis_tot_gen
| |
| − | |id_fuente
| |
| − | |TGF
| |
| − | |
| |
| − | |-
| |
| − | |Detalle Total Universidad
| |
| − | |tot_proc_det
| |
| − | |lis_tot_det
| |
| − | |id_orden
| |
| − | |TGD
| |
| − | |
| |
| − | |-
| |
| − | |Planilla de Totales Generales por Fuente
| |
| − | |totales_proc_gene-dep
| |
| − | |lis_tot_gen_dep
| |
| − | |id_depfu
| |
| − | |TDF
| |
| − | |1 hoja por dependencia
| |
| − | |-
| |
| − | |Planilla Detallada de Totales
| |
| − | |tot_proc_dep
| |
| − | |lis_tot_dep
| |
| − | |id_orden
| |
| − | |TDD
| |
| − | |1 hoja por dependencia
| |
| − | |-
| |
| − | |}
| |
| − |
| |
| − | ==MANUAL DEL USUARIO==
| |
| − |
| |
| − | '''VANE - ME PARECE QUE LA DESCRIPCION DEL PROCEDIMIENTO LO TENDRIAS QUE HACER ACA'''
| |
| − |
| |
| − | '''VER - Ejemplo de como lo redacto'''
| |
| − |
| |
| − | El Sistema '''WERKEN''' permite generar un listado de los empleados Jubilados pero que se encuentran activos, donde se listarán los empleados agrupados por legajo que cumplan con las condiciones de búsqueda, estos son 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.
| |
| − | * Tipo de Estado.
| |
| − | * Cargo
| |
| − | * Fecha de Alta del Cargo
| |
| − | * Fecha de Baja del Cargo
| |
| − | * Caracter.
| |
| − |
| |
| − | ===Procedimiento de Uso===
| |
| − |
| |
| − | 1. Ingresar al Sistema WERKEN.
| |
| − |
| |
| − | 2. Seleccionar la opción “PROCESOS”.
| |
| − |
| |
| − | 3. Seleccionar “Acreditaciones\Generación de Listados de Totales”.
| |
| − |
| |
| − | 4. Presionar el botón “Ejecutar”.
| |
| − |
| |
| − | 5. Se abrirá el formulario presentado antes.
| |
| − |
| |
| − | 6. Seleccionar "Tipo de Informe", “Mes” (de vigencia), “Año” (de vigencia) y "Liquidación Barra" (Barra de liquidación).
| |
| − |
| |
| − | 7. Presionar el botón “Procesar”
| |
| − |
| |
| − | 8. Seleccionar el informe que desea visualizar y generar su correspondiente PDF. Si ya genero los Informes no es necesario ejecutar el proceso anterior.
| |
| − |
| |
| − | 9. Presionar el botón "Ver Listado y Generar PDF".
| |
