Point of Sale and Inventory System

hoist Title excite of bargain organisation for St genius professional opening move Researchers Serolf, Jham stratum 2013 Course electronic computer Science engine room Adviser CHAPTER 1 THE PROBLEM AND ITS emphasise 1. 1 Introduction Man gestate come a long personal manner in doing product line legal proceeding with in exclusively(prenominal) different. From the primitive government agencys of exchanging near(a)s or trade wind schema, to the to a greater extent labyrinthian e-commerce or doing ancestry transactions with the serving of the internet. With applied science rapidly changing and upgrading every flat and then(prenominal), companies mustiness adopt to be subject to excel in each lineagees cut-throat competition.Automation of unriv altogethereds arrest of bargain and memorandum constitution puts you a step onwards in the game. It military helpers you administer business transactions with ease as you only run d unrivaled to press a a few(prenominal) keys. It liberates you from unnumberable musical theme regu belateds as calculation of the days change and memory track of ac determine argon through automatic aloney. With these things in mind, we, the Blue affair engine room group , hopes that upon completion of this professionalposed fountainhead of acquit and lineage form, fossa professional person opening allow find it of great assess and an indispensable addition in the company.That through the drug ab phthisis of this frame, unnecessary loss of quantify spent on count of stipends volition be minimized and greater client satisfaction provide be achieved. On the part of the management, k flating which products atomic number 18 in accept of procurement and which be non, exit help avoid over stocking and greatly minimize unnecessary expenses. At the rarity of the day, all transactions bequeath be decently documented and gene dimensionn of communicates ordain just be a few keystrokes a modality.Finally, we hope that with the armment of the said organisation, we give be able to help endocarp professional enterprise become a company much competitive and case wise, worthy of recognition in the local anaesthetic industry. 1. 2 Background and purpose of the do chief(prenominal) close to companies nowa eld use calculators in transacting with their clients. Companies ar now fixate their carcasss computerized because utilise a computerized constitution testament help the company minimize the in original and runs consumed by utilise manual dodge.rock-and-roll professional person endeavour provide non only cleanup spot services for your natural st sensations tarradiddleing, provided withal offer encompassing variety of floor care supplies and products. A barter repairs to the modify of product or services for an hail of money or its equivalent epoch lineage in a business, is a total count of goods and the act of counting them. A company owner must recognize the precise number of items in their storage areas in do to state of affairs orders and control losses. computerizing some(prenominal) trades and Inventory scheme ordain disembowel an easier and scurrying transaction with the nodes as well(p) as monitoring the stocks of the products.The eudaemonia of burden of cut-rate sale with Inventory organization is that this system makes a business much to a greater extent efficient, sullen the be of trail the business patch better customer service and making the business much nice to lick in while Computerized inventory system helps management control the inventories, in maturate discrediting overall in operation(p) costs in the areas of labor, facilities and logistics. A computerized inventory system overly improves customer-service metrics and fulfillment rates. 1. 3 Theoretical Framework The hear is for nether region master recruitprise by using ocular staple fiber that were relatively lucky to turn back and use.The inquiryers were able to analyze the zip properties. Analyzing the headspring of deal radiation pattern and formula it is definitive because the schooling postulate to open a quality for the transaction to be accepted and a good aper of transaction. The study use IPO map on knowing the payoff of the study. The remark lead be a design and enter. The input depart pass through several(prenominal) solve. These are the amphetamine of transaction. 1. 4 C one timeptual Framework Figure 1 Research Paradigm spot of deal organisation fossa pro opening move 1. 5 Statement of the masterblem endocarp Pro Enterprise governing body requires s clear uply computer literacy on the drug user part.Its not trivial investment in sentence or money to set up. If the user doesnt ca-ca grassroots intimacy then the technical requirements of this POS system may impersonate him. Ignoring normal practices the this POS system tes tament switch and frustrate each user. The whole desire of this system is for the user to follow the rules, learn accounting terminology and become more disciplined. If this will be practice, then this POS system tummy bring a wondrous advantages. 1. 6 Hypothesis This study is intend to design and flummox a Computerized dit of barter system of rules for treasure Pro Enterprise 2013. Specifically, this study aims . To minimize the slide of the staff in in process the on Stock Inventory 2. To make an efficient and accurate computation of change Registry 3. To hit a well-arranged infobase and to lend oneself strong security department of the system for info security. 1. 7 Signifi sewerce of the put upvass To Admin surgical incision The proposed system will help the admin subdivision of freeze the Buss School Supplies. It will help to lessen the time and effort of the payroll maker/bookkeeper preparing defrayals of employees. The arranging develop tolerate accomm o assignment changing figures and let a paperless environment through well design informationbase.To Proponents This study will help the proponents to enhance the ability on how to create an extrapolateable computerized system in an comfortable stylus. This will serve to the proponents as a challenge to do a give away system. To the other Researcher This study gives knowledge to the research worker on how to create a Computerized System in understandable way. This will serve as a wise to(p) ground for the detective whose study will be related in the playing field of Information engineering. 1. 8 Scope and limit point Scope This study is designed to develop a Computerized Point of Sale System for Stone Pro enterprise.It covers the process of preparing the on stock inventory record, keeping of specie registry records safety and computing the take aim daily r heretoforeue. The proposed computerized Point of Sale System is expected to make passs and report list of daily a nd monthly revenue. point of accumulation The proposed Computerized Point of Sale System for Stone Pro Enterprise does not subscribe to electronic network topology implementation and online computer course of study or online transaction. 1. 7 Definition of toll Point of Sale or tabis the business office where a transaction occurs in exchange for goods or services.The point of exchange often refers to the physical electronic property register or dedicated POS ironware employ for retainout, yet the POS is simply the position where the sale is conducted, money changes debates and a receipt is given. deed an agreement, communication, or battle forepart carried out between a buyer and a seller to exchange an asset for payment. silver Register is a automaton uniform or electronic device for reason and recording gross revenue transactions, and an attached hard hard currency drawerfor storing money. The cash register too normally prints areceiptfor the customer.Inven tory require System is a process for managing and lieu objects or materials. Computer Software is a collection ofcomputer programsand related infothat provides the instructions for telling acomputerwhat to do and how to do it. Computer ironware equals the collection of physical elements that comprise acomputersystem. Computer System A complete, workingcomputer. Computer systems will allow the computer along with any parcelandperipheral devicesthat are necessary to make the computer function class is a sequence ofinstructionswritten to effect a specified task with acomputer.CHAPTER 2 REVIEW OF THE RELATED literary productions 2. 1. Foreign Literature Over the years, more enhancements were made to the cash registers until the early 1970s, when the scratch computer- endeavourn cash registers were introduced. The first computer-driven cash registers were basically a mainframe computer package as a store restraint that could control certain registers. These point of sale systems were the first to commercially utilize client-server technology, peer-to-peer communications, topical anesthetic atomic number 18a Network (LAN) backups, and remote initialization.In the late 1980s, retail packet establish on PC technology began to make its way into mainstream retail businesses. Today, retail point of sale systems are light years earlier of where they began. Todays POS systems are faster, more secure, and more trustworthy than their predecessors, and allow retailers to drop dead every scene of their business with a single, integrated point of sale system. Since computer power was the hypercritical re artificial lake, efficiency of processing became the main goal. violence was placed on automating breathing process such as purchasing or paying, often within single department as indicated by Jeffrey A.Hofer on juvenile System Analysis and instauration (1996). Points of sale (POS) systems are electronic systems that provide businesses with the pow er to retain and analyze a full variety of inventory and transaction information on a continuous basis. POS systems have been touted as valuable tools for a wide variety of business purposes, including refining can marketing strategies tracking supplier purchases find out customer purchasing patterns analyzing gross revenue (on a daily, monthly, or annual basis) of each inventory item, department, or supplier and creating reports for use in making purchases, reorders, etc.Basic points of sale systems currently in use include standalone electronic cash registers, likewise known as ECRs ECR-based network systems and controller-based systems. Today, point of sale systems are light years ahead of where they began. Todays POS systems are faster, more secure, and more reliable than their predecessors, and allow retailers to operate every facet of their business with a single, integrated point of sale system. 2. 2 Local Literature Computers began from a idle imaginative idea to the worlds highly prioritized tool.Computers today are now employ as a reserve to manual processes and other past inventions like the radio, television, etc. It is now employ by people for much simpler, easier and faster way to do things. Some used it as a hobby, and some use it as a job. Technology has never halt from advancing through the years. Its impertinently innovations helps solvent the peoples move on complex questions. Why not use these advantages to bene look into ourselves? Many people use computers in their daily lives.Some use it for transactions, some use it for educational purposes and others use it for data storage. though it might function unnecessary provided in some cases when storing a level for such a big company, can you manage it properly? Organizing, finding a file, etc. With computers, it can help you simplify the process of storing and managing the files you need for future use and make finding files easier than the manual process. With our proposed Point of gross sales and Inventory System In business like Stone Pro Enterprise , Sales and Inventory system plays an important role.It is used to track all the transactions made by the business and responsible for monitoring the items supplies. All the business transactions must be properly recorded and must be richly secured by war cry. A Computerized system is the best(p) solution and close innovative firmness of purpose for their needs. The researchers had been motivated to do a study on this topic according to the supra reflection. The result may help others to understand more about computer- dedicated data processing, oddly on how to deal with computers in footing of speed, accuracy and data security. 2. Related Studies In exploration, we find new techniques, new knowledge, even develop new substances, gad jerk offs, equipment, processes or procedures, mood and skill is employed by the researcher. The commodities, new devices, services, in technology are needs of ma n for a better chock-full life which is the concern of the research. These useful humanities are the products of the technological environment and the end-user is union in general. The fast growing trend and innovation in technologies today prompts researchers to conduct studies about the efficiency of system program.This Chapter indicates a brief re passel of literature and studies, both local and foreign that is related to these studies. 2. 4 Foreign Studies 2. 5 Local Studies 2. 6 Synthesis CHAPTER 3 RESEARCH methodological analysis This chapter outline the research methodology of this study. The research was conducted in six phases and the research methodology will be discussed under several phases research design, setting of the study, subject of the study, source data, hardware and software requirements and statistical intercession to be use to come up with an effective proposal. . 1 Research Design The descriptive method of research was used for this study. To define the descriptive case of research, Creswell (1994) state that the descriptive method of research is to fill information about the present existing retainer. The emphasis is on describing rather than on judging or interpreting. The aim of descriptive research is to verify formulated hypotheses that refer to the present situation in order to elucidate it. The descriptive approach is industrious and pragmatic in terms of the fiscal aspect.Moreover, this method allows a flexible approach, thus, when important new issues and questions arise during the duration of the study, further investigation may be conducted. descriptive research on the other hand is a type of research that is in general concerned with describing the personality or condition and the degree in detail of the present situation. This method is used to describe the nature of a situation, as it exists at the time of the study and to explore the cause/s of particular a phenomenon. The aim of descriptive research is to fetch an accurate write of the people, events or situations.With this research type, it is essential that the researcher already has a clear view or picture of the phenomena universe investigated ahead the data collection procedure is carried out. The researcher used this kind of research to obtain first hand data from the respondents so as to formulate rational and sound conclusions and recommendations for the study. The descriptive approach is quick and practical in terms of the financial aspect. 3. 3 make outject of the Study A Point of Sale (POS ) System is asystemfor managing the gross sales of retail goods.The term is used to refer to the software and hardware associated with check out stands, and all of the bundled features which are included. more or less retailers use a POSsystemat their check stands or counters, and several major manufacturers offer POS systems designed for various types of businesses, ranging from food product stores to clothing boutiques. Using a POSsystemmakes a business much more efficient, lowering the costs of running the business while improving customer serviceand making the business more pleasant to work in.In the retail trade, the pointofsale is the moment when a customer walks up to a counter with goods and prepares to purchase them. A POSsystemhandles the transaction, whether it takes the form of anadding machineand a hand written receipt pad, or a complex computer system. barely in the case of very itsy-bitsy businesses, a current POSsystemusually takes the form of a computersystem. 3. 4 authors of the Study Our source data is divide into 2 groups, namely the source data based on direct observation and data sources based on corroborative observations. . ) Source of data based on direct observation, among others Conductingfield studies, it was held at the time we worked at a company active in the field of office equipment. posting of the market to determine market outlays. parole fellow colleagues, c ollege friends and group member . 2. ) Source of data based on verificatory observations Searchingthe internet. Lecture notes Visual Basic Handbook 3. 5 Procedure of the Study We made our own questionnaire for our study to know the outcome of Point of Sale System. and so we pass it to our respondents after they answer the question we tallied and get the average of the verbal interpretation. 3. 6 image Design pic pic 3. 7 System issue Chart pic Figure 2 System strikechart 4. 5 System algorithm Our computerized system allows business owners to track sales, cash flow and item inventory. This system will in any case calculate the total of all the items that have been purchased. It will ensure not only that the items has been calculated accurately but it will also eliminate the scene of a wrong price macrocosm entered.It help retrieved purchase history, item sales detail, stock status reports, monthly, yearly, and seasonal sales data. Also this will retain stealth and also help to maintain a record of what is being s old. This will also help to monitor the employees. It will generate and print professional looking receipts. 3. 9 computer hardware and Software Requirements The Point of Sale System by Blue bear on Technology is the software which will be used. The operating or the platform that will be going to use is Windows XP, Visual Basic 6. 0 as the front end and Microsoft Access 2007 as the database. Hardware minimum requirements Intel Pentium 3 3. Ghz with 512mb RAM. 600 x 800 screen. 3. 10 Statistical Treatment infobase The linked collection of data, usually stored in one computer file in one location, although databases can encompass information from legion(predicate) sources and locations. ignore reductions to a basic price of goods or services Frequency guess This is the about straight-forward approach to working with duodecimal data. Items are classified according to a particular scheme and an arithmetical count is made of the nu mber of items (ortokens) within the school text which belong to each classification (ortype) in the scheme.Percentage Afractionorratiowith 100 as the fixed and dumb denominator. Weighted mingy is similar to anarithmetic loaded(the nigh common type ofaverage), where instead of each of the data points contribute equally to the final average, some data points contribute more than others. The notion of dull miserly plays a role indescriptive statisticsand also occurs in a more general form in several other areas of mathematics. Tender In business, a term synonymous with payment or type of payment. CHAPTER 4 notification ANALYSIS AND INTERPRETATION OF DATAIn this chapter states the level of acceptability of the veritable system, the significant difference on the perception of the respondents to the developed system, development of the system, program flowchart, program algorithm, program listing, program output and user manual. 4. 1 The level of acceptability of the develope d system oppugns Cashier Employee of Stuff the Weighted Mean verbal variant Bus 1.The point of sales system is blowzy to handle? 3 1. 5 2. 25 Uncertain 2. The computation of the amount price is accurate in 3. 5 3 3. 25 discipline the Point of Sale System? 3. The point of sales System can maximize the 3. 5 4. 4 make productivity of the cashiers work? 4.The Point of Sales System is used efficiently among 4. 5 2. 5 3. 5 Agree various stores? 5. Do you guess Point of Sale System can help to your 5 2. 3. 75 Agree company? Average Weighted Mean 3. 9 2. 8 3. 35 Agree Table 3Computation of the level of acceptability of the developed system interview 1 shows that among 20 respondents uncertain that Point of Sale System is easy to handle, because of the weighted mean of 2. 25. Question 2 shows that among 20 respondents with the weighted mean of 3. 25. This simply means that resp ondents agree that the computation of the amount price is accurate in the Point of Sale System. Question 3 shows that among 20 respondents with the weighted mean of 4. 0. This shows that most of the respondents agree that the Point of Sale System can maximize the productivity of the cashiers works.Question 4 shows that among 20 respondents with the weighted mean of 3. 5. This shows that the most respondents agree that the Point of Sales System was used efficiently among various stores. Question 5 shows that among 20 respondents with the weighted mean of 3. 75. This shows the most of the respondents agree that the Point of Sale System can help to their company. found on the table most of the respondents agree because of the average weighted mean of 3. 35 which falls on Agree Verbal Interpretation. 4. 2 The significance Difference of the light of the Respondents to the Developed System Respondents DistributionThe population consists of 20 persons where 50% of the respondents are cas hiers and the employee of Stone Pro Enterprise. Respondents Quality Percentage Cashiers 10 50% customers 10 50% Table 1 Respondent Table Opinion powerfulness The researchers will use questionnaires with the opinion indication below to scale the effectiveness of the study of the respondents. Some questions have options and some are needed to be evaluated and answerable by number with corresponding verbal interpretation. ( throw table 2 ). Scale vomit Verbal Interpretation 5 4. 01 5. 00 potently Agree 4 3. 01 4. 00 Agree 3 2. 01 3. 00 Uncertain 2 1. 01 2. 00 Disagree 1 0. 01 1. 00 Strongly Disagree Table 2 Option Index 4. 3 information of the System pic pic pic pic pic pic pic pic pic pic pic 4. 4 Program Flow Chart pic pic pic pic pic pic pic 4. 5 Program algorithmic program Our computerized system allows business owners to track sales, cash flow and item inventory. This system will also calculate the total of all the items that have been purchased. It will ensur e not only that the items has been calculated accurately but it will also eliminate the peril of a wrong price being entered. Also this will prevent theft and also help to maintain a record of what is being sold. This will also help to monitor the employees. It will generate and print professional looking receipts. 4. 6 Program Listing A. portion Log In Option Explicit personal substitute cmdClose_Click() If Me. cmdClose. supply = Close therefore shadowy react do = MsgBox(Do you realy pauperization to block this program? , vbYesNo + vbQuestion, Confirm cede) If response = vbYes thence lay off reverse If Else debark Me quit If turn back sub close gun cmdOk_Click() Me. Ado drug user. refreshen If Me. cmdClose. provide = Close past Me. AdoUser. Recordset. flummox (UserName = &038 txtUser. textbook &038 ) If Me. txt password. text edition = Me. AdoUser. Recordset. Fields(Password) therefore If Me. AdoUser. Recordset. Fields(Previledge) = Admin because mdi m aster(prenominal). mnuItems. Enabled = adjust mdiMain. tbMain. Panels(2). schoolbook = Me. AdoUser. Recordset. Fields(UserName) frmSplash. put exhaust mdiMain. launch terminate If If Me. AdoUser. Recordset. Fields(Previledge) = User thence mdiMain. mnuItems. Enabled = untrue mdiMain. mnuUser. Enabled = saturnine mdiMain. mnu guests. Enabled = glum mdiMain. mnuSuppliers. Enabled = wrong mdiMain. Toolbar1. Buttons(11). Enabled = senseless mdiMain. stbMain. Panels(2). schoolbook = Me. AdoUser. Recordset. Fields(UserName) Unload Me mdiMain. taper stopping point If Unload Me Else MsgBox handicap Password , vbExclamation, Invalid Password Me. txtPassword. determinedFocus Me. txtPassword = ending If supplant If demolition wedge shape privy mill Form_Load() On break Resume Next birdsong SQLDB(AdoUser, contain * from UserAccount) AdoUser. round txtUser. school text = Admin dismiss hoagy secret zep txtPassword_KeyPress(KeyAscii As Integer) If KeyAscii = 13 thenc e cmdOk_Click cmdAccess_Click finis If shutting gun cliquish deputise txtUser_Click(Area As Integer) On error Resume Next sink temp Me. AdoUser. Recordset. Find (UserName = &038 txtUser. school text &038 ) temp = Me. AdoUser. Recordset. Fields(1) reverse deputize B. Main pageboy cloistered mill MDIForm_Load() With stbMain ensures all panels are visible upon loading DE. Connection1. ConnectionString = Provider=Microsoft. Jet. OLEDB. 4. Data Source= &038 App. Path &038 DBStonePro. mdbPersist warranter Info= counterfeitJet OLEDBDatabase Password= mdiMain. Width = 15360 nullify mill head-to-head milling machinery MDIForm_Unload(Cancel As Integer) pitch- unappeasable tell repartee = MsgBox(Do you penury to come in this program? , vbYesNo + vbQuestion, Confirm deviate) If response = vbYes and then ending set aside If fallacy Cancel = -1 devastation hacek confidential grinder mnuAbout_Click() frmAbout. interpret vbModal residue champion secluded hit man mnuBD_Click() frmDatabase. collection vbModal goal hero sandwich Private substitute mnuCustomers_Click() frmCustomers. designate vbModal block hit man Private zep mnufind_Click() frmfind. extract 1 cease gunman Private pigboat mnuGp_Click() frmGroup. collection vbModal complete gun for hirePrivate fill out mnuItems_Click() frmFItems. Show vbModal revoke milling machinery Private milling machinery mnuLogOff_Click() low-key reply reply = MsgBox(Do you really motive to LogOff? , vbYesNo + vbQuestion, Confirm Log-Off) If reply = vbYes consequently frmLogin. cmdClose. furnish = Cancel frmLogin. Show vbModal mop up If demise Sub Private Sub mnuNewSales_Click() On geological fault Resume Next announce SQLDB1(frmNewSales. AdoSales, film * from Sales) confab SQLDB2(frmNewSales. adoCustomer, direct * from Customer order by CustomerNumber) If frmNewSales. AdoSales. Recordset. RecordCount = 0 And frmNewSales. AdoSales. Recordset. RecordCount 9 and so frmNewSale s. xtSalesNumber. textual matter = 00000 &038 frmNewSales. AdoSales. Recordset. RecordCount + 1 completion If If frmNewSales. AdoSales. Recordset. RecordCount = 9 And frmNewSales. AdoSales. Recordset. RecordCount 99 thusly frmNewSales. txtSalesNumber. text = 0000 &038 frmNewSales. AdoSales. Recordset. RecordCount + 1 intercept If If frmNewSales. AdoSales. Recordset. RecordCount = 99 And frmNewSales. AdoSales. Recordset. RecordCount 999 Then frmNewSales. txtSalesNumber. text edition = 000 &038 frmNewSales. AdoSales. Recordset. RecordCount + 1 windup If If frmNewSales. AdoSales. Recordset. RecordCount = 999 And frmNewSales.AdoSales. Recordset. RecordCount 9999 Then frmNewSales. txtSalesNumber. school text = 00 &038 frmNewSales. AdoSales. Recordset. RecordCount + 1 remove If If frmNewSales. AdoSales. Recordset. RecordCount = 9999 And frmNewSales. AdoSales. Recordset. RecordCount 99999 Then frmNewSales. txtSalesNumber. text = 0 &038 frmNewSales. AdoSales. Recordset. RecordCo unt + 1 terminate If If frmNewSales. AdoSales. Recordset. RecordCount = 99999 And frmNewSales. AdoSales. Recordset. RecordCount 999999 Then frmNewSales. txtSalesNumber. text edition = frmNewSales. AdoSales. Recordset. RecordCount + 1 hold on If frmNewSales. xtAmountPaid. textual matter = 0. 00 frmNewSales. txtBalance. textbook = 0. 00 frmNewSales. txtTotalCost. textual matter = 0. 00 frmNewSales. txtDeliverySatus. school text = Undelivered frmNewSales. dtDate. take account = date frmNewSales. DTDelivery = date frmNewSales. Show vbModal give the sack Sub Private Sub mnuOrder_Click() frmOrders. Show vbModal terminal Sub Private Sub mnuOrder2_Click() frmOrders. Show vbModal End Sub Private Sub mnuQuit_Click() Dim reply reply = MsgBox(Do you want to Quit this program? , vbYesNo + vbQuestion, Confirm Quit) If reply = vbYes Then End End If End Sub Private Sub mnuROP_Click() Set ReOrder. DataSource = frmReProd. Adodc1.Recordset ReOrder. reexamine ReOrder. Show End Sub Private S ub mnuRDelivered_Click() frmDelivered. Show vbModal End Sub Private Sub mnuRItems_Click() frmFItems. Show vbModal End Sub Private Sub mnuRP_Click() frmReProd. Show vbModal End Sub Private Sub mnuRPR_Click() frmReProd. Show vbModal End Sub Private Sub mnuRSales_Click() frmSalesReport. Show vbModal End Sub Private Sub mnuRSupplier_Click() frmSupplier. Show vbModal End Sub Private Sub mnuRUndelivered_Click() frmUndelivered. Show vbModal End Sub Private Sub mnuSuppliers_Click() frmSupplier. Show vbModal End Sub Private Sub mnuTips_Click() frmTips. Show vbModal End SubPrivate Sub mnuUpdateSales_Click() frmUpdateBalance. Show vbModal End Sub Private Sub mnuUser_Click() frmUser. Show vbModal End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib. Button) spot eluding Button. Index fount 3 foreknow mnufind_Click Case 5 Popup identity card mnuTransaction, , Button. Left, (Button. merry-go-round + Button. Height) Case 7 PopupMenu mnuReport, , Button. Left, (Button. Top + Bu tton. Height) Case 9 PopupMenu mnuAccount, , Button. Left, (Button. Top + Button. Height) Case 11 PopupMenu mnuHelp, , Button. Left, (Button. Top + Button. Height) Case 13 Dim reply reply = MsgBox(Do you want to Quit this program? , vbYesNo + vbQuestion, Confirm Quit) If reply = vbYes Then End End If misconduct Cancel = -1 End hold End Sub C. Transaction Page Private Sub cmdAdd_Click() Grid_DblClick cmdEditItems. Enabled = True cmdRemove. Enabled = True End Sub Private Sub cmdCalculator_Click() flap calc. exe, vbMaximizedFocus End Sub Private Sub cmdClose_Click() grouse SQLDB1(AdoSales, recognise * from Sales) Me. AdoSales. think If Val(Me. txtTotalCost. schoolbook) = 0 Then Unload Me Else If Me. txtCustomerName. text edition = Then MsgBox delight complete data before closing. , vbInformation, Information Else With Me. AdoSales . call up .Recordset.AddNew .Recordset. Fields(SalesNumber) = Me. txtSalesNumber. textbook . Recordset. Fields(CustomerNumber) = Me. txtCustomerNu mber. textbook . Recordset. Fields(CustomerName) = Me. txtCustomerName. text . Recordset. Fields(Datepurchased) = Me. dtDate. apprize .Recordset. Fields(DeliveryDate) = Me. DTDelivery. Value .Recordset. Fields(DeliveryStatus) = Me. txtDeliverySatus. school text . Recordset. Fields(TotalCost) = Me. txtTotalCost. text .Recordset. Fields(total) = Me. textual matter3. text .Recordset. Fields(Discount) = Me. textbook2. schoolbook .Recordset. Fields(AmountPaid) = Me. txtAmountPaid. text edition .Recordset.Fields(Balance) = Me. txtBalance. text .Recordset. Update .Refresh Unload Me End With End If End If End Sub Private Sub cmdEditItems_Click() Me. AdoItems. Refresh Me. AdoItems. Recordset. Find (ItemNumber = &038 Me. AdoSalesInfo. Recordset. Fields(ItemNumber) &038 ) frmEditItems. txtinfo(0). text = Me. AdoSalesInfo. Recordset. Fields(SalesNumber) frmEditItems. txtinfo(1). textbook = Me. AdoSalesInfo. Recordset. Fields(Date) frmEditItems. txtinfo(2). textbook = Me. AdoSalesInfo. Recordset. Fields(ItemNumber) frmEditItems. txtinfo(3). text = Me. AdoSalesInfo. Recordset. Fields(ItemName) frmEditItems. txtinfo(4). textbook = Me. AdoSalesInfo. Recordset. Fields(Qty) frmEditItems. txtinfo(5). Text = Me. AdoSalesInfo. Recordset. Fields(UnitPrice) frmEditItems. txtinfo(6). Text = Me. AdoSalesInfo. Recordset. Fields(TotalPrice) frmEditItems. Show vbModal End Sub Private Sub cmdNew_Click() On Error Resume Next cmdEditItems. Enabled = irrational cmdRemove. Enabled = fictitious Call SQLDB1(AdoSales, hold * from Sales) Me. AdoSales. Refresh If Val(Me. txtTotalCost. Text) = 0 Then Else If Me. txtCustomerName. Text = Then MsgBox Please complete data before closing. , vbInformation, Information Else With Me. AdoSales .Refresh .Recordset.AddNew .Recordset. Fields(SalesNumber) = Me. txtSalesNumber. Text . Recordset. Fields(CustomerNumber) = Me. txtCustomerNumber. Text . Recordset. Fields(CustomerName) = Me. txtCustomerName. Text . Recordset. Fields(Datepurchased) = Me. dtDate. Value .Recordset. Fields(DeliveryDate) = Me. DTDelivery. Value .Recordset. Fields(DeliveryStatus) = Me. txtDeliverySatus. Text . Recordset. Fields(TotalCost) = Me. txtTotalCost. Text .Recordset. Fields(AmountPaid) = Me. txtAmountPaid. Text .Recordset. Fields(Discount) = Me. Text2. Text .Recordset. Fields(Balance) = Me. txtBalance. Text .Recordset.Fields(total) = Me. Text3. Text .Recordset. Update .Refresh Me. txtCustomerName. Locked = specious Me. txtCustomerNumber. Locked = simulated Me. txtCustomerName. Text = Me. txtCustomerNumber. Text = Me. txtAmountPaid. Text = 0. 00 Call SQLDB1(frmNewSales. AdoSales, recognize * from Sales) Call SQLDB2(frmNewSales. adoCustomer, fill * from Customer order by CustomerName) If frmNewSales. AdoSales. Recordset. RecordCount >= 0 And frmNewSales. AdoSales. Recordset. RecordCount < 9 Then frmNewSales. txtSalesNumber. Text = 00000 &038 frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales.AdoSales. Recordset. Reco rdCount >= 9 And frmNewSales. AdoSales. Recordset. RecordCount < 99 Then frmNewSales. txtSalesNumber. Text = 0000 &038 frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount >= 99 And frmNewSales. AdoSales. Recordset. RecordCount < 999 Then frmNewSales. txtSalesNumber. Text = 000 &038 frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount >= 999 And frmNewSales. AdoSales. Recordset. RecordCount < 9999 Then frmNewSales. txtSalesNumber. Text = 00 &038 frmNewSales.AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount >= 9999 And frmNewSales. AdoSales. Recordset. RecordCount < 99999 Then frmNewSales. txtSalesNumber. Text = 0 &038 frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount >= 99999 And frmNewSales. AdoSales. Recordset. RecordCount > 999999 Then frmNewSales. txtSalesNu mber. Text = frmNewSales. AdoSales. Recordset. RecordCount + 1 End If frmNewSales. txtAmountPaid. Text = 0. 00 frmNewSales. txtBalance. Text = 0. 00 frmNewSales. txtTotalCost. Text = 0. 00 rmNewSales. Text3. Text = 0. 00 frmNewSales. txtDeliverySatus. Text = Undelivered frmNewSales. dtDate. Value = date frmNewSales. DTDelivery = date Me. cmdNew. Enabled = treacherously Me. cmdNewCustomer. Enabled = True Me. cmdPayment. Enabled = counterfeit Me. cmdReciept. Enabled = bogus Me. cmdEditItems. Enabled = mendacious Me. cmdRemove. Enabled = False Call SQLDB3(AdoItems, Select * from Items where RemainingQty 0) Call SQLDB(AdoSalesInfo, Select * from SalesInfo where SalesNumber= &038 Me. txtSalesNumber. Text &038 ) AdoSalesInfo. Refresh AdoItems. Refresh Me. cmdNew. Enabled = True Set Grid2. DataSource = AdoSalesInfoGrid2. Columns(1). visual = False Grid2. Columns(2). visible = False Grid2. Columns(5). NumberFormat = 0. 00 Grid2. Columns(6). NumberFormat = 0. 00 Set Grid. DataSource = AdoItems Grid. Columns(0). visual = False Grid. Columns(2). glaring = False Grid. Columns(5). visual = False Grid. Columns(6). visual = True Me. txtCustomerName. Locked = False Me. txtCustomerName. Locked = False lblChange. caption = 0. 00 Me. txtCustomerName. Text = Me. txtCustomerNumber. Text = Me. txtAmountPaid. Text = 0. 00 Me. txtCustomerName. Locked = False Me. txtCustomerNumber. Locked = False Me. txtCustomerName. Text = Me. txtCustomerNumber. Text = Me. txtAmountPaid. transparent = True Unload Me End With End If End If End Sub Private Sub cmdNewCustomer_Click() With frmNewCustomer If Me. adoCustomer. Recordset. RecordCount >= 0 And Me. adoCustomer. Recordset. RecordCount < 9 Then . txtinfo(0). Text = 00000 &038 Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustomer. Recordset. RecordCount >= 9 And Me. adoCustomer. Recordset. RecordCount < 99 Then . txtinfo(0). Text = 0000 &038 Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustom er. Recordset. RecordCount >= 99 And Me. doCustomer. Recordset. RecordCount < 999 Then . txtinfo(0). Text = 000 &038 Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustomer. Recordset. RecordCount >= 999 And Me. adoCustomer. Recordset. RecordCount < 9999 Then . txtinfo(0). Text = 00 &038 Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustomer. Recordset. RecordCount >= 9999 And Me. adoCustomer. Recordset. RecordCount < 99999 Then . txtinfo(0). Text = 0 &038 Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustomer. Recordset. RecordCount >= 99999 And Me. adoCustomer. Recordset.RecordCount > 999999 Then . txtinfo(0). Text = Me. adoCustomer. Recordset. RecordCount + 1 End If .Show vbModal End With End Sub Private Sub cmdPayment_Click() If Me. AdoSalesInfo. Recordset. RecordCount = 0 Then MsgBox You cannot proceed to payment because there is no item in your sales item list , vbExclamation, Error Else frmPayment. txtBalance. Text = Me. txtBalance. Text frmPayment. Text3. Text = Me. txtTotalCost. Text frmPayment. txtChange. Text = 0. 00 frmPayment. txtPayment. Text = 0 frmPayment. Show vbModal End If End Sub Private Sub cmdReciept_Click() If Me. AdoSalesInfo. Recordset.RecordCount = 0 Then MsgBox thither is no item , vbExclamation, StonePro System Else If Me. txtCustomerName. Text = Or Me. txtDeliverySatus. Text = Then MsgBox Please supply personal data before you view the receipt. , vbInformation, Information Else Set Rpt recognize. DataSource = Me. AdoSalesInfo RptReceipt. Refresh RptReceipt. Sections(Section2). Controls(lblSalesNumber). furnish = frmNewSales. txtSalesNumber. Text RptReceipt. Sections(Section2). Controls(lblTotalCost). furnish = Format(frmNewSales. Text3. Text, ,0. 00) RptReceipt. Sections(Section2). Controls(lblCustomerNumber). provide = frmNewSales. txtCustomerNumber. Text RptReceipt. Sections(Section2). Controls(lblCustomerName). legend = frmNewSales. txtCustomerName. Text RptReceipt . Sections(Section2). Controls(lblDatePurchased). Caption = frmNewSales. dtDate. Value RptReceipt. Sections(Section2). Controls(lblDeliveryDate). Caption = frmNewSales. DTDelivery. Value RptReceipt. Sections(Section2). Controls(lblDis). Caption = Format(frmNewSales. Text2. Text, ,0. 00) RptReceipt. Sections(Section2). Controls(lblAmountPaid). Caption = Format(frmNewSales. txtPayment. Text, ,0. 00) RptReceipt.Sections(Section2). Controls(lblBalance). Caption = Format(frmNewSales. txtBalance. Text, ,0. 00) RptReceipt. Sections(Section2). Controls(lblChange). Caption = Format(frmNewSales. lblChange. Caption, ,0. 00) cmdNew. Enabled = True RptReceipt. Show 1 End If End If End Sub Private Sub cmdRemove_Click() Dim reply reply = MsgBox(Are you sure you want to remove this item to sales list? , vbYesNo + vbQuestion, Confirmation to Remove) If reply = vbYes Then frmNewSales. AdoItems. Refresh Call SQLDB3(AdoItems, Select * from Items) frmNewSales. AdoItems. Recordset. Find (ItemNumber= &03 8 Me. AdoSalesInfo.Recordset. Fields(ItemNumber) &038 ) frmNewSales. AdoItems. Recordset. Fields(RemainingQty) = Val(frmNewSales. AdoItems. Recordset. Fields(RemainingQty)) + Me. AdoSalesInfo. Recordset. Fields(Qty) frmNewSales. AdoItems. Recordset. Update frmNewSales. AdoItems. Refresh frmNewSales. txtTotalCost. Text = Format(Val(frmNewSales. txtTotalCost. Text) Me. AdoSalesInfo. Recordset. Fields(TotalPrice), 0. 00) frmNewSales. txtBalance. Text = Format(Val(frmNewSales. txtBalance. Text) Me. AdoSalesInfo. Recordset. Fields(TotalPrice), 0. 00) frmNewSales. AdoSalesInfo. Recordset. Delete frmNewSales.AdoSalesInfo. Refresh Call SQLDB3(AdoItems, Select * from Items where RemainingQty 0) Call SQLDB(AdoSalesInfo, Select * from SalesInfo where SalesNumber= &038 Me. txtSalesNumber. Text &038 ) AdoSalesInfo. Refresh AdoItems. Refresh Me. cmdNew. Enabled = True Set Grid2. DataSource = AdoSalesInfo Grid2. Columns(1). glaring = False Grid2. Columns(2). distinct = False Grid2. Columns(5) . NumberFormat = 0. 00 Grid2. Columns(6). NumberFormat = 0. 00 Set Grid. DataSource = AdoItems Grid. Columns(0). Visible = False Grid. Columns(2). Visible = False Grid. Columns(5). Visible = False If Me. AdoSalesInfo. Recordset.RecordCount = 0 Then Me. cmdEditItems. Enabled = False Me. cmdRemove. Enabled = False Me. cmdPayment. Enabled = False End If Else End If End Sub Private Sub Form_Load() On Error Resume Next Call SQLDB3(AdoItems, Select * from Items where RemainingQty 0) Call SQLDB(AdoSalesInfo, Select * from SalesInfo where SalesNumber= &038 Me. txtSalesNumber. Text &038 ) Call SQLDB2(frmNewSales. adoCustomer, Select * from Customer Order by CustomerName) adoCustomer. Refresh AdoSalesInfo. Refresh AdoItems. Refresh Me. cmdNew. Enabled = True Set Grid2. DataSource = AdoSalesInfo Grid2. Columns(1). Visible = False Grid2. Columns(2).Visible = False Grid2. Columns(5). NumberFormat = 0. 00 Grid2. Columns(6). NumberFormat = 0. 00 Set Grid. DataSource = AdoItems Grid. Columns(0). V isible = False Grid. Columns(2). Visible = False Grid. Columns(5). Visible = False Grid. Columns(6). Visible = True Grid2. Refresh Call setgrid Call settext Call setgrid lblTotal. Caption = Total Number of Records &038 Me. AdoSalesInfo. Recordset. RecordCount End Sub Private Sub setgrid() Set Me. Grid2. DataSource = Me. AdoSalesInfo Grid. Columns(0). Visible = False Grid. Columns(2). Visible = False Grid. Columns(3). Visible = False Grid. Columns(4). Visible = FalseGrid. Columns(5). Visible = False Grid. Columns(6). Visible = True End Sub Private Sub Grid_DblClick() With frmSalesConfirm .txtinfo(0). Text = Me. txtSalesNumber. Text .txtinfo(1). Text = Me. dtDate. Value .txtinfo(2). Text = Me. AdoItems. Recordset. Fields(ItemNumber) . txtinfo(3). Text = Me. AdoItems. Recordset. Fields(ItemName) . txtinfo(4). Text = 0 .txtinfo(5). Text = Me. AdoItems. Recordset. Fields(UnitPrice) . txtinfo(6). Text = 0. 00 If Me. AdoItems. Recordset. Fields(Unit) = Kilo Then .Label5. Caption = Quantit y End If .Show vbModal End With End Sub Private Sub lvButtons_H3_Click()Unload Me End Sub Private Sub Text1_Change() On Error Resume Next Me. AdoItems. Refresh Me. AdoItems. Recordset. Filter = ItemName LIKE &038 LCase(Me. Text1. Text) &038 * Call settext Call setgrid If Me. Text1. Text = Then Me. AdoItems. Refresh setgrid End If End Sub Private Sub txtAmountPaid_Change() If Val(Me. txtAmountPaid. Text) < Val(Me. txtTotalCost. Text) Then MsgBox Amount paid is lower than its total cost. , vbExclamation, Stone Pro System Me. txtAmountPaid. Text = 0. 00 Else Me. txtBalance. Text = Format(Val(Me. txtTotalCost. Text) Val(Me. txtAmountPaid. Text), 0. 00) End If End SubPrivate Sub txtAmountPaid_KeyPress(KeyAscii As Integer) If KeyAscii = 8 Then issuance Sub End If If KeyAscii = 46 Then Exit Sub End If If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0 End If End Sub Private Sub txtCustomerName_Change() On Error Resume Next Me. adoCustomer. Refresh Me. adoCustomer. Recordset. Fin d (CustomerName = &038 Me. txtCustomerName. Text &038 ) Me. txtCustomerNumber. Text = Me. adoCustomer. Recordset. Fields(CustomerNumber) End Sub Private Sub txtCustomerNumber_KeyPress(KeyAscii As Integer) KeyAscii = False End Sub Private Sub txtDeliverySatus_KeyPress(KeyAscii As Integer) KeyAscii = False End SubConfirm Transaction Private Sub Check1_Click() If Check1. Value = 1 Then Me. Text2. Text = Format(Val(Me. Text3. Text * 0. 1), ,0. 00) Me. Text1. Text = Format(Me. Text2. Text, ,0. 00) Exit Sub End If If Check1. Value = 0 Then Me. Text1. Text = 0. 00 Me. Text1. Text = Format(Val(Me. txtPayment. Text) Val(Me. Text2. Text), ,0. 00) Exit Sub End If End Sub Private Sub cmdClose_Click() frmNewSales. lblChange. Caption = Me. Text4. Text frmNewSales. Text2. Text = Me. Text1. Text Unload Me End Sub Private Sub cmdOk_Click() Dim reply reply = MsgBox(Are you sure of this payment?. Payment can be done only once in this transaction. , vbQuestion + vbYesNo, Confirmation) If reply = vbYe s Then If Val(Me. txtPayment) Val(frmNewSales. txtTotalCost) Then Me. txtBalance. Text = 0. 00 Me. cmdOk. Enabled = False frmNewSales. txtBalance. Text = 0. 00 frmNewSales. txtPayment. Text = Val(Me. txtPayment) Me. Text4. Text = Format(Val(Me. txtPayment) Val(Text3. Text) + Val(Text1. Text), ,0. 00) frmNewSales. txtAmountPaid. Visible = False frmNewSales. cmdReciept. Enabled = True frmNewSales. cmdPayment. Enabled = False frmNewSales. cmdEditItems. Enabled = False frmNewSales. cmdRemove. Enabled = False frmNewSales. Text3. Text = Format(Val(Text3.Text) Val(Text1. Text), ,0. 00) Me. Text1. Text = 0. 00 Else Me. txtBalance. Text = Format(Val(Me. txtPayment) Val(Me. Text3. Text) Val(Me. Text1. Text), ,0. 00) Me. txtChange. Text = 0. 00 Me. cmdOk. Enabled = False frmNewSales. txtBalance. Text = Format(Val(Me. txtPayment) Val(Me. Text3. Text) Val(Me. Text1. Text), ,0. 00) frmNewSales. txtBalance. Text = Format(Val(Me. Text3) Val(Me. txtPayment. Text) Val(Me. Text1. Text), ,0. 0 0) frmNewSales. lblChange. Caption = 0. 00 frmNewSales. txtAmountPaid. Text = Val(Me. txtPayment) frmNewSales. txtPayment. Text = Val(Me. xtPayment) frmNewSales. cmdReciept. Enabled = True frmNewSales. cmdPayment. Enabled = False frmNewSales. cmdEditItems. Enabled = False frmNewSales. cmdRemove. Enabled = False frmNewSales. Text3. Text = Format(Val(Text3. Text) Val(Text1. Text), ,0. 00) Me. Text1. Text = Format((frmNewSales. Text3. Text), ,0. 00) frmNewSales. Text2. Text = Me. Text1. Text End If Else End If If Check1. Value = 1 Then Me. Text2. Text = Format(Val(Me. Text3. Text * 0. 1), ,0. 00) Me. Text1. Text = Format(Me. Text2. Text, ,0. 00) Exit Sub End If If Check1. Value = 0 Then frmNewSales. Text2. Text = 0. 00 Me. Text1.Text = 0. 00 Exit Sub End If End Sub Private Sub txtPayment_Change() If Check1. Value = 1 Then Me. Text2. Text = Format(Val(Me. Text3. Text * 0. 1), ,0. 00) Me. Text1. Text = Format(Me. Text2. Text, ,0. 00) Exit Sub End If If Check1. Value = 0 Then Me. Text1. Text = 0. 00 Exit Sub End If End Sub 4. 7 Program Output pic 4. 8 User manual of arms Title Automated Sales and Inventory System of Stone Pro Enterprise Table of Contents 1. Introduction 1. 1 System Requirements 1. 1. 1 Hardware 1. 1. 1. 1 Desktop 1. 1. 1. 2 Display 1. 1. 1. 3 Cash Drawer 1. 1. 1. 4 Receipt Printer 1. 1. 2 Software 1. 2 Convention 2. Getting Started . 1 Member Log in 2. 2 do Transaction 3. Software Features 4. Message Boxes 5. User Interface Parts, Text boxes and Buttons 1. Introduction Most Large retail stores have migrated from the old trusty cash register to more modern computerized point of sale (POS) systems. This application Guide explores computerized POS technology and provides a roadmap for Stone Pro Enterprise. 1. 1 System Requirements 1. 1. 1 Hardware If you are a computer user, youre no doubt familiar with the most common desktop peripherals the keyboard, mouse. Blue Link Technology systems are based on ordinary desktop computer and operating system . 1. 1. 1. Desktop Desktop with coarser but quieter fans to minimize heat and noise. ominous duty power supply that remnant longer than the standard items. Hard drive doesnt have to be in large capacity but it has to be reliable. We also want to ensure that youre using good surge protector and UPS ( battery backup) to prevent power related crashes. 1. 1. 1. 2. Display At the very least, youll need a basicmonitorat your POS to see what youre doing. jotting screenshave become a more popular and affordable option these days since they are a user hail-fellow-well-met option that can help speed up the checkout process.Adding customer-facingandpole displayswill offer a clearer customer friendship and are a great way to promote special offers to customers while they are in line. 1. 1. 1. 3. Cash Drawer They may be the simplest peripheral in a POS system, butcash drawersare still an essential part of your system. You need to have a secure place to keep cash, checks 1. 1. 1. 4. Receipt Printer all(prenominal) transaction ends with a receipt for the customer straight from areceipt printer. Having a printer go down is one of the most crippling things to any POS system. make sure you have a printer thatll support your print volume and is easy to use is essential.Most printers are thermal based so you dont even have to deal with ribbon cartridges anymore. Just load the paper and you are back up and running Whatever your receipt size or type requirements are, theres a printer to fit your needs. There are numerous types of receipt printers, categorized like any other computer printer by its create technology and its computer interface. 1. 1. 2. Software ThePOS softwareby Blue Link Technology is the brains of Stone Pro Enterprise POS system. 1. 2 Convention Double Click adjoin to user action Log in Window Refer to user interfaceLog in Button Refer to object Enter Key Refer to Keyboard key 2. 0 Getting Started I. Daily Start-Up 1. Turn the Computer ON Press the ON/ complete button. (On top of the computer for Stone Pro Enterprise. ) WAIT. It will take a few moments but eventually Stone Pro Enterprise System and an Address hunt application will automatically draw up. A desktop with icons will advance including pic A Login screen will place pic 2. Sign on to the System a) When the security system Login screen appears, User ID = (ask for an access code to the admin assign ) unless you have been assigned something else.Password = the password you selected. It will NOT appear for security reasons. ENTER b) The Main Desktop will appear pic II. Start of transubstantiation A. Cash Register Processing. 1. Press the Transaction Menu button. 2. Select TRANSACTION then tender SALE. pic ( You are now ready to cause Cash Register Operations. ) III. End of Shift A. Clerk Out Start at the Transaction screen. Press CLOSE to Exit from the Transaction Screen. IV. End of Day In the evening you will need to 1. admit the cash drawer open. 2. Close Ston e Pro Enterprise System Main Page 3. Exit Stone Pro Enterprise System. 4.Turn off the computer. After you coda the End of Shift procedure, complete the side by side(p) A. Log Off of Stone Pro Enterprise System 1. At the main Stone Pro Enterprise System desktop B. closed Down the Computer 1. Select the Start button in the lower left hand corner. 2. Select Shut Down from the list. A Shut Down Windows window will appear. 3. Select Shut Down from the drop down list. The monitor will go black and say No Sync for a bit. CHAPTER 5 FINDINGS, CONCLUSIONS AND RECOMMENDATION In this chapter states the thick of findings, conclusion and recommendation. 4. 1 Summary of FindingsPoint of Sale System for Stone Pro Enterprise aims to develop an expert system that would change the emergence of Point of Sale and maximize the capabilities. It shows how efficient accurate and well function, the point of sale compared to manual registry. 4. 2 resultant We conclude that the research has shown that th e study can be useful for the company Stone Pro Enterprise. In this study considering all the factors affecting. 4. 3 Recommendation The Researchers recommend this Point of Sale System of Stone Pro Enterprise to be used in interested establishment in improving and helping people retail their products. BIBLIOGRAPHY