NEAR EAST UNIVERSTY

I_

I

I I I I I

I

NEAR EAST UNIVERSTY

DEPARTMENT OF COMP .INF .SYSTEM

GRADUATION PROJECT CIS-400

PERSON INFORMATION SYSTEM BY

HALİL URAN 940018

June, 199-9

ı ı~ıım~.111!~

NEU

A £'fU1\.TO,-ıTT vnrVl\ıfFl\.TT

I"'lL.'-...ıI~",ı'-' 'y .A....J.A.:.J~~.A.:..J.lT..a.ı..:.J.1, .I.•••••••••••••••••••••••••••••••••••• T_ı.

AD~TDAC1T

~..a,~.•~'-" ı.. •••••••••••••••••••••••• •4P ••••••••••••••••••••••••••••

TT••

1.1 Il'"~l'R()I>lJC::1'1()1'-~•••••••••••••••••••••••••••••••••••••••••• 1

ı") TT~Tl\.Tr-1 r1T lpı>FD ')

• ..ılııı u ~·.1., '-J '-...ı.A....J.I. I. ~•'-•... .ılıııJ

2. USER MANUEL ...•... 3 2.lEXECUTPı'-~G THE l\1AIN l\fENU... 3

2.2 PROGP~M TO FIND PERSONAL INFORMATION OF THE PERSON ...•... 3

APPENDICES

DATA FLO\V DIAGRAl\1S. .. . . .. . . .. . . .. ... 4 FLO\'' CHARTS •... ,... . ... 13

DATA STRUCTURES . 15

SCREEN OUTLINES ...•... 21 PROGRAM D0CU1\1ENTATION ...•.. 26

REFERENCE ...•... 27

I I I I

I

ACKNOWLEDGMENT

I would like to thank to my teacher Mr. Dr. Yalçın AKÇALI, Umit iLHAN and Nadire ÇAVUŞ for his kind help in developing my graduation project and also I would like to thank to my friends who help me during the projects.

Finally special thanks to my family.

I

ABSTRACT

Our project is the development of computer software for the staff working in different offices. The detailed information kept in the different databases according to their co~tents. These databases were used to get lists. The project developed by the combination of six part. The part I have developed is the search (list) of real and continous mission of the persons. In these parts user will select the search criteria (id no., name , surname), enter the required data then the program will list the information on the screen or gives the error messages. Before start writing the program, the structure of data bases were created, so all the worker in this project used same databases in the development of the software.

"'

II

1.1. INTRODUCTION

There are two search program in the menu. One is used to fmd out the real mission of the persons. Shows the name, UNVAN, ASSOSIATION, BAREM, REAL­

CONTINOUS,NAME and SURNAME on the screen. It has three choice for searching. I. ID NO, 2. NAME, 3. SURNAME. Id no is unique for each person, so the records listed on the screen was associated to one person. The search using name and surname can not be unique, so program displays all the matching name or surname in the window and user selects the required one using up, down keys.

The second search program is for the contious mission ofpersons. Same choices (id no., name and surname) are valid for fmding the search criterion. Then the person database is used to fmd the specific persons if the user enters name or surname (same procedure used in real mission list), then id no. is used to fmd the information for the selected persons using MISSION databases.

These two programs are using the following databases.

I-Person Database 2- Mıssıon Database

1

I

I I i I I I I I I I I I I I I I I I I I

1.2 USING CLIPPER

Clipper is a highly powered data base programming language. It is generally used in the application of data base programs. Because, data base records can be added, modified or deleted easily.

Clipper has compiler and linker program. These programs are collected in the batch file called CL.BAT. Contents of this file is given below.

clipper %1

if not errorlevel 1 rtlink file%1

Type CL and source file name to run the program.

C:\CLIPPER> CL gorev

This command compiles and generates the file with an extension of OBJ. But if there is any syntax errors in the program, compiler gives the error

messages on the screen with their line numbers. The errors must be corrected before recompilation. If there is no error, the program is linked and EXE file is generated by linker.

2

I

I I I I I I I I I I I I I I

Switch on the computer. When the C:\> prompt appears on the screen, insert diskette in drive A. Write A: and press ENTER key.

C:\> A: <ENTER>

A:\> CD\ PROJE <ENTER>

A:>PROJE> GOREY <ENTER>

The main menu will be displayed on the screen . User can select the required choice from the menu using Up/Down and Enter keys. The execution and the working principles of each program was explained in the following sections.

3

I

I I I I I

I

I I

2.1 EXECUTING THE MAIN MEN(!

Wnte gorev and press ENTER to run the main menu. Program displays the real/contious menu on the screen.. Use up/down keys end use Enter to select the required sub program.

2.2 PROGRAM TO FIND THE MISSION OF fflE PERSONS

My project shows the list of mission on the screen . There are two types of menu found in my program these are as follows :

1. Real Mission 2. Continous Mission

When we enter the fırst choice program shows real mission of person and when we enter the second choice shows us continous information of the person.

Program· waits for selecting the search criterion (id no, name, surname ) When the user enter choice program waits for entering id no, name or surname depends on the selection of criterion. The program first checks the person database to see the existence of the person. If the search criterion is name or surname window opens on the screen and displays the matching name or sumameUser selects the required name using up/down arrow keys. Then the program checks the mıssıon database to find the required information.And displays mıssıon database UNVAN ,KURUMU,BAREM,YERI AND DATE on the screen The common fields in the databases is id no.

3

I I I I ıs

,g

u,

lı

~C,

z:i:

Ü

I ı--

<( ^o:::

en

I o ^CJ

z~

I O - o

I~

-

I~

:i:Oü en cı:: cı::

<( w

uı c, en

I I

cı::oen

;:: o

<( cı::

oO

I

cı::~

Ww!z ~

uı

I n

I

w(J)

zo

(J)

ı:ı::::

I

w

I a..

I

z w^(J)

o^<(

- CD

(J) <(

~ I­

~ <(

Cl

zwo~

(J) CD ı:ı:::: <(

w l­

a.. ^<(

Cl

3Sv'8·a 3Hl NI Al.1118\fllv'/W3Hl.

z(J)

C90z­

- I- I-<(

(J) ı:ı::::

-w...J o,

o

I

I

I

2.CONTINOUS MISSION

I

I

I

I

r

~Y~~o

CH0=1

No

CH0=2

---Y~--0

No

CH0=3

~Y~---{3

L___l

5

I

I

I I I I

1. IDNO 2. NAME 3. SURNAME

ENTER CHO

CHO=O

No

CH0=1

No

CH0=2

No

CH0=3

No

'>---

Yes---.ı

'>--Yes--()

_· Y~-G

6

I

I

I

I

I

I

DATABASE

I

I

FOUND -: Yes DATABASE

I

I

\ <

MASSAGES

I

I

(

No RECORD

I l

I

DISPLAY

I

I "---T_j

RECORD (

I

I I I

.

I

I I I

/IFEOF

~Yes

I

I I ^~

I

I _•

I

I

I

I

I

I

I

I Lc:~cK

I

I

FOUND Yes DATABASE

I -

I ^/j

_\ <

I

I

(

NoI RECORD

I

I

(

I

••

I

I

I

I

I \

8

I

I

I

I I

I I

I

I

DATABASE

IFREC.

FOUND ^Yes

CHECK MISSION DATABASE

No

DISPLAY MASSAGES

IF REC.

l=OUND ;,-~~~~Yes~~~~-

No DISPLAY

RECORD

DISPLAY MASSAGES

READ NEXT RECORD

IF EOI=

Yes

,I

No

GO 1

9

1.10 NO · 2. NAME 3. SURNAME

ENTER CHO

CHO=O >---Yes RETURN

No

CH0=1

No

CH0=2

No

CH0=3

No

10

I

I

ACCEPT ID

CHECK PERSON DATABASE

IFREC.

FOUND

No

DISPLAY MASSAGES

Yes CHECK MISSION DATABASE

IFREC.

FOUND >-~~~~Yes~~~~--

No DISPLAY

RECORD

DISPLAY MASSAGES

READ NEXT RECORD

IF EOF

Yes

No

C

ACCEPT NAME

CHECK PERSON DATABASE

IFREC.

FOUND Yes CHECK MISSION

DATABASE

No

DISPLAY MASSAGES

IFREC.

FOUND >-~~--..--Yes~~~~.,

No DISPLAY

RECORD

DISPLAY MASSAGES

READ NEXT RECORD

~!il

IF EOF

Yes

No

G02

12

ACCEPT SURNAME

CHECK PERSON DATABASE

IF REC.

FOUND Yes CHECK MISSION

DATABASE

No

DISPLAY MASSAGES

IFREC.

FOUND >-~~~~Yes~~~~-

No DISPLAY

RECORD

DISPLAY MASSAGES

READ NEXT RECORD

IF EOF

Yes

No

13

C. DATA STRUCTURES

Search (List) programs are using two databases. These are person and gorev. The relation between the databases is id no. Program first checks the person database then if person exists checks the mission database using id no.

PERSON DATABASE

FIELD NAME FIELD TYPE FIELD SIZE

BRUT NUMERIC 12

CiNSiYET CHARACTER 1

MEDENi CHARACTER 1

CSAYISI NUMERIC 1

COCUK_C1 NUMERIC 1

COCUK_C2 NUMERIC 1

COCUK_C3 NUMERIC 1

COCUK....D1 DATE 8

COCUK_D2 DATE 8

COCUK_D3 DATE 8

KiMLiK CHARACTER 6

YAS NUMERIC 2

BOLUM CHARACTER 15

PERNO NUMERIC 3

ISTAR DATE 8

••

ADJ CHARACTER 15

SOYAD! CHARACTER 15

SICIL_NO NUMERIC

.

DOGUM_T DATE 8

DOGUMYERI CHARACTER 30

BABAADI CHARACTER 25

ANAADI CHARACTER 25

KAYITLIYER CHARACTER 25

14

r

KIMLIK_NO NUMERIC 7

ASKER_OUR CHARACTER 1

ASKER_TARi DATE 8

ASKER_TAR2 DATE ₈

COCUK_K1 CHARACTER ₃

COCUK_K2 CHARACTER ₃

COCUK_K3 CHARACTER 3

ADRES CHARACTER 25

TEL_NO CHARACTER 15

MISSION DATABASE

SICIL...NO CHARACTER ₆

UNVAN CHARACTER 15

KURUMU CHARACTER 15

BAREM CHARACTER ₃

B_TARIHI DATE ₈

A_TARIHI DATE ₈

GG_TARIHI DATE ₈

TARIH_NtT DATE ₈

YERi CHARACTER 15

GA

-

15

SCREEN OUTLINES

••• M A I N M E N U •••

1- REAL MISSION LIST 2- CONTINIOUS LIST 3- EXIT

16

I

I I I I I I I I I I I I I

ENTER SICILNO:

ENTER NAME : ENTER SURNAME:

.•

17

REAL MISSION LIST TABLE

SICIL NO NAME SURNAME UNVAN

ESC (CIKIS)

18

REAL MISSION LIST TABLE

UMU BAREM S.DATE F.DATE YERI G_A

I I I I

e

!SC (CIKIS)

19

CONTINIOUS LIST RECORD ENTER SICILNO:

ENTER NAME ENTER SURNAME:

20

I

CONTINIOUS LIST TABLE

SICIL NO NAME SURNAME UNVAN

ESC (CIKIS)

I

.•

21

22

PROGRAM DOCUMENTATION USE PERS

***** ^RENKLER

KIRMIZI:="R+/B+"

MAVI:="W+/B+"

YESIL:="W+/B+,G+"

FLASa::=11R+/B+"

SET WRAP ON

STORE SPACE(25) TO PBABAADI,PANAADI,PKAYITLIYER,ADRES STORE SPACE(30) TO PDOGUMYERI

STORE SPACE(15) TO PBOLUM,PADI,PSOYADI,PTEL_NO STORE SPACE(6) TO PSICIL_NO

STORE SPACE(l) TO PCINSIYET,PMEDENI,PCOCUK_Cl,PCOCUK_C2,PCOCUK_C3,PASK STORE O TO PCSAYISI,PYAS,PPERNO,PKIMLIKNO

I CENTURY ON

I DATE TO BRITISH clear

DO WHILE .T.

SET COLOR TO W+/B+,G+

CLEAR

FOR I=O TO 24

@O+I,O say REPLICATE(11]",80) NEXT

@5,19 clear to 18,60

@5,19 to 18,60 double

7,21 SAY" .•. M A I N M E N U. q "

0,21 PROMPT ¹¹ 1- REAL MISSION LIST ^II

1,21 PROMPT" 2- CONTINIOUS LIST "

3,21 PROMPT" 3- EXIT _"' ^II

NU TO AA DO CASE

CASE AA=l DO AS CASE AA=2

PO GEC CASE AA=3

QUIT ENDCASE ENDDO

,ECT 1 : PERS ,ECT 2 : GOREV

ıRE SPACE(6) TO PSICIL_NO

ıRE SPACE(15) TO PUNVAN,PKURUMU,PYERI,PADI,PSOYADI RE SPACE(3) TO PBAREM

ıRE SPACE(l) TO PG_A

RE O TO PA_TARIHI, PB_TARIHI l\R

FOR I=O TO 24

@O+I,O say REPLICATE("f",80) NEXT

,21 CLEAR TO 13,60 ,20 TO 13,59 DOUBLE

0,21 SAY "ENTER SICILN0:11 GET PSICIL_NO D

ECT 2

FILTER TO, PSICIL_NO = SICIL_NO .AND. G_A = "A"

TOP

PSICIL_NO=""

1,21 SAY "ENTER NAME

D

:" GET PADI ECT 2

FILTER TO PSICIL_NO = SICIL_NO .AND. PADI = ADI

~D. G_A = "A"

rop

PADI=" ¹¹

2, 21 SAY "ENTER SURNAME:" GET PSOYADI

)

~

~CT 2

FILTER TO PSICIL_NO = SICIL_NO .AND. PADI = ADI .AND. PSOYADI = SOYADI

~D. G_A = "A"

rop

~CT 1

~TE FOR PSICIL_NO = SICIL_NO ,NOT. FOUND()

,4 SAY "KAYIT BULUNAMADI"

JRN

:F

rn ADI TO PADI

~E SOYADI TO PSOYADI

:F

~R

23

ARE AAA[lO]

ARE BBB[10]

ARE CCC[lO]

1] = "SICIL_NO"

2] = "ADI"

3] = "SOYADI"

4] = "UNVAN"

5] = "KURUMU"

6 ] = ^11BAREM''

7] = "A_TARIHI"

8] = "B_TARIHI"

9] = "YERI"

10] = "G_A"

CT 1 OP

1] = "SICIL NO"

2] = "l'fAME"

3] = "SURNAME"

CT 2 OP

4] = "UNVAN"

5] = "KURUMU"

6] = "BAREM"

7] = ¹¹S.DATE"

8] = "F.DATE"

9] = "YERI"

10] = ^11G_A11

1] = "@6!"

2] = "@15!¹¹ 3] = "@15!¹¹ 4] = "@15!¹¹ 5] = "@15!"

6] = "@3!¹¹ 7] = "@8!¹¹ 8] = "@8!¹¹ 9] = "(g15!"

10] = "@1!¹¹

1SAY ^II REAL MISSION LIST 4 SAY "ESC (CIKIS)"

TO 23,76 DOUBLE

IT(2,2,22,75,AAA,CCC,,BBB) E ALL

F

RN O

TABLE

24

iCT 1 PERS iCT 2 GO REV

lE SPACE(6) TO PSICIL_NO

lE SPACE(15) TO PUNVAN,PKURUMU,PYERI,PADI,PSOYADI lE SPACE ( 3) TO PBAREM

lE SPACE(l) TO PG_A

lE O TO PA_TARIHI, PB_TARIHI lR

FOR I=O TO 24

@O+I,O say REPLICATE("[{",80) NEXT

21 CLEAR TO 13,60 20 TO 13,59 DOUBLE

.8 SAY ¹¹CONTINIOUS LIST RECORD ¹¹

ı, 21 SAY "ENTER SICILNO: ¹¹ GET PSICIL_NO

,

:CT 2

FILTER TO PSICIL_NO = SICIL_:NO .AND. G_A = "A"

~OP

'SICIL_NO=" II

,21 SAY "ENTER NAME :" GET PADI

:CT 2

FILTER TO PSICIL_NO = SICIL_NO .AND. PADI = ^ADI

ID. G_A = "A"

'OP

'ADI=" "

,21 SAY "ENTER SU'.RNAME:11 GET PSO?ADI

:CT 2

FILTER TO PSICIL_NO = SICIL_NO .AND. PADI = ADI .AND. PSOYADI = SOYADI ID. G_A = "A"

'OP :CT 2

.TE FOR PSICIL_NO = ^SICIL_NO

NOT. FOUND ( )

4 SAY "KAYIT BULUNAMADI"

RN F

E ADI TO PADI

.E SOYADI TO PSOYA-OI

25

F R

ARE AAA[lO]

ARE BBB[lO]

ARE CCC[lO]

1] = "SICIL_NO"

2] =,"ADI"

3] = "SOYADI"

4] = "UNVAN"

5] = "KURUMU"

6] = "BAREM"

7] = "A_TARIHI"

BJ= "B_TARIHI"

9] = "YERI"

10] = ^11G_A11

:T 1 )P

L] = "SICIL NO"

2] = "NAME"

3] = "SURNAME"

::T 2 )P

1] = "UNVAN"

>] = "KURUMU"

5] = "BAREM"

r] = "S.DATE"

!] = "F.DATE"

ı] = "YERI"

LO] = ^11G_A11 .] = "@6!"

!] = "@15!¹¹ I]= ¹¹@15!¹¹ l] = ^11@15!11

i] = "@15!¹¹ i] = ^11@3!11

'] = "@8!"

I] = ^11@8!"

1] = "@15!¹¹ .O] = "@1!¹¹

SAY" CONTINIOUS LIST TABLE ¹¹ SAY "ESC (CIKIS)"

TO 23,76 DOUBLE

T(2,2,22,75,AAA,CCC,,BBB) ALL

N O

26

REFERENCES:

1. Clipper S.2 , Data Base Programing Laguage, Memik Yanık 2. Data Base, Doğan İbrahim

27