home *** CD-ROM | disk | FTP | other *** search
/ com!online 2002 February / comcd0202.iso / geld / akad / Steuerprogramm / data.z / TKFZLEAS.adb < prev    next >
Unknown  |  2001-11-08  |  2.4 KB
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert ObjectStore database (other/objectStoreDatabase) ext Unsupported
100% file data default
100% gt2 Kopftext: 'ADB 4.04' default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 44 42 20 34 2e 30 34 | d1 00 00 00 cc 02 00 00 |ADB 4.04|........|
|00000010| 9d 03 00 00 ef 05 00 00 | 18 00 00 00 b7 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 54 4b 46 5a 4c 65 61 | 73 00 00 00 00 00 00 00 |.TKFZLea|s.......|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 44 47 01 00 00 00 00 | 00 20 05 01 00 00 00 00 |.DG.....|. ......|
|000000e0| 00 e6 00 c5 00 00 00 45 | 00 03 00 56 57 a3 00 09 |.......E|...VW...|
|000000f0| 01 00 00 b4 00 b1 02 00 | 00 00 00 00 00 56 45 b8 |........|.....VE.|
|00000100| 02 cb 02 00 00 0d 00 00 | 00 00 00 00 00 00 00 56 |........|.......V|
|00000110| 57 97 03 a1 03 00 00 10 | 00 00 00 00 00 00 00 00 |W.......|........|
|00000120| 00 18 00 53 54 00 00 00 | 00 00 00 20 00 00 00 06 |...ST...|... ....|
|00000130| 00 09 00 63 00 0a 00 00 | 00 f6 03 53 54 00 00 00 |...c....|...ST...|
|00000140| 00 00 00 20 00 00 00 7f | 00 19 00 1c 00 0a 00 00 |... ....|........|
|00000150| 00 14 04 53 54 00 00 00 | 00 00 00 20 00 00 00 06 |...ST...|... ....|
|00000160| 00 40 00 62 00 0a 00 00 | 00 1d 04 53 54 00 00 00 |.@.b....|...ST...|
|00000170| 00 00 00 20 00 00 00 06 | 00 19 00 62 00 0a 00 00 |... ....|...b....|
|00000180| 00 37 04 53 54 00 00 00 | 00 00 00 20 00 00 00 0b |.7.ST...|... ....|
|00000190| 00 86 00 61 00 0a 00 00 | 00 54 04 53 54 00 00 00 |...a....|.T.ST...|
|000001a0| 00 00 00 20 00 00 00 06 | 00 68 00 50 00 0a 00 00 |... ....|.h.P....|
|000001b0| 00 78 04 53 54 00 00 00 | 00 00 00 20 00 00 00 06 |.x.ST...|... ....|
|000001c0| 00 30 00 63 00 0a 00 00 | 00 90 04 53 54 00 00 00 |.0.c....|...ST...|
|000001d0| 00 00 00 20 00 00 00 07 | 00 aa 00 7a 00 0a 00 00 |... ....|...z....|
|000001e0| 00 ac 04 53 54 00 00 00 | 00 00 00 20 00 00 00 06 |...ST...|... ....|
|000001f0| 00 55 00 7a 00 0a 00 00 | 00 c8 04 53 54 00 00 00 |.U.z....|...ST...|
|00000200| 00 00 00 20 00 00 00 06 | 00 96 00 63 00 0a 00 00 |... ....|...c....|
|00000210| 00 ea 04 53 54 00 00 00 | 00 00 00 20 00 00 00 0b |...ST...|... ....|
|00000220| 00 76 00 5e 00 0a 00 00 | 00 0a 05 53 4c 00 00 00 |.v.^....|...SL...|
|00000230| 00 00 00 00 00 00 00 06 | 00 a3 00 db 00 01 00 00 |........|........|
|00000240| 00 45 44 26 05 00 01 00 | 00 10 01 00 00 6c 00 07 |.ED&....|.....l..|
|00000250| 00 2b 00 0c 00 2c 05 eb | 04 01 00 56 45 30 05 47 |.+...,..|...VE0.G|
|00000260| 05 00 00 00 00 00 00 00 | 00 00 00 00 00 45 4e 7e |........|.....EN~|
|00000270| 05 00 01 00 00 50 00 00 | 00 6c 00 17 00 11 00 0c |.....P..|.l......|
|00000280| 00 84 05 ec 04 02 00 45 | 4e 88 05 20 01 00 00 50 |.......E|N.. ...P|
|00000290| 00 00 00 6c 00 2e 00 2b | 00 0c 00 8f 05 ed 04 05 |...l...+|........|
|000002a0| 20 45 4e 93 05 00 01 00 | 00 50 00 00 00 6c 00 3e | EN.....|.P...l.>|
|000002b0| 00 11 00 0c 00 9c 05 ee | 04 02 00 45 4e a0 05 21 |........|...EN..!|
|000002c0| 01 00 00 40 00 00 00 b4 | 00 53 00 2b 00 0c 00 a7 |...@....|.S.+....|
|000002d0| 05 05 20 45 4e ab 05 20 | 01 00 00 50 00 00 00 6d |.. EN.. |...P...m|
|000002e0| 00 74 00 2b 00 0c 00 b4 | 05 ef 04 05 20 45 54 b8 |.t.+....|.... ET.|
|000002f0| 05 01 21 08 00 00 00 00 | 00 7c 00 84 00 1c 00 0c |..!.....|.|......|
|00000300| 00 bf 05 45 4e c3 05 21 | 01 00 00 40 00 00 00 b4 |...EN..!|...@....|
|00000310| 00 84 00 2b 00 0c 00 d0 | 05 06 20 45 4e d4 05 20 |...+....|.. EN.. |
|00000320| 01 00 00 50 00 00 00 b4 | 00 94 00 2b 00 0c 00 dd |...P....|...+....|
|00000330| 05 f0 04 05 20 45 4e e1 | 05 21 01 00 00 40 00 00 |.... EN.|.!...@..|
|00000340| 00 b4 00 a9 00 2b 00 0c | 00 eb 05 06 20 53 46 00 |.....+..|.... SF.|
|00000350| 00 00 01 00 00 00 00 00 | 00 02 00 02 00 e2 00 26 |........|.......&|
|00000360| 00 00 00 53 46 00 00 00 | 01 00 00 00 00 00 00 02 |...SF...|........|
|00000370| 00 2a 00 e2 00 97 00 00 | 00 00 00 00 00 a0 00 95 |.*......|........|
|00000380| 00 b9 0b 00 00 02 00 0a | 00 0f 00 1a 00 20 00 06 |........|..... ..|
|00000390| 00 0d 00 0e 00 0f 00 10 | 00 12 00 15 00 00 54 4b |........|......TK|
|000003a0| 46 5a 4c 65 61 73 00 5a | 61 68 6c 00 6e 75 6d 49 |FZLeas.Z|ahl.numI|
|000003b0| 6e 54 62 6c 28 29 00 4c | 69 73 74 65 00 74 62 6c |nTbl().L|iste.tbl|
|000003c0| 47 65 74 43 6f 6e 64 4c | 69 73 74 28 5b 5e 2e 5e |GetCondL|ist([^.^|
|000003d0| 5d 2c 5b 24 31 34 32 31 | 2e 24 32 38 5d 21 3d 30 |],[$1421|.$28]!=0|
|000003e0| 29 00 22 46 61 68 72 7a | 65 75 67 6b 6f 73 74 65 |)."Fahrz|eugkoste|
|000003f0| 6e 20 66 fc 72 20 22 2b | 69 66 28 4d 6f 64 75 73 |n f.r "+|if(Modus|
|00000400| 3d 3d 33 7c 4d 6f 64 75 | 73 3d 3d 35 2c 5b 5e 2e |==3|Modu|s==5,[^.|
|00000410| 5e 2e 24 39 5d 2c 5b 5e | 2e 24 32 37 5d 29 2b 22 |^.$9],[^|.$27])+"|
|00000420| 20 3a 20 4c 65 61 73 69 | 6e 67 6b 6f 73 74 65 6e | : Leasi|ngkosten|
|00000430| 22 00 22 74 6b 66 7a 2e | 66 72 77 22 00 22 22 00 |"."tkfz.|frw"."".|
|00000440| 4d 6f 64 75 73 3d 3d 33 | 7c 4d 6f 64 75 73 3d 3d |Modus==3||Modus==|
|00000450| 35 7c 69 66 28 66 69 72 | 73 74 45 51 49 6e 64 65 |5|if(fir|stEQInde|
|00000460| 78 28 6e 65 78 74 44 6c | 67 2c 31 38 31 2c 31 38 |x(nextDl|g,181,18|
|00000470| 32 2c 31 38 33 2c 31 38 | 34 2c 31 38 38 2c 31 38 |2,183,18|4,188,18|
|00000480| 39 2c 31 39 30 29 3d 3d | 30 2c 6c 69 73 74 49 74 |9,190)==|0,listIt|
|00000490| 65 6d 43 6f 75 6e 74 28 | 4c 69 73 74 65 29 3d 3d |emCount(|Liste)==|
|000004a0| 30 2c 7e 54 29 00 22 46 | fc 72 20 66 6f 6c 67 65 |0,~T)."F|.r folge|
|000004b0| 6e 64 65 20 46 61 68 72 | 7a 65 75 67 65 20 77 75 |nde Fahr|zeuge wu|
|000004c0| 72 64 65 20 65 69 6e 20 | 4b 69 6c 6f 6d 65 74 65 |rde ein |Kilomete|
|000004d0| 72 73 61 74 7a 20 65 72 | 66 61 73 73 74 2c 20 64 |rsatz er|fasst, d|
|000004e0| 65 72 20 6e 69 65 64 72 | 69 67 65 72 20 69 73 74 |er niedr|iger ist|
|000004f0| 20 61 6c 73 20 64 69 65 | 20 67 65 73 65 74 7a 6c | als die| gesetzl|
|00000500| 69 63 68 65 20 50 61 75 | 73 63 68 61 6c 65 3a 5c |iche Pau|schale:\|
|00000510| 6e 20 5c 6e 22 2b 5b 5e | 2e 5e 2e 30 2e 24 32 31 |n \n"+[^|.^.0.$21|
|00000520| 5d 23 33 3d 28 69 6e 74 | 28 6c 69 73 74 47 65 74 |]#3=(int|(listGet|
|00000530| 49 74 65 6d 28 4c 69 73 | 74 65 2c 31 29 29 29 2b |Item(Lis|te,1)))+|
|00000540| 69 66 28 6c 69 73 74 49 | 74 65 6d 43 6f 75 6e 74 |if(listI|temCount|
|00000550| 28 4c 69 73 74 65 29 3e | 31 2c 22 5c 6e 22 2b 5b |(Liste)>|1,"\n"+[|
|00000560| 5e 2e 5e 2e 30 2e 24 32 | 31 5d 23 33 3d 28 69 6e |^.^.0.$2|1]#3=(in|
|00000570| 74 28 6c 69 73 74 47 65 | 74 49 74 65 6d 28 4c 69 |t(listGe|tItem(Li|
|00000580| 73 74 65 2c 32 29 29 29 | 2c 22 22 29 2b 69 66 28 |ste,2)))|,"")+if(|
|00000590| 6c 69 73 74 49 74 65 6d | 43 6f 75 6e 74 28 4c 69 |listItem|Count(Li|
|000005a0| 73 74 65 29 3e 32 2c 22 | 5c 6e 22 2b 5b 5e 2e 5e |ste)>2,"|\n"+[^.^|
|000005b0| 2e 30 2e 24 32 31 5d 23 | 33 3d 28 69 6e 74 28 6c |.0.$21]#|3=(int(l|
|000005c0| 69 73 74 47 65 74 49 74 | 65 6d 28 4c 69 73 74 65 |istGetIt|em(Liste|
|000005d0| 2c 33 29 29 29 2c 22 22 | 29 2b 69 66 28 6c 69 73 |,3))),""|)+if(lis|
|000005e0| 74 49 74 65 6d 43 6f 75 | 6e 74 28 4c 69 73 74 65 |tItemCou|nt(Liste|
|000005f0| 29 3e 33 2c 22 5c 6e 22 | 2b 5b 5e 2e 5e 2e 30 2e |)>3,"\n"|+[^.^.0.|
|00000600| 24 32 31 5d 23 33 3d 28 | 69 6e 74 28 6c 69 73 74 |$21]#3=(|int(list|
|00000610| 47 65 74 49 74 65 6d 28 | 4c 69 73 74 65 2c 34 29 |GetItem(|Liste,4)|
|00000620| 29 29 2c 22 22 29 2b 22 | 5c 6e 20 5c 6e 57 6f 6c |)),"")+"|\n \nWol|
|00000630| 6c 65 6e 20 53 69 65 20 | 49 68 72 65 20 41 6e 67 |len Sie |Ihre Ang|
|00000640| 61 62 65 6e 20 e4 6e 64 | 65 72 6e 3f 22 00 46 61 |aben .nd|ern?".Fa|
|00000650| 68 72 7a 31 00 5b 24 34 | 31 5d 3e 30 7c 5b 24 33 |hrz1.[$4|1]>0|[$3|
|00000660| 37 5d 3d 3d 30 2e 63 00 | 22 4e 61 63 68 20 49 68 |7]==0.c.|"Nach Ih|
|00000670| 72 65 6e 20 41 6e 67 61 | 62 65 6e 20 7a 75 20 42 |ren Anga|ben zu B|
|00000680| 65 67 69 6e 6e 20 75 6e | 64 20 44 61 75 65 72 20 |eginn un|d Dauer |
|00000690| 69 73 74 20 64 65 72 20 | 4c 65 61 73 69 6e 67 2d |ist der |Leasing-|
|000006a0| 56 65 72 74 72 61 67 20 | 62 65 72 65 69 74 73 20 |Vertrag |bereits |
|000006b0| 61 62 67 65 6c 61 75 66 | 65 6e 2e 5c 72 5c 6e 20 |abgelauf|en.\r\n |
|000006c0| 5c 72 5c 6e 42 69 74 74 | 65 20 e4 6e 64 65 72 6e |\r\nBitt|e .ndern|
|000006d0| 20 53 69 65 20 42 65 67 | 69 6e 6e 20 6f 64 65 72 | Sie Beg|inn oder|
|000006e0| 20 44 61 75 65 72 20 64 | 65 73 20 56 65 72 74 72 | Dauer d|es Vertr|
|000006f0| 61 67 65 73 20 6f 64 65 | 72 20 6c f6 73 63 68 65 |ages ode|r l.sche|
|00000700| 6e 20 53 69 65 20 64 69 | 65 20 48 f6 68 65 20 75 |n Sie di|e H.he u|
|00000710| 6e 64 20 41 6e 7a 61 68 | 6c 20 64 65 72 20 6c 61 |nd Anzah|l der la|
|00000720| 75 66 65 6e 64 65 6e 20 | 5a 61 68 6c 75 6e 67 65 |ufenden |Zahlunge|
|00000730| 6e 2e 22 00 5b 24 33 36 | 5d 3c 3d 31 32 00 22 53 |n.".[$36|]<=12."S|
|00000740| 69 65 20 68 61 62 65 6e | 20 6d 65 68 72 20 61 6c |ie haben| mehr al|
|00000750| 73 20 31 32 20 4c 65 61 | 73 69 6e 67 72 61 74 65 |s 12 Lea|singrate|
|00000760| 6e 20 65 69 6e 67 65 67 | 65 62 65 6e 2e 5c 6e 20 |n eingeg|eben.\n |
|00000770| 5c 6e 57 6f 6c 6c 65 6e | 20 53 69 65 20 49 68 72 |\nWollen| Sie Ihr|
|00000780| 65 20 41 6e 67 61 62 65 | 6e 20 e4 6e 64 65 72 6e |e Angabe|n .ndern|
|00000790| 3f 22 00 22 42 65 67 69 | 6e 6e 20 64 65 73 20 4c |?"."Begi|nn des L|
|000007a0| 65 61 73 69 6e 67 76 65 | 72 74 72 61 67 65 73 22 |easingve|rtrages"|
|000007b0| 00 22 4d 6f 6e 61 74 65 | 22 00 22 41 6e 7a 61 68 |."Monate|"."Anzah|
|000007c0| 6c 20 64 65 72 20 4c 65 | 61 73 69 6e 67 72 61 74 |l der Le|asingrat|
|000007d0| 65 6e 22 00 22 44 61 75 | 65 72 20 64 65 73 20 4c |en"."Dau|er des L|
|000007e0| 65 61 73 69 6e 67 76 65 | 72 74 72 61 67 65 73 22 |easingve|rtrages"|
|000007f0| 00 22 44 61 76 6f 6e 20 | 73 69 6e 64 20 22 2b 73 |."Davon |sind "+s|
|00000800| 56 4a 61 68 72 2b 22 20 | 61 6e 7a 75 73 65 74 7a |VJahr+" |anzusetz|
|00000810| 65 6e 20 22 00 22 47 65 | 73 6f 6e 64 65 72 74 65 |en "."Ge|sonderte|
|00000820| 20 4b 6f 73 74 65 6e 20 | 66 fc 72 22 00 22 48 f6 | Kosten |f.r"."H.|
|00000830| 68 65 20 64 65 72 20 6c | 66 64 2e 20 4c 65 61 73 |he der l|fd. Leas|
|00000840| 69 6e 67 72 61 74 65 22 | 00 22 4c 61 75 66 65 6e |ingrate"|."Laufen|
|00000850| 64 65 20 4b 6f 73 74 65 | 6e 20 69 6e 73 67 65 73 |de Koste|n insges|
|00000860| 61 6d 74 22 00 22 4c 61 | 75 66 65 6e 64 65 20 4c |amt"."La|ufende L|
|00000870| 65 61 73 69 6e 67 72 61 | 74 65 6e 20 69 6e 73 67 |easingra|ten insg|
|00000880| 65 73 61 6d 74 22 00 22 | 4c 65 61 73 69 6e 67 2d |esamt"."|Leasing-|
|00000890| 53 6f 6e 64 65 72 7a 61 | 68 6c 75 6e 67 20 22 2b |Sonderza|hlung "+|
|000008a0| 73 56 4a 61 68 72 00 22 | dc 62 65 72 66 fc 68 72 |sVJahr."|.berf.hr|
|000008b0| 75 6e 67 20 75 6e 64 20 | 5a 75 6c 61 73 73 75 6e |ung und |Zulassun|
|000008c0| 67 22 00 42 65 67 69 6e | 00 24 33 33 00 73 65 6c |g".Begin|.$33.sel|
|000008d0| 66 3c 64 61 74 65 28 31 | 2c 31 2c 56 4a 61 68 72 |f<date(1|,1,VJahr|
|000008e0| 2b 31 29 00 22 44 61 73 | 20 44 61 74 75 6d 20 64 |+1)."Das| Datum d|
|000008f0| 61 72 66 20 73 70 e4 74 | 65 73 74 65 6e 73 20 64 |arf sp.t|estens d|
|00000900| 65 72 20 33 31 2e 31 32 | 2e 22 2b 73 56 4a 61 68 |er 31.12|."+sVJah|
|00000910| 72 2b 22 20 73 65 69 6e | 2e 22 00 44 61 75 65 72 |r+" sein|.".Dauer|
|00000920| 00 24 33 34 00 52 61 74 | 65 64 6d 00 24 33 35 00 |.$34.Rat|edm.$35.|
|00000930| 41 6e 7a 72 61 74 65 6e | 00 24 33 36 00 4c 66 64 |Anzraten|.$36.Lfd|
|00000940| 6b 73 74 00 24 33 37 00 | 53 6f 6e 73 74 6b 73 74 |kst.$37.|Sonstkst|
|00000950| 00 24 33 38 00 5a 75 6c | 61 6e 74 00 24 34 32 00 |.$38.Zul|ant.$42.|
|00000960| 44 73 70 5f 73 6f 6e 73 | 74 6b 73 74 00 24 34 33 |Dsp_sons|tkst.$43|
|00000970| 00 53 6f 6e 64 65 72 64 | 6d 00 24 33 39 00 44 73 |.Sonderd|m.$39.Ds|
|00000980| 70 67 65 73 61 6d 74 00 | 24 34 30 00             |pgesamt.|$40.    |
+--------+-------------------------+-------------------------+--------+--------+