Fiscalia

No puedo ayudar, tal vez alguien que sepa de Script

Si no funciona se compone en Herramientas → Opciones, el la ventana que abre elijes la pestaña Editar y seleccionas la casilla que dice ±"permitir arrastrar la celda..."

[quote:305f5decb0="alex78"][color=black:305f5decb0][size=18:305f5decb0]....El patrón deberá iniciar la retención y el entero de los descuentos a partir del día siguiente a aquél en que reciba alguno de los formatos a que se refiere este artículo....[/size:305f5decb0].[/color:305f5decb0][/quote:305f5decb0] y... [quote:305f5decb0="jcarlos923"]La emision es del 2° Bimestre (Marzo y Abril) y me llegó el CD el 15 de Mayo 2005, entonces inicié descuento a partir de Junio. [/quote:305f5decb0] El descuento deberá aplicarlo apartir del 16 de Mayo, así que pagarás el sig. bimestre (Mayo-Junio)

Mi estimado BR1 (en el extranjero) concuerdo con edgarecs, debemos conisderar esos conceptos para obtener el Salario Integrado(LFT), solo no confundamos con el SBC el cual las Horas extras no integran si no exceden de 3 horas diarias ni 3 veces a la semana, y lo referente en el Art. 27 LSS.

Para el cálculo del Dígito Verificador del Numero de Seguridad Social, sabemos que al número de multiplica × 1 el primer dígito, × 2 el siguiente dígito, × 1 el que sigue, y así susecivamente, he aqui la macro para realizar ese cálculo [code:1:87204502df]Function NSS(Numero As String) If Len(Numero) < 10 Then NSS = "Faltan Dígitos " & Numero Exit Function End If If Len(Numero) > 11 Then NSS = "Muchos Dígitos " & Numero Exit Function End If Dim I As Integer Dim j As Integer Dim k As Integer For I = 1 To 10 k = Val(Mid(Numero, I, 1)) If (I Mod 2) <> 1 Then k = k * 2 If k > 9 Then k = k - 10 k = k + 1 End If End If j = j + k Next I Digito = Application.WorksheetFunction.RoundUp(j, -1) - j If Len(Numero) = 10 Then NSS = Mid(Numero, 1, 10) & Digito End If If Len(Numero) = 11 And Digito = Val(Right(Numero, 1)) Then NSS = Numero ElseIf Len(Numero) = 11 And Digito <> Val(Mid(Numero, 11, 1)) Then msg = MsgBox("El Dígito verificador " & Mid(Numero, 11, 1) & " del Número de Seguridad Social '" & Mid(Numero, 1, 10) & "' no corresponde a " & Digito & "." & Chr(13) & "¿Desea cambiarlo?", vbYesNo + vbQuestion, "Dígito Verificador") If msg = vbYes Then NSS = Mid(Numero, 1, 10) & Digito Else NSS = Mid(Numero, 1, 10) & "?" End If End If End Function[/code:1:87204502df] Si desean tener una hoja con ejemplos e instrucciones para su correcto funcionamiento, estan en la zona de descargas y en mi página.

Algo parecido sucede con el IMSS en los términos de [b:66207103e7]SDI[/b:66207103e7] y [b:66207103e7]SBC[/b:66207103e7]

El candado es una marca de que estas entrando a una página segura, yo he entrado

A veces tarda un poco, depende de la velocidad de la PC

Se acaba de ver un tópico igual se llama [url=http://www.fiscalia.com/postt14637.html][b:6717ba32b6]modificacion salario variable[/b:6717ba32b6][/url]

copie esto de un tópico de febrero: [color=green:4d3d5fcfa5]Para integrar el salario de 45.35, considerando las prestaciones míminas del primer año. Días de Prima Vacacional 06 Días de Aguinaldo 15 Porcentaje de P. Vac. 25% Dias de Vacaciones × Porcetaje de P. Vac ÷ Días del Año 06 × 25% = 1.5 ÷ 365 = 0.0041 Dias de Aguinaldo ÷ Dias del Año 15 ÷ 365 = 0.0411 0.0041 + 0-0411 = 0.0452 mas la Unidad = 1.0452 Salario 45.35 × 1.0452 = 47.40 Para desintegrar seria : SDI ÷ Factor de Integración 47.40 ÷ 1.0452 = 45.35[/color:4d3d5fcfa5]

Autor	Mensaje
Tópico: PARA LOS SUPER EXPERTOS DE ESTE FORO
ByPaco Mensajes: 8	Foro: Excel Enviado: Julio 15, 2005 Asunto:
ByPaco Mensajes: 8	No puedo ayudar, tal vez alguien que sepa de Script
Tópico: Ayuda con excel
ByPaco Mensajes: 6	Foro: Excel Enviado: Julio 15, 2005 Asunto:
ByPaco Mensajes: 6	Si no funciona se compone en Herramientas → Opciones, el la ventana que abre elijes la pestaña Editar y seleccionas la casilla que dice ±"permitir arrastrar la celda..."
Tópico: EBA como Aviso de Retencion INFONAVIT
ByPaco Mensajes: 28	Foro: Seguridad Social Enviado: Julio 15, 2005 Asunto: Re: EBA como Aviso de Retencion INFONAVIT
ByPaco Mensajes: 28	[quote:305f5decb0="alex78"][color=black:305f5decb0][size=18:305f5decb0]....El patrón deberá iniciar la retención y el entero de los descuentos a partir del día siguiente a aquél en que reciba alguno de los formatos a que se refiere este artículo....[/size:305f5decb0].[/color:305f5decb0][/quote:305f5decb0] y... [quote:305f5decb0="jcarlos923"]La emision es del 2° Bimestre (Marzo y Abril) y me llegó el CD el 15 de Mayo 2005, entonces inicié descuento a partir de Junio. [/quote:305f5decb0] El descuento deberá aplicarlo apartir del 16 de Mayo, así que pagarás el sig. bimestre (Mayo-Junio)
Tópico: Efectos de no integrar el tiempo extra?
ByPaco Mensajes: 10	Foro: Seguridad Social Enviado: Julio 15, 2005 Asunto:
ByPaco Mensajes: 10	Mi estimado BR1 (en el extranjero) concuerdo con edgarecs, debemos conisderar esos conceptos para obtener el Salario Integrado(LFT), solo no confundamos con el SBC el cual las Horas extras no integran si no exceden de 3 horas diarias ni 3 veces a la semana, y lo referente en el Art. 27 LSS.
Tópico: Cálculo del DV del NSS
ByPaco Mensajes: 13	Foro: Excel Enviado: Julio 15, 2005 Asunto: Cálculo del DV del NSS
ByPaco Mensajes: 13	Para el cálculo del Dígito Verificador del Numero de Seguridad Social, sabemos que al número de multiplica × 1 el primer dígito, × 2 el siguiente dígito, × 1 el que sigue, y así susecivamente, he aqui la macro para realizar ese cálculo [code:1:87204502df]Function NSS(Numero As String) If Len(Numero) < 10 Then NSS = "Faltan Dígitos " & Numero Exit Function End If If Len(Numero) > 11 Then NSS = "Muchos Dígitos " & Numero Exit Function End If Dim I As Integer Dim j As Integer Dim k As Integer For I = 1 To 10 k = Val(Mid(Numero, I, 1)) If (I Mod 2) <> 1 Then k = k * 2 If k > 9 Then k = k - 10 k = k + 1 End If End If j = j + k Next I Digito = Application.WorksheetFunction.RoundUp(j, -1) - j If Len(Numero) = 10 Then NSS = Mid(Numero, 1, 10) & Digito End If If Len(Numero) = 11 And Digito = Val(Right(Numero, 1)) Then NSS = Numero ElseIf Len(Numero) = 11 And Digito <> Val(Mid(Numero, 11, 1)) Then msg = MsgBox("El Dígito verificador " & Mid(Numero, 11, 1) & " del Número de Seguridad Social '" & Mid(Numero, 1, 10) & "' no corresponde a " & Digito & "." & Chr(13) & "¿Desea cambiarlo?", vbYesNo + vbQuestion, "Dígito Verificador") If msg = vbYes Then NSS = Mid(Numero, 1, 10) & Digito Else NSS = Mid(Numero, 1, 10) & "?" End If End If End Function[/code:1:87204502df] Si desean tener una hoja con ejemplos e instrucciones para su correcto funcionamiento, estan en la zona de descargas y en mi página.
Tópico: ISPT O ISR
ByPaco Mensajes: 7	Foro: Fiscal Enviado: Julio 15, 2005 Asunto:
ByPaco Mensajes: 7	Algo parecido sucede con el IMSS en los términos de [b:66207103e7]SDI[/b:66207103e7] y [b:66207103e7]SBC[/b:66207103e7]
Tópico: ALGUIEN CONOCE UNA PAGINA DONDE PUEDA TRAMITAR LA CURP.
ByPaco Mensajes: 9	Foro: Fiscal Enviado: Julio 15, 2005 Asunto:
ByPaco Mensajes: 9	El candado es una marca de que estas entrando a una página segura, yo he entrado
Tópico: CLAVE DE LA CALCULADORA FISCAL
ByPaco Mensajes: 27	Foro: Excel Enviado: Julio 15, 2005 Asunto: Re: CLAVE DE LA CALCULADORA FISCAL
ByPaco Mensajes: 27	A veces tarda un poco, depende de la velocidad de la PC
Tópico: modificacion salario mixto, fuera de tiempo
ByPaco Mensajes: 9	Foro: Seguridad Social Enviado: Julio 15, 2005 Asunto: Re: modificacion salario mixto, fuera de tiempo
ByPaco Mensajes: 9	Se acaba de ver un tópico igual se llama [url=http://www.fiscalia.com/postt14637.html][b:6717ba32b6]modificacion salario variable[/b:6717ba32b6][/url]
Tópico: Factor de integracion para SBC
ByPaco Mensajes: 8	Foro: Seguridad Social Enviado: Julio 15, 2005 Asunto: Re: Factor de integracion para SBC
ByPaco Mensajes: 8	copie esto de un tópico de febrero: [color=green:4d3d5fcfa5]Para integrar el salario de 45.35, considerando las prestaciones míminas del primer año. Días de Prima Vacacional 06 Días de Aguinaldo 15 Porcentaje de P. Vac. 25% Dias de Vacaciones × Porcetaje de P. Vac ÷ Días del Año 06 × 25% = 1.5 ÷ 365 = 0.0041 Dias de Aguinaldo ÷ Dias del Año 15 ÷ 365 = 0.0411 0.0041 + 0-0411 = 0.0452 mas la Unidad = 1.0452 Salario 45.35 × 1.0452 = 47.40 Para desintegrar seria : SDI ÷ Factor de Integración 47.40 ÷ 1.0452 = 45.35[/color:4d3d5fcfa5]

Actualidades

Secciones

Herramientas

Especiales

Legislación

Herramientas

Dólar EUA

25/ABR/24

$16.9995

DOF 24/abr/24

INPC

MAR/24

134.065

Inflación +1.28%

Vista Rápida

1.47%

0.98%

8.128018

312.332

Accesos Directos

Tesis

Base de datos actualizada a:

Descargas

Comunidad

¿Qué es comunidad?

Declaración anual 2023 de Personas Físicas

Declaración anual 2023 de Personas Morales

Factura Electrónica CFDI 4.0

¿Nuevo en Fiscalia?

¿Eres miembro Fiscalia?

Contenido

Enlaces

Contáctanos

Sitios del Grupo