Luận văn tốt nghiệp Trờng Đại học Thơng mại
ứng dụng máy vi tính trong kế toán nghiệp vụ thanh
toán với ngời cung cấp và khách hàng tại công ty
dịch vụ du lịch và thơng mại i-tst
I.Tình hình sử dụng máy vi tính và hớng ứng dụng máy vi tính vào kế toán
nghiệp vụ thanh toán với ngời cung cấp và khách hàng tại công ty TST.
1.Máy vi tính và ứng dụng của nó trong kế toán.
!" !#$ #%&
' (# )#*+,-.# /01 &2&3&0-%/
(1 +45- 0-62.07&0 !
78"#&9#:#-! !;-2#.#$ <
=6- !2 01 +-2#7>;
'+0 !# ?#%-!-9 3-'1
':"@-<=-'3ABC'->D-.#E
-!FG ($ >->D &(
-6#H2%-7;=IJ
# DK+&*&L#J" -9J
*M-!% " &*(-!-2
** &*N<E#&2>#)#07 #O
#E$ <<*/-!% !P%4
8< * 0+QRQST0+)#0
KU&'"VS- -#&S#>95 Q'6(
F$ >W$ X-!";-2&03 &$ $
G (
&'$ Y #O #E*8 >
0&-<<5- Z$ 2;# #O
&#;+E "+E 8 >[J-\H-6-/
'2-6$ (7"$ 2 ]7Z5 5
J#$ $ +]W#*X- ^)#0K
'&>-6! $ 4 >Z&'"95$ " ^
*J# >9)#'-]
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
_` 8< &'
R>% $ )#0K+ O1 >% H%(##
7#.#$ -'5- &88
> -2>% $ &')#* 7"'(abcd
6 $ 1#)#0K8 >"2 1\-5
#O $ )#0K-'70+J8 >e4
+E
Q'#% (6 (e""+(
-\H8f-'>##7&'7H&$
&]! ># 7$ )#0K7 -#&>]!
#$#$+'-$ >[J*$ &'E#.#7
+-%(=8 >(#-&03 #1
("%-DK"!: Z--6J
Zg2Z&'"95"e 6-# 7-.-&]!
IE#.'<<$ )#0K"-#+7
4!-h!*&'i>% &&;
&''-'&'e 6J+5'%->
G /
Q'$ <)#0K8-222-/-# $
)#0K-20DK&%6 ($ #1U! *O:
4 ;V )#ZDK2# -: 0FG (%.
#E8< >)#0]:i81>#jk"l"m(
$ <- DK$ -6 ^-, !
M
jk.EDK0 81>#)#0K&'"-6
9J>h&("-6D8< i.#':)#"
8 >! *F22jk$ <758G -
)#0]:i81>#"-3 G6(#.#'i>
hjk[nPoU[nP odR>)#0]:i81
>#V!-22Z&'",'E>Y ;
>-22+0 +#E#.#jk8G >-: 08W
5"8WD1>Fo[pjk>i'-':
Z": Z'+N jk7 27#^F
$ <qXh[rq"Pmhs-#2gI.!&+-: 0
2
Luận văn tốt nghiệp Trờng Đại học Thơng mại
(1 #'&Ejk-6D8< &'i>
h#(E' (
2.Tình hình sử dụng máy vi tính tại công ty TST.
hJ4-6.)#* $ >$ )#0K&
8"-5$ -()#9-.##, '+]-5
!t6 ^-ue $ kF$ >[#]$
- 5 e F$ "&'%X"$ -
E4#'J5 $ (:i&L#JJ$
-D8< %>&&$ ;+E "$ 2
2-6$ ;]! (E' (-6 D+N md;>
% 3\ -58>e F$ i( #E>
8< *-DK)#0K$ +8 >\75
'"(IJ# )#0K#181>#-: 09"
:
k\ Q'$ -6 +]D8< +0 m
$ &' - \7I>i%$ >
&'')#0K0%-]": " O&F$ >
&'&Y -6DKE+0 m ;"95"
+0 +##E$ >\ 7$
3.Hớng ứng dụng máy vi tính vào kế toán nghiệp vụ thanh toán với ngời
cung cấp
p8 >: 55- #+ 8W!
#E&%6 ("Z4-85 "D8< #5
8-2$ &' ><( !# 7
& ! /#&2&30 #"i#e
'" G /P/&#$O5#
-\H !)#0K0&! #E-2$ "&]!
>)#'-])#0Kvp>#2# i-2&$ wF2
+]#&$ wT^ !)#0K+'Z\6+E#"\0
#+E#
R( 8< voD8< .jk$ &' ><
(& !# 7;81>#J
#= -6+0 +#E#.#E#.#)#0K
-6+0 +#<<>)#'-]&8x
Luận văn tốt nghiệp Trờng Đại học Thơng mại
II.Đặt và phân tích bài toán kế toán nghiệp vụ thanh toán với ngời cung cấp
và khách hàng tại công ty TST.
1.Đặt bài toán.
Q' ><( !# 7& E
-6'( 'F$ >-6'Ee
'&0yyy
;4 ; %/+0 e 64 ; %&''J
81>#IE#v
do%>#4 ;
dh
dP-:]2)#>
dh8# ><
dp5Ut%( ><+N 5>V
dz )#-e 5>>h
dTh6/F2&y/yy #E>-)#-eh[U-%
( ><+N 5>V/h[U'#+N
h[V
dTh6/F2-%&0-%4 UFI htV
{E#.##= 0-6Sổ theo dõi chi tiết thanh
toán; -:] !# 7"& f#"; 5
f#+SSổ chi tiết tài khoản f#_ bảng tổng
hợp thanh toán bảng ngoại tệ f#_+. E#
.#)#0K2Sổ theo dõi chi tiết thanh toán f#
+ ><;-.# -'!-"e&'6
(4 ; %-:i-]%60#"00(
# 7& &'06/#6
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
Pf#
cong ty dich vu du lich va thuong mai
so theo doi chi tiet thanh toan
&v
[# v
h
pvh[
No dau ky : ………… co dau ky :
phat sinh No : Phat sinh co :
no cuoi ky : co cuoi ky :
SCT ngay thang noi dung P sinh no----- co-- co-- psinh co-- no- no-
cong + + + + + + + +
NGAY---/---/----
NGUOI LAP BIEU KE TOAN TRUONG
Pf#+
cong ty dich vu du lich va thuong mai
so theo doi chi tiet thanh toan
&v
[# v
h
pv
No dau ky: (quy ra Vnd: ) co dau ky (Quy ra vnd)
phat sinhno (quy ra vnd ) Phat sinhco (quy ra vnd)
no cuoi ky (quy ra vnd ) co cuoi ky (quy ra vnd)
sct ngay
than
g
noi
dung
ty
gia
psno--
nte
psno--
vnd
co- -- psco—nte psco--
vnd
No
-
-
cong + + + + + + +
NGAy---/---/----
NGUOI LAP BIEU KE TOAN TRUONG
Pf#_
cong ty dich vu du lich va thuong mai
so chi tiet tai khoan
mdv ten don
vi
No
dau ky
co
dau ky
phat
sinh no
phat
sinh Cã
Tk
No
cuoi ky
Co
cuoi ky
cong + + + + + +
ngay--/---/---
Luận văn tốt nghiệp Trờng Đại học Thơng mại
nguoi lap bieu ke toan truong
Pf#_+
cong ty dich vu du lich va thuong mai
bang tong hop thanh toan bang ngoai te tai khoan
mdv ten don vi ltien No
dau ky
co
dau ky
phat sinh
no
phat sinh
co
No
cuoi
ky
Co
cuoi
ky
ngay--/---/---
nguoi lap bieu ke toan truong
2.Phân tích bài toán.
E#.#+--6+0 f#E.0-]
-68# ; IE#+0 "IE#2;-9#"20)#
DK&$ wF8# +0 + O5-2
81>#0)#DK81>#&$ )#DKt2-d
68# +0 .-])#Z&*"-]Z
#9#%>#;&81>#-'&-6+0 "-#
-\H02>% e: Z->$ >
DKE81>#-2
[&'7#&0yyy % #E'&'E
=&0>% eE "&'f#>% eE
&0 % #-6DK"+N >% : Z
#
t 0)#'E#.#+-/.0'&'>% e&'
E"--: 0>DKi-9E=
&098 >% eE "8| ><
E)#( 5> ><+N h[F<.
2e#v
doe4 ; %UVCTG.DBFVve8G -J81># %;
4 ; %"e#181># %-'&2-6#oe
' ><oe-6'&'>J%>#-d
6-: 0
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
doe' ><voe#1 ><
Z! "= ><-6#1E4 ;e"
81>#-67;e4 ; %F81>#i-981E#&$
)#DK2-68G :i-oe8|':i
-e 6IE#%Eee 6oe'
><+ Oeve8| ><E)#-'h[
UCTIETVND.DBFV e 8| > < E )# ( 5
>UCTIETNTE.DBF)
doe e 6 &0v oe 4 81 ># : i
P["["5G (%8-.#&}U &}>-.#
EV-6J';+:i>DK#F
0%%8#%&}-6-] )#ZDK
t%(=-:]& d !# 7-6 E8\
e"IE#%=-:]-6e 6+N
e %4 ;2P[Ee'
><FIE#o%-.#&}-6J .>-.#E\
.#2-6-]%8#%&}&}(FIE#%8#%
&}-6-]$ 4v
o%8#%&}~h6-.#&}dF2-.#&}•kh6dkF2
h'#%8#%&}€bZ-:]-28h6" 65-:]-282
oe-68G -orFRXXmlXQRrlh&'6(e'
><-XorRmr[rXFRXXmRlhRrlhoe
e 6 OevTHOPVND.DBF8|-:]2
)#>+N h[ THOPNTE.DBF 8|-:]2
)#>+N 5>oe THOPNTE.DBF\-6D8< -
nlhTrhTRrkRlhRrlhnlhThTrlXm>e 6;e
'-6'#=
h -<<>5>% e-62
'&'e481>#:i-2e-3 &K&05- "4
81>#&0-%4 h6-%4 F2-%(&0y
/yyPe<<>'&'>% eE)#( 5>
e<<>*>% eE)#( ><
+N h[
t>+($ >;&9#4 ; %-'&9#
+0 +#E#.#.>% : Z-#&"DK
"+ O: Z#v
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
dF: Z4 ; %VCTG.PRGF: Ze4>
4 ; %h'#-:]& d !# 7(Z'
J81>#:i-:]-2Q81>#(e•-O !
81>#-# e' E‚<
dF: Z8 e' >< DSCTIET.PRGvF2
><#81>#;e4 ; % e'"-
8f#81>#-#Ee4 ; %
dF: Ze 6 THOP.PRGvF2><e 6%>#
;e'- ee 6-]IE#\5
e #E,Z+iE
dF: Zoe'&0n0 e 6+N 5
>INTHOP.PRGf#_"_+FIE#-e-6IE#
E_ee 6
dF: ZXoe8|'INCHITIE.PRGv;81
E#E_oee 6e'-_ef#+ -2
IE#%8-.#&}""#%&}-67;ee 6"IE#
(; ><<-6-]Ee' ><
h'#: Z-6E 1&}Z•7%8-.#&}Eee
6-]e e >< &}Ee
'--]IE#%%8-'!-
h -5e2 2&03
-e98 : Z57#^ev TCTTUC.PRG
t<<>+0 +#-6| 98 : Z-/
87#7DCHAMPRG
F#%G $ >0-6'J7-]8-2
E#.#02: Z-#& *: ZMENU.PRG d
: Z+'8$ >.'EZ
>$ >-2
P$Z:-O>&' ><( !# 7
& E
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
F4 ; %
oe4 ; %
oeE+N 5>
oeE+ƒ h[
oee 6+3 5>
oee 6+3 h[
oe'&0
n0 e 6+N 5>
orRmr[rXFRXXm
Pf#
orRmr[rXFRXXm
Pf#+
UV
U_V U_V
UyV
UyV
UBV
UBV
U„V
UBV
Luận văn tốt nghiệp Trờng Đại học Thơng mại
-2
dn(UV-6>+i: Z4 ; %VCTG.PRG
dn(U_V-6>+i: Z8 e' ><
DSCTIET.PRG
dn(UyV>+i: Ze 6THOP.PRG
dn(UBVXe'&0n0 e 6+N 5>-6
>+i: ZINTHOP.PRG
dn(UVXe8|'-6>+i: Z
INCHITIE.PRG
III.Tổ chức thực hiện.
1.Thiết kế hệ thống sổ trên máy vi tính:
oe-3 &K&05- v
RemhQh[[njmhQhm[nj27#^ % #v
F7#^e#v
j8 p [
hQ F C &0-%4 h6
FQ F C &0-%4 F2
_oe4 ; %vFT[nj
j8 p [
oF F C o%4 ;
h [ a h
h[ F _b h8# ><
P[ F y P-:]2)#>
prlXXmh F y p5
{TXl F y z 5Ut%( 5>V
Q F C &0yU/&0yyV
ohm h _ o% #E>
oh[ h _ o%-)#-eh[ Q_ F
C &0-%4 h6/F2
o_ h _ o%-%4 Ut)#-eh[V
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
TRXFRs F t87#1 4 ;-
#%>#
FXmh[[nj/FXmhm[nj
yoe' ><
n OeE=&0:CTIETVND.DBFvF' ><
>CTIETNTE.DBF: ' >< 5>
F7#^eCTIETVND.DBF <Qy #v
j8 p [
oF F C o%4 ;
h [ a h
P[ F y P-:]
h[ F _b h8#
kohry h _ kh6
Fr h _ t%4 F2
koFry h _ kF2
hr h _ t%4 h6
o%-%4 F2-%4 h6k<#%&0-%4 Ee
TENTKVND.DBF
<QyyoeCTIETVND.DBF Y 27#^: I&
E! vkohry+N kohryy"koFry+N koFryy
F7#^eCTIETNTE.DBF <Qy#v
j8 p [
oF F C o%4 ;
h [ a h
P[ F y P-:]
prlXXmh F y p5
{TXl h C z 5
kohryhm h _ kh6 #E>
kohryh[ h _ kh6h[
Fr h _ t%4 F2Uh[V
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
kohryhm h _ kF2 #E>
koFryh[ h _ kF2h[
hr h _ t%4 h6Uh[V
o%-%4 F2-%4 h6k<#%&0-%4 Ee
TENTKNTE.DBF
<QyyoeCTIETNTE.DBF Y 27#^: I&
E! vkohryhm+N kohryyhm
kohryh[+N kohryyh[
koFryhm+N koFryyhm
koFryh[+N koFryyh[
Boee 6v
n OevTHOPVND.DBFve 6 ><
+N tO >evTHOPNTE.DBFve 6 ><
+N 5>
F7#^eTHOPVND.DBFE<Qy#v
j8 p [
P[ F y P-:]
[ F _b E-:]
hr[Q{ h _ h6-.#&}
Fr[Q{ h _ F2-.#&}
kohry h _ kh6
koFry h _ kF2
hrFQ{ h _ h6#%&}
FrFQ{ h _ F2#%&}
<QyyeTHOPVND.DBF Y 27#^: I&
E! vkohry+N kohryy"koFry+N koFryy
F7#^e THOPNTE.DBF <Qy27#^#v
j8 p [
P[ F y P-:]
[ F _b E-:]
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
prlXXmh h y p5
hr[Q{hm h _ h6-.#&} #E>
hr[Q{h[ h _ h6-.#&}h[
Fr[Q{hm h _ F2-.#&} #E>
Fr[Q{h[ h _ F2-.#&}h[
kohryhm h _ kh6 #E>
kohryh[ h _ kh6h[
koFryhm h _ kF2 #E>
koFryh[ h _ kF2h[
hrFQ{hm h _ h6#%&} #E>
hrFQ{h[ h _ h6#%&}h[
FrFQ{hm h _ F2#%&} #E>
FrFQ{h[ h _ F2#%&}h[
<QyyoeTHOPNTE.DBF Y 27#^: I&
E! vkohryhm+N kohryyhm
kohryh[+N kohryyh[
koFryhm+N koFryyhm
koFryh[+N koFryyh[
eEI2e-3 &K&05- -65'
\e\5-65: Z
2.Vµo d÷ liÖu cho sæ.
F2581>#.J;+-;1 81>#•'
"DK-+#+0 E#.#t281>#:id
81>#I.:i>DK"81>#
JJd81>#-6 I2K M>DK
&}
-2eTENTKNTE.DBFTENTKVND.DBFe4
81>#:iI.8-2-6Ji'-'"h8# R
e#v
E<yv
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
TENTKNTE.DBF TENTKVND.DBF
hQ FQ hQ FQ
hr_ Fr„ hr Fr„
hr__ Fr… hr_ Fryyy
hra_ Fr…_ hra_ Fr…
hr„y FrBy hr„y Fr…_
hr„y_ hr„y_
hrBy hryyy
hryA hryA
E<Qyyh8# e#v
TENTKNTE.DBF TENTKVND.DBF
hQ FQ hQ FQ
hr„C Fr__ hr„_ Fr
hra FrBy hr„y Fr_
hra_ Fr… hr„C Fr„y
hr_ hr_ Fr…
hrBy hra
hra_
Re THOPVND.DBF THOPNTE.DBF 481>#:i
["P["5"%8-.#&}.e 6-.#EF81>#
:ie-6J&>: Z57#^-6+e
# &-:] !# 7"& (&>:
Z57#^e
t%(81>#-6JJ eVCTG.DBF &>
: ZVCTG.PRG&-2345•
>EZG6-81>#
3.X©y dùng c¸c ch¬ng tr×nh.
yF: Z57#^evTCTRUC.PRG
1* SET SAFE OFF
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
2* CLEA ALL
3* CLEA
4* ACCE' VAO SO HIEU TAI KHOAN (131/331) 'TO TK
5* TS1='TK'+TK+'\TENTKNTE'
6* TS11='TK'+TK+'\TENTKVND'
7* USE &TS1
8* COPY STRU EXTE TO TG
9* use tg
10* C1=FIEL(1)
11* C2=FIEL(2)
12* C3=FIEL(3)
13* zap
14* APPE BLAN
15* REPL &C1 WITH "SCT",&C2 WITH "C",&C3 WITH 6
16* APPE BLAN
17* REPL &C1 WITH 'NT',&C2 WITH 'D',&C3 WITH 8
18* APPE BLAN
19* REPL &C1 WITH 'MDV',&C2 WITH 'C',&C3 WITH 3
20* APPE BLAN
21* REPL &C1 WITH 'ND',&C2 WITH 'C',&C3 WITH 20
22* APPE BLAN
23* REPL &C1 WITH 'LOAITIEN',&C2 WITH 'C',&C3 WITH 3
24* APPE BLAN
25* REPL &C1 WITH 'TYGIA',&C2 WITH 'N',&C3 WITH 6
26* APPE BLAN
27* REPL &C1 WITH 'TK1',&C2 WITH 'C',&C3 WITH 6
28* APPE BLAN
29* REPL &C1 WITH 'st1nte',&C2 WITH 'N',&C3 WITH 10
30* APPE BLAN
31* REPL &C1 WITH 'st1vnd',&C2 WITH 'N',&C3 WITH 12
32* APPE BLAN
33* REPL &C1 WITH 'TK2',&C2 WITH 'C',&C3 WITH 6
34* APPE BLAN
35* REPL &C1 WITH 'ST2',&C2 WITH 'N',&C3 WITH 12
36* APPE BLAN
37* REPL &C1 WITH 'GHICHU',&C2 WITH 'C',&C3 WITH 1
38* USE
39* TS2='TK'+TK+'\VCTG'
40* CREA &TS2 FROM TG
41* SELE 1
42* USE TG
43* DELE FOR RECN()>4
44* PACK
45* DO WHIL I<=2
46* TC=IIF(I=1,'PSNO','PSCO')+TK
LuËn v¨n tèt nghiÖp Trêng §¹i häc Th¬ng m¹i
47* APPE BLAN
48* REPL &C1 WITH TC,&C2 WITH 'N',&C3 WITH 12
49* SELE 2
50* USE &TS11
51* DO WHIL .NOT.EOF()
52* TC=IIF(I=1,CTK,NTK)
53* IF TC#SPAC(6)
54* SELE 1
55* APPE BLAN
56* REPL &C1 WITH TC,&C2 WITH 'N',&C3 WITH 12
57* ENDI
58* SELE 2
59* SKIP
60* ENDD
61* SELE 1
62* ENDD
63* CLOSE ALL
64* TS3='TK'+TK+'\CTIETVND'
65* CREA &TS3 FROM TG
66* SELE 1
67* USE TG
68* DELE FOR RECN()>4
69* PACK
70* APPE BLAN
71* REPL &C1 WITH 'LOAITIEN ',&C2 WITH 'C',&C3 WITH 3
72* APPE blan
73* REPL &C1 WITH 'tygia',&C2 WITH 'N',&C3 WITH 6
74* DO WHIL I<=2
75* TC1=IIF(I=1,'PSNO','PSCO')+TK+'NTE'
76* TC2=IIF(I=1,'PSNO','PSCO')+TK+'VND'
77* APPE BLAN
78* REPL &C1 WITH TC1,&C2 WITH 'N',&C3 WITH 10
79* APPE BLAN
80* REPL &C1 WITH TC2,&C2 WITH 'N',&C3 WITH 12
81* SELE 2
82* USE &TS1
83* DO WHIL .NOT.EOF()
84* TC=IIF(I=1,CTK,NTK)
85* IF TC#SPAC(6)
86* SELE 1
87* APPE BLAN
88* REPL &C1 WITH TC,&C2 WITH 'N',&C3 WITH 12
89* ENDI
90* SELE 2
91* SKIP