cT916 ;BTW-AANGIFTE ;%T91 ;%T91* ; [ 12/18/92 1:33 PM ] ; T0 ;BTW-aangifte ; T1 ;Kader VI. - Eindafrekening; T2 ;Aan de staat;door de staat;te betalen;verschuldigd; T3 ;A. Saldo van de aangifteperiode; (transport van kader IV, letter E); T4 ; 71. Aan de staat verschuldigd; T5 ; 72. Door de staat verschuldigd; T6 ;Kader VII. - Intracommunautaire opgave; T7 ;A. Intracommunautaire opgave.; T8 ; a) Enkel bij maand- en kwartaalaangifte; T9 ; Ik verklaar in het verstreken kalenderkwartaal GEEN handelingen en/of; T10 ; verbeteringen te hebben verricht waarvoor ik een intracommunautaire; T11 ; opgave moet indienen.; T12 ; Ik verklaar in het verstreken kalenderkwartaal handelingen en/of; T13 ; verbeteringen te hebben verricht waarvoor ik een intracommunautaire; T14 ; opgave moet indienen.; T15 ; b) Enkel bij jaaraangifte; T16 ; Ik verklaar in het verstreken kalenderjaar GEEN handelingen en/of; T17 ; verbeteringen te hebben verricht waarvoor ik een intracommunautaire; T18 ; opgave heb ingediend of moet indienen.; T19 ; Ik verklaar in het ; kwartaal handelingen en/of; T20 ; verbeteringen te hebben verricht waarvoor ik een intracommunautaire; T21 ; opgave heb ingediend of moet indienen.; ; T0F ;Déclaration de la TVA ; T1F ;Cadre VI. - Décompte final; T2F ;A payer;due;à l'état;par l'état; T3F ;A. Solde de la période de déclaration; (report du cadre IV, lettre E); T4F ; 71. Taxes dues à l'Etat; T5F ; 72. Sommes dues par l'Etat; T6F ;Cadre VII. - Listing intracommunautaire; T7F ;A. Listing intracommunautaire.; T8F ; a) Concerne uniquement les déposants mensuels et trimestriels; T9F ; Je déclare ne pas avoir effectué, au cours du trim. écoulé, des opér.; T10F ; et/ou des corrections pour lesquelles je dois déposer un listing; T11F ; intracommunautaire.; T12F ; Je déclare avoir effectué, au cours du trimestre écoulé, des opérations; T13F ; et/ou des corrections pour lesquelles je dois déposer un listing; T14F ; intracommunautaire.; T15F ; b) Concerne uniquement les déposants annuels; T16F ; Je déclare ne pas avoir effectué, au cours de l'année écoulée, des; T17F ; opérations et/ou des corrections pour lesquelles je devais ou je dois; T18F ; déposer un listing intracommunautaire.; T19F ; Je déclare avoir effectué, au cours du ;' trim. de l'année ; T20F ; écoulée, des op. et/ou des corr. pour lesquelles je devais ou je; T21F ; dois déposer un listing intracommunautaire trimestriel.; ; T0E ;BTW-aangifte ; T1E ;Kader VI. - Eindafrekening; T2E ;Aan de staat;door de staat;te betalen;verschuldigd; T3E ;A. Saldo van de aangifteperiode; (transport van kader IV, letter E); T4E ; 71. Aan de staat verschuldigd; T5E ; 72. Door de staat verschuldigd; T6E ;Kader VII. - Intracommunautaire opgave; T7E ;A. Intracommunautaire opgave.; T8E ; a) Enkel bij maand- en kwartaalaangifte; T9E ; Ik verklaar in het verstreken kalenderkwartaal GEEN handelingen en/of; T10E ; verbeteringen te hebben verricht waarvoor ik een intracommunautaire; T11E ; opgave moet indienen.; T12E ; Ik verklaar in het verstreken kalenderkwartaal handelingen en/of; T13E ; verbeteringen te hebben verricht waarvoor ik een intracommunautaire; T14E ; opgave moet indienen.; T15E ; b) Enkel bij jaaraangifte; T16E ; Ik verklaar in het verstreken kalenderjaar GEEN handelingen en/of; T17E ; verbeteringen te hebben verricht waarvoor ik een intracommunautaire; T18E ; opgave heb ingediend of moet indienen.; T19E ; Ik verklaar in het ; kwartaal handelingen en/of; T20E ; verbeteringen te hebben verricht waarvoor ik een intracommunautaire; T21E ; opgave heb ingediend of moet indienen.; ; 1 S TXT(1)=$P($T(@("T1"_QT)),U,2) D S1 11 S TXT(1)=D D S1 F I=2,4 S TXT(2)=$P($T(@("T2"_QT)),U,I)_D_2,TXT(3)=$P($T(@("T2"_QT)),U,I+1)_D_2 D S2 13 S TXT(1)=D,TXT(2)=D,TXT(3)=D D S2 F I=2,3 S TXT(1)=$P($T(@("T3"_QT)),U,I),TXT(2)=D,TXT(3)=D D S2 15 S TXT(1)=D,TXT(2)=D,TXT(3)=D D S2 S TXT(1)=$P($T(@("T4"_QT)),U,2),TXT(2)=$P(X("VI","A",71),S)_"\\\\1\"_QD,TXT(3)=D D S2 17 S TXT(1)=D,TXT(2)=D,TXT(3)=D D S2 S TXT(1)=$P($T(@("T5"_QT)),U,2),TXT(2)=" ---------------->",TXT(3)=$P(X("VI","A",72),S,2)_"\\\\1\"_QD D S2 19 I 'PTS F I=1:1:10 S TXT(1)=D,TXT(2)=D,TXT(3)=D D S2 ; 2 S END=2 D ^cA334:'PTS S END=$S(PTS:4,1:8) D ^cA334 21 S TXT(1)=$P($T(@("T6"_QT)),U,2) D S1 23 S TXT(1)=D D S1 S TXT(1)=$P($T(@("T7"_QT)),U,2) D S1 ; 3 S TXT(1)=D D S1 F I=2,3 S TXT(1)=$P($T(@("T8"_QT)),U,I) D S1 30 S TXT(1)=$P($T(@("T9"_QT)),U,2),TXT(2)="---" D S3 31 S TXT(1)=$P($T(@("T10"_QT)),U,2),TXT(2)=$S(BP2-BP1=.11!SWI:D,1:" X") D S3 33 S TXT(1)=$P($T(@("T11"_QT)),U,2),TXT(2)="---" D S3 S TXT(1)=D D S1 35 S TXT(1)=$P($T(@("T12"_QT)),U,2),TXT(2)="---" D S3 37 S TXT(1)=$P($T(@("T13"_QT)),U,2),TXT(2)=$S(BP2-BP1=.11!'SWI:D,1:" X") D S3 39 S TXT(1)=$P($T(@("T14"_QT)),U,2),TXT(2)="---" D S3 I PTS S END=4 D S1 ; 4 S TXT(1)=D D S1 F I=2,3 S TXT(1)=$P($T(@("T15"_QT)),U,I) D S1 40 S TXT(1)=$P($T(@("T16"_QT)),U,2),TXT(2)="---" D S3 41 S TXT(1)=$P($T(@("T17"_QT)),U,2),TXT(2)=$S(BP2-BP1=.11&'SWI:" X",1:D) D S3 43 S TXT(1)=$P($T(@("T18"_QT)),U,2),TXT(2)="---" D S3 S TXT(1)=D D S1 45 S K="" I BP2-BP1=.11,SWI F I=1:1:4 I SWI(I) S:$L(K) K=K_" " S K=K_I_"'" ; 5 S TXT(1)=$P($T(@("T19"_QT)),U,2)_$S(BP2-BP1'=.11!'SWI:" ",1:K)_$P($T(@("T19"_QT)),U,3),TXT(2)="---" D S3 51 S TXT(1)=$P($T(@("T20"_QT)),U,2),TXT(2)=$S(BP2-BP1=.11&SWI:" X",1:D) D S3 53 S TXT(1)=$P($T(@("T21"_QT)),U,2),TXT(2)="---" D S3 ; 6 F I=1:1:3 S TXT(1)=D D S1 61 S END=1 D ^cA334 ; YZ Q ; S1 S TAB=79 D ^cA334 Q S2 S TAB="39\59\79" D ^cA334 Q S3 S TAB="75\79" D ^cA334 Q ; Z X ^cZ Q ZZ ; 08.02.08 - 15 u 00 * V9.00