cT42 ;UITKUISEN BOEKHOUDING ;%T42 ;go naar %T420 ; [ 01/24/96 4:44 PM ] G 1 ; T0 ;Verwijderen boekhouding ; T1 ;De boekhouding kan niet verwijderd worden ; T2 ;Er zijn reeds afgesloten boekjaren aanwezig ; T3 ;Beschikbare boekjaren :; T4 ;Dit programma verwijdert alles i.v.m. :; T5 ;- Aankoop : dagboek, ventilaties; T6 ;- Leveranciers : opstartgegevens, openstaande facturen, historieken; T7 ;- Verkoop : dagboek, ventilaties; T8 ;- Klanten : opstartgegevens, openstaande facturen, historieken,;betalingsgedrag, BTW-listing; T9 ;- Financieel : dagboek, financieel overzicht; T10 ;- Grootboekrek.: beginbalans, centralisatie, fiche, BTW-aangifte; T11 ;- Analyt. rek. : centralisatie, historieken; T12 ;- Winkelverk. : alle gegevens van alle dagen; T13 ;- Facturatie : alle facturen, al dan niet klaar voor afdruk; T14 ;Even geduld ... controle ;winkelverkopen;uitleveringen; T15 ;Eerst het kasverslag van ; boekhoudkundig verwerken ; T16 ;Voorschot geregistreerd (rubr. 'betaald') op ; T17 ;Verwijderen boekhouding\".[] = ok -[] = einde programma"; T18 ;Bevestiging\".[] = ok ,[] = hernemen"; ; T0F ;Radiation comptabilité ; T1F ;La comptabilité ne peut pas être radiée ; T2F ;Il y a déjà des années clôturées ; T3F ;Années comptables disponibles :; T4F ;Ce programme annule tout concernant :; T5F ;- Achat : journal, ventilations; T6F ;- Fournisseurs : solde initiaux, factures impayées, fiche; T7F ;- Vente : journal, ventilations; T8F ;- Clients : soldes initiaux, factures impayées, historiques,;statistique de paiement, listing annuel de TVA; T9F ;- Financier : journal, aperçu financier; T10F ;- Grand-livre : bilan initial, centralisation, historiques, déclarations de TVA; T11F ;- Cmpt. analyt.: centralisation, historiques; T12F ;- Vente caisse : toutes les données de tous les jours; T13F ;- Facturation : toutes les factures, imprimées oui ou non; T14F ;Un instant ... contrôle des ;ventes de caisse;livraisons; T15F ;Veuillez d'abord comptabiliser le journal de caisse du ; ; T16F ;Acompte enregistré (rubr. 'payé') le ; T17F ;Radiation comptabilité\".[] = ok -[] = fin du programme"; T18F ;Confirmation\".[] = ok ,[] = reprendre"; ; T0E ;Verwijderen boekhouding ; T1E ;De boekhouding kan niet verwijderd worden ; T2E ;Er zijn reeds afgesloten boekjaren aanwezig ; T3E ;Beschikbare boekjaren :; T4E ;Dit programma verwijdert alles i.v.m. :; T5E ;- Aankoop : dagboek, ventilaties; T6E ;- Leveranciers : opstartgegevens, openstaande facturen, historieken; T7E ;- Verkoop : dagboek, ventilaties; T8E ;- Klanten : opstartgegevens, openstaande facturen, historieken,;betalingsgedrag, BTW-listing; T9E ;- Financieel : dagboek, financieel overzicht; T10E ;- Grootboekrek.: beginbalans, centralisatie, fiche, BTW-aangifte; T11E ;- Analyt. rek. : centralisatie, historieken; T12E ;- Winkelverk. : alle gegevens van alle dagen; T13E ;- Facturatie : alle facturen, al dan niet klaar voor afdruk; T14E ;Even geduld ... controle ;winkelverkopen;uitleveringen; T15E ;Eerst het kasverslag van ; boekhoudkundig verwerken ; T16E ;Voorschot geregistreerd (rubr. 'betaald') op ; T17E ;Verwijderen boekhouding\".[] = ok -[] = einde programma"; T18E ;Bevestiging\".[] = ok ,[] = hernemen"; ; S1 S S1=$P(J,D,3)+.01 S:S1#1>.12 S1=S1+.88 S1A W !,$J($P(J,D,2)\1,6)," : ",$J(S1,7,2)," - ",$J($P(J,D,2),7,2) S1Z K S1 Q ; S2 S S1=$T(@("T"_I_QT)) W !?2,$P(S1,U,2) I $L($P(S1,U,3)) W !?$F(S1,":")-2,$P(S1,U,3) S2Z K S1 Q ; 1 S K=$P($T(@("T0"_QT)),U,2)_QN_" ",FP=203+$L(K) W @F61,@F11,@F1,@F,@F5 S FP=202 W @F,@F4,K,@F5 11 S R=DT_D_1 D D^cT163 S BPB=@("^"_Q_"BA(2)"),BPA=^(7),AT=$D(^(26)) S:'AT ^(26)=0 S AT=^(26) 13 S FP=403 W @F,@F1,$P($T(@("T3"_QT)),U,2),! 15 F I=AT:-1:0 S J=$P(BPB,D,I*3+1,I+1*3) D S1 17 I $P(BPB,D,2)\1