cT915	;BTW-AANGIFTE ;%T91 ;%T91* ; [ 02/02/93  2:57 PM ]
	;
T0	;BTW-aangifte ;
T1	;Kader V. - Inkomende handelingen van de aangever;
T2	;A. Bedrag van de handelingen, rekening houdend met;   creditnota's.;
T3	;  81. Goederen, grond- en hulpstoffen;
T4	;  82. Diensten, diverse goederen e.a.;
T5	;  83. Bedrijfsmiddelen;
T6	;B. Bedrag van de creditnota's, met betrekking tot;   letter A, hiervoor;
T7	;  84. Intracommunautaire verwerving;
T8	;  85. Overige handelingen;
T9	;C. Sommige handelingen met betrekking tot;   letter A, hiervoor;
T10	;  86. Intracommunautaire verwerving;
T11	;  87. Onroerende heffing;
T12	;  88. Verlegging van BTW + Medecontractant;
	;
T0F	;Déclaration de la TVA ;
T1F	;Cadre V. - Opérations à l'entrée;
T2F	;A. Montants des opérations à l'entrée, compte tenu des;   notes de crédit.;
T3F	;  81. Marchandises, matières premières et matières aux.;
T4F	;  82. Services, biens divers et autres;
T5F	;  83. Biens d'investissement;
T6F	;B. Montant des notes de crédit, relatives à la;   lettre A, ci-avant;
T7F	;  84. Acquisitions intracommunautaires;
T8F	;  85. Autres opérations;
T9F	;C. Données relatives à certaines opérations visées à;   la lettre A, ci-avant;
T10F	;  86. Acquisitions intracommunautaires;
T11F	;  87. TVA immobilière;
T12F	;  88. Report de perception + Cocontractant;
	;
T0E	;BTW-aangifte ;
T1E	;Kader V. - Inkomende handelingen van de aangever;
T2E	;A. Bedrag van de handelingen, rekening houdend met;   creditnota's.;
T3E	;  81. Goederen, grond- en hulpstoffen;
T4E	;  82. Diensten, diverse goederen e.a.;
T5E	;  83. Bedrijfsmiddelen;
T6E	;B. Bedrag van de creditnota's, met betrekking tot;   letter A, hiervoor;
T7E	;  84. Intracommunautaire verwerving;
T8E	;  85. Overige handelingen;
T9E	;C. Sommige handelingen met betrekking tot;   letter A, hiervoor;
T10E	;  86. Intracommunautaire verwerving;
T11E	;  87. Onroerende heffing;
T12E	;  88. Verlegging van BTW + Medecontractant;
	;
1	S TXT(1)=$P($T(@("T1"_QT)),U,2) D S1
11	S TXT(1)=D D S1 F I=2,3 S TXT(1)=$P($T(@("T2"_QT)),U,I) D S1
13	S TXT(1)=D D S1 S TXT(1)=$P($T(@("T3"_QT)),U,2),TXT(2)=$P(X("V","A",81),S)_"\\\\1\"_QD,TXT(3)=" 81" D S2
15	S TXT(1)=D D S1 S TXT(1)=$P($T(@("T4"_QT)),U,2),TXT(2)=$P(X("V","A",82),S)_"\\\\1\"_QD,TXT(3)=" 82" D S2
17	S TXT(1)=D D S1 S TXT(1)=$P($T(@("T5"_QT)),U,2),TXT(2)=$P(X("V","A",83),S)_"\\\\1\"_QD,TXT(3)=" 83" D S2
	;
2	S TXT(1)=D D S1 F I=2,3 S TXT(1)=$P($T(@("T6"_QT)),U,I) D S1
21	S TXT(1)=D D S1 S TXT(1)=$P($T(@("T7"_QT)),U,2),TXT(2)=$P(X("V","B",84),S)_"\\\\1\"_QD,TXT(3)=" 84" D S2
23	S TXT(1)=D D S1 S TXT(1)=$P($T(@("T8"_QT)),U,2),TXT(2)=$P(X("V","B",85),S)_"\\\\1\"_QD,TXT(3)=" 85" D S2
	;
3	S TXT(1)=D D S1 F I=2,3 S TXT(1)=$P($T(@("T9"_QT)),U,I) D S1
31	S TXT(1)=D D S1 S TXT(1)=$P($T(@("T10"_QT)),U,2),TXT(2)=$P(X("V","C",86),S)_"\\\\1\"_QD,TXT(3)=" 86" D S2
33	S TXT(1)=D D S1 S TXT(1)=$P($T(@("T11"_QT)),U,2),TXT(2)=$P(X("V","C",87),S)_"\\\\1\"_QD,TXT(3)=" 87" D S2
35	S TXT(1)=D D S1 S TXT(1)=$P($T(@("T12"_QT)),U,2),TXT(2)=$P(X("V","C",88),S)_"\\\\1\"_QD,TXT(3)=" 88" D S2
	;
6	S TXT(1)=D D S1 S END=4 D ^cA334
	;
YZ	G ^cT916
	;
S1	S TAB=79 D ^cA334 Q
S2	S TAB="59\74\79" D ^cA334 Q
	;
Z	X ^cZ Q
ZZ	; 08.02.08 - 15 u 00 * V9.00