: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!

: ASTERI KIRJANPITO - TILITOIMISTOVALIKKO KOVALEVYLLE
: ASTERI VALIKON (MENU.EXE) GENEROIMA VALIKKO
@ECHO OFF 
REM POISTA ALLAOLEVA REM JA MUUTA C: VASTAAMAAN KOVALEVYN KIRJAINTA
REM C: 
cls
if %1x==x GOTO :KpMenu
IF EXIST \ASTERIKP\%1\ASTERIPK.OMA GOTO :Kpitoon
IF %2x==ASTERIx GOTO :perusta
ECHO HAKEMISTO:
CD
Echo ASIAKASTA %1 EI LIENE PERUSTETTU !
Echo Paina ENTER niin perustan Asiakkaalle %1 kirjanpidon
Echo Paina [CTLR] [BREAK] niin en perusta asiakkaalle kirjanpitoa
Pause >NUL
:perusta
CLS
ECHO Perustan asiakkaalle %1 kirjanpitoa ...
CD \ASTERIKP
MD %1
CD %1
COPY \ASTERIKP\*.BAT /V
Echo *0 >ASTERIPK.OMA
ECHO ECHO OFF          >MENU.BAT
ECHO CLS              >>MENU.BAT
ECHO TYPE ..\MENU.TXT >>MENU.BAT
Kp %1
:KpMenu
CD \ASTERIKP
Type KpOhje.txt
DIR *.|sort|find "<DIR>"|more
DIR *.|sort|find "<HAK"|more
GOTO :loppu
:Kpitoon
CD \ASTERIKP\%1
:KP AFHELMI A  A ohjelman k„ynnistys
IF %2x==x GOTO :menu
IF NOT EXIST %2.BAT GOTO :menu
%2
GOTO :loppu
:menu
Type ..\menu.txt
:Loppu





Kukkuu!