?{"Nombre del archivo INI","IVASIM.INI"}
?{"Descripción Completa del Archivo Magnético","Archivo utilizado en el procesamiento del IVA SIMPLE"}
?{"Comentarios","Disponible para el país de Argentina"}
?{"¡¡IMPORTANTE!!","Actualmente solo se cuenta con las funciones de la parte de ventas, posteriormente sera liberada la siguiente parte"}
[XXX Inicializacao]
(PRE) _aTotal[01] := MV_PAR01
(PRE) _aTotal[02] := MV_PAR02
(PRE) _aTotal[03] := {}
(PRE) _aTotal[04] := {}
(PRE) _aTotal[05] := .F.
(PRE) _aTotal[06] := {}
[XXX Montagem do CFP Utilizado pela rotina - PRINCIPAL]
(PRE) aAdd(_aTotal[03],"IVA SIMPLE")
(PRE) aAdd(_aTotal[03],"")
(PRE) aAdd(_aTotal[03],"Llene correctamente las informaciones requeridas.")
(PRE) aAdd(_aTotal[03],"Complete con la información necesaria para la generación de los archivos")
[XXX Painel 1 - Configuraciones generales]
(PRE) aAdd(_aTotal[04],{})
(PRE) aAdd(_aTotal[04][1],"IVA SIMPLE")
(PRE) aAdd(_aTotal[04][1],"Configuraciones generales:")
(PRE) aAdd(_aTotal[04][1],{})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{1, "Tipo del archivo a generar: ",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{3,,,,,{"1 - Crédito Fiscal","2 - Restitución Crédito Fiscal","3 - Débito Fiscal", "4 - Restitución Débito Fiscal", "5 - Todos"},,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{1,"Genera informe resumido de los valores",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{3,,,,,{"1 - Si","2 - No"},,}) 03],"IVA SIMPLE")
(PRE) aAdd(_aTotal[04][1][303],{1,"exportados:",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,}03],"Llene correctamente las informaciones requeridas.")
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,03],"Complete con la información necesaria para la generación de los archivos")
[XXX Painel 1 - Configuraciones generales]
(PRE) aAdd(_aTotal[04],{})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,}IVA SIMPLE")
(PRE) aAdd(_aTotal[04][1][3],{1, "Tabla de equivalencia - Tipo de Sujeto",,,,,,},"Configuraciones generales:")
(PRE) aAdd(_aTotal[04][1][3],{2,,"XXXX",1,,,,7})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{1, "TablaTipo del dearchivo equivalenciaa -generar: Alicuotas",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{23,,"XXXX",1,,,,7})
(PRE) {"1 - Crédito Fiscal","2 - Restitución Crédito Fiscal","3 - Débito Fiscal", "4 - Restitución Débito Fiscal", "5 - Todos"},,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{1, "TablaGenera deinforme equivalenciaresumido -de Conceptoslos para lasvalores",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{23,,"XXXX",1,,,,7}){"1 - Si","2 - No"},,})
(PRE) aAdd(_aTotal[04][1][3],{1, "operaciones que generan crédito fiscal o "exportados:",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{10, "restitución de crédito fiscal",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{01, "Tabla de equivalencia - Tipo de Sujeto",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{02,,"XXXX",1,,,,,7})
(PRE) aAdd(_aTotal[04][1][3],{10, "Tabla de equivalencia - Conceptos para las ",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{20,,"XXXX",1,,,,,7})
(PRE) aAdd(_aTotal[04][1][3],{1, "operacionesTabla quede generanequivalencia débito- fiscal Alicuotas",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{02,,"XXXX",1,,,,,7})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{1, "Tabla de equivalencia - Conceptos para las",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{2,,"XXXX",1,,,,7})
(PRE) aAdd(_aTotal[04][1][3],{1, "las operaciones que generan restitucióncrédito de fiscal",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{0,"",,,,,,})
(PRE) aAdd(_aTotal[04][1][3],{1, "débitoo restitución de crédito fiscal ",,,,,,})
[XXX Registro IVASIM - IVA SIMPLE]
(PRE) aAdd(_aTotal[05] := xMagWizard(_aTotal[03],_aTotal[04],"IVA SIMPLE")
04][1][3],{0,"",,,,,,})
(PRE) IifaAdd(_aTotal[05],xMagLeWiz("IVA SIMPLE",@_aTotal[06],.T.),Nil[04][1][3],{0,"",,,,,,})
(PRE) lAbtMT950 := !aAdd(_aTotal[0504]
[XXX Generaccion del archivo IVA SIMPLE]
(PRE) _aTotal[07]:=IVASIM()
[IS3OPGDEB Imprime os dados]
(DEL);MF[1][3],{0,"",,,,,,})
(PRE) IS3OPGDEB->(dbGoTop())
SEQ01 C 006 0 IS3OPGDEB->ACTDEC
SEQ02 C 001 0 IS3OPGDEB->TPVENT
SEQ03 C 001 0 IS3OPGDEB->TIPO
SEQ04 C 012 0 IS3OPGDEB->ALICUOTA
SEQ05 C 015 2 AllTrim(Transform(IS3OPGDEB->MONGRA,"@E 9999999999999.99"))
SEQ06 C 015 2 AllTrim(Transform(IS3OPGDEB->DEBFIS,"@E 9999999999999.99"))
SEQ07 C 015 2 AllTrim(Transform(IS3OPGDEB->DEFIOP,"@E 9999999999999.99"))
SEQ08 C 015 2 AllTrim(Transform(IS3OPGDEB->MONEX,"@E 9999999999999.99"))
(POS)
[IS4OPGRDE Imprime os dados]
(DEL);MF
(PRE) IS4OPGRDE->(dbGoTop())
SEQ01 C 006 0 IS4OPGRDE->ACTDEC
SEQ02 C 001 0 IS4OPGRDE->TPVENT
SEQ03 C 001 0 IS4OPGRDE->TIPO
SEQ04 C 012 0 IS4OPGRDE->ALICUOTA
SEQ05 C 015 2 AllTrim(Transform(IS4OPGRDE->MONGRA,"@E 9999999999999.99"))
SEQ06 C 015 2 AllTrim(Transform(IS4OPGRDE->DEBFIS,"@E 9999999999999.99"))
SEQ08 C 015 2 AllTrim(Transform(IS4OPGRDE->MONEX,"@E 9999999999999.99"))
[XXX arquivos temporarios]
(PRE) FE845ETTE(_aTotal[07]) |