Amy Winehouse and Adele Contrast/ Comparison

Amy Winehouse and Adele are the two Englishwomen that have dominated   the UK music industry in the past few years and their impact on the global scene has made them equally memorable and inspiring. They stamped British music forever through their vintage looks but more so through their powerful voices and distinct genres. Winehouse and Adele are both white girls who owe a debt to black soul music.The distinction between them is emphasized more so through their best works, the albums ( Winehouse's † Back to Black† and Adele's † 19†³) that forever transitioned them from London's Brit art school performers(where they were alumni)to successful artists. Without a doubt, the albums these artists created are considered great achievements of our era and the most complex masterpieces of our time. They reflect these ladies' heartbreak due to failed relationships through a mesmerizing but rich sound topped by a distinct musical and lyrical style.Adele's album is simple and clean, less menacing whereas Amy's is a little slight more edgy and memorable. The album â€Å"19† encompasses a bright acoustic-guitar chime, with a lullaby twinkle of plush strings and Adele's mesmerizing  singing tone, honest lyrics, jazz and soul influences evokes Amy's. Adele's delivery is accomplished through a more delicate bluesy tone whereas Amy's is represented by a brick house jazzy expressiveness far beyond our time. Adele is simpler lyrically and occasionally even soppy and somehow redundant lyrically, she doesn't have the mature poetic heritage that Amy does.Talented writers and composers these two muses beautifully show through their lyrics a deep attachment to the lost love and the disappointments that follow its course. â€Å"Back to Black† sounds emotionally and musically true. All eleven songs seem like great lost classics from the 60s : â€Å"Rehab†Ã‚  has many shades of Motown and contemporary twists, â€Å"Me and Mr. Jones† be longs to the swing era of the 60s and   Ã¢â‚¬Å"Loving Is A Losing Game† is a stunning soul ballad with a vintage finish.Winehouse's songs are snappily written with a mix of bitterly caustic lyrics and finger popping tunes, then delivered in a voice that alternates sexy smouldering with dismissive contempt. In the song  Ã¢â‚¬Å"You know I'm No Good†, she's unapologetic about her unfaithfulness but she can also be witty, as on â€Å"Me & Mrs Jones† when she berates a boyfriend with â€Å"You made me miss the Slick Rick gig†. Some will find Adele rigidly old-fashioned with influences (Etta James, Billie Holiday) from another age and her album truly shows that forgotten era.Amy's   influence of girl groups from the 50s   and early 60s is plain: plinky keyboards, parpy brass, trebly guitar. A cursory listen to† 19†³may lead us to conclude that Adele has not just a voice but an appearance way in excess of her years. The same can be said about Wi nehouse except she's   more daring not just appearance wise but vocally and   lyrically as well and through her writings she evokes more depth. The music poures out of Amy a stream of weathered, seasoned phrases, seemingly without effort and â€Å"Back to Black†, is a more soulful and stripped album than Adele's.Strong one moment then fragile the next, † 19†³   is an album that is dominated by highlights dripping with beauty and class. On the other hand   Ã¢â‚¬Å"Back to Black† is flawless and classic and represents the artist's true masterpiece. It's not that â€Å"Back to Black† is better as an overall album but besides being a door opener for many artists its appearance  on the British scene was necessary so we can have Adele's â€Å"19†. British singer Adele has credited Winehouse's success in the USA and more so for making her journey smoother. Winehouse reacquainted an audience with a long forgotten genre by overcoming the vintage aspect.After the release of â€Å"Back to Black†, record companies sought out artists with a similar sound but also fearless and experimental female musicians. Winehouse revitalized   British music forever and influenced British female artists like Adele, Duffy, Emeli   Sande, Misha B. , Jessie J. , Paloma Faith and Florence Welch. These musicians can all be traced back to Winehouse in terms of attitude, musical styles and fashion. Adele's voice caresses and inspires and she sings with unabashed passion about a kind of pain we can all recognize.Amy's voice on the other side is full of soul and characterized by a sultry sound and she delivers amazingly strong and timeless performances that once heard can never be forgotten. Songs like † Me and Mr. Jones† and â€Å"Tears Dry On Their Own† really show her capability to seamlessly go from soul to jazz and back to soul all the while evoking that spirit that is essential in emphasizing her sophisticated and thrilling musical style. Different as they seem – in the way they evolved musically and vocally- these two divas have much in common.Under everything else they both achieved success at an early age through their mutual passion for music and their indisputable talent. Their originality and soulful mannerism is clearly evoked in their albums. Amy and Adele didn't just pave the road for new British artists but have beautifully   reinstated   love as a main theme of our musical era through their deep songs. Two Grammy winners, with retro contemporary sounds they had forever changed people's   outlook on music and will remain the most acclaimed musical game changers of our century. Amy Winehouse and Adele Contrast/ Comparison Amy Winehouse and Adele are the two Englishwomen that have dominated   the UK music industry in the past few years and their impact on the global scene has made them equally memorable and inspiring. They stamped British music forever through their vintage looks but more so through their powerful voices and distinct genres. Winehouse and Adele are both white girls who owe a debt to black soul music.The distinction between them is emphasized more so through their best works, the albums ( Winehouse's † Back to Black† and Adele's † 19†³) that forever transitioned them from London's Brit art school performers(where they were alumni)to successful artists. Without a doubt, the albums these artists created are considered great achievements of our era and the most complex masterpieces of our time. They reflect these ladies' heartbreak due to failed relationships through a mesmerizing but rich sound topped by a distinct musical and lyrical style.Adele's album is simple and clean, less menacing whereas Amy's is a little slight more edgy and memorable. The album â€Å"19† encompasses a bright acoustic-guitar chime, with a lullaby twinkle of plush strings and Adele's mesmerizing  singing tone, honest lyrics, jazz and soul influences evokes Amy's. Adele's delivery is accomplished through a more delicate bluesy tone whereas Amy's is represented by a brick house jazzy expressiveness far beyond our time. Adele is simpler lyrically and occasionally even soppy and somehow redundant lyrically, she doesn't have the mature poetic heritage that Amy does.Talented writers and composers these two muses beautifully show through their lyrics a deep attachment to the lost love and the disappointments that follow its course. â€Å"Back to Black† sounds emotionally and musically true. All eleven songs seem like great lost classics from the 60s : â€Å"Rehab†Ã‚  has many shades of Motown and contemporary twists, â€Å"Me and Mr. Jones† be longs to the swing era of the 60s and   Ã¢â‚¬Å"Loving Is A Losing Game† is a stunning soul ballad with a vintage finish.Winehouse's songs are snappily written with a mix of bitterly caustic lyrics and finger popping tunes, then delivered in a voice that alternates sexy smouldering with dismissive contempt. In the song  Ã¢â‚¬Å"You know I'm No Good†, she's unapologetic about her unfaithfulness but she can also be witty, as on â€Å"Me & Mrs Jones† when she berates a boyfriend with â€Å"You made me miss the Slick Rick gig†. Some will find Adele rigidly old-fashioned with influences (Etta James, Billie Holiday) from another age and her album truly shows that forgotten era.Amy's   influence of girl groups from the 50s   and early 60s is plain: plinky keyboards, parpy brass, trebly guitar. A cursory listen to† 19†³may lead us to conclude that Adele has not just a voice but an appearance way in excess of her years. The same can be said about Wi nehouse except she's   more daring not just appearance wise but vocally and   lyrically as well and through her writings she evokes more depth. The music poures out of Amy a stream of weathered, seasoned phrases, seemingly without effort and â€Å"Back to Black†, is a more soulful and stripped album than Adele's.Strong one moment then fragile the next, † 19†³   is an album that is dominated by highlights dripping with beauty and class. On the other hand   Ã¢â‚¬Å"Back to Black† is flawless and classic and represents the artist's true masterpiece. It's not that â€Å"Back to Black† is better as an overall album but besides being a door opener for many artists its appearance  on the British scene was necessary so we can have Adele's â€Å"19†. British singer Adele has credited Winehouse's success in the USA and more so for making her journey smoother. Winehouse reacquainted an audience with a long forgotten genre by overcoming the vintage aspect.After the release of â€Å"Back to Black†, record companies sought out artists with a similar sound but also fearless and experimental female musicians. Winehouse revitalized   British music forever and influenced British female artists like Adele, Duffy, Emeli   Sande, Misha B. , Jessie J. , Paloma Faith and Florence Welch. These musicians can all be traced back to Winehouse in terms of attitude, musical styles and fashion. Adele's voice caresses and inspires and she sings with unabashed passion about a kind of pain we can all recognize.Amy's voice on the other side is full of soul and characterized by a sultry sound and she delivers amazingly strong and timeless performances that once heard can never be forgotten. Songs like † Me and Mr. Jones† and â€Å"Tears Dry On Their Own† really show her capability to seamlessly go from soul to jazz and back to soul all the while evoking that spirit that is essential in emphasizing her sophisticated and thrilling musical style. Different as they seem – in the way they evolved musically and vocally- these two divas have much in common.Under everything else they both achieved success at an early age through their mutual passion for music and their indisputable talent. Their originality and soulful mannerism is clearly evoked in their albums. Amy and Adele didn't just pave the road for new British artists but have beautifully   reinstated   love as a main theme of our musical era through their deep songs. Two Grammy winners, with retro contemporary sounds they had forever changed people's   outlook on music and will remain the most acclaimed musical game changers of our century.

Point of Sale and Inventory System

ABSTRACT Title: Point of Sale System for Stone Pro Enterprise Researchers: Serolf, Jham Year : 2013 Course: Computer Science Technology Adviser: CHAPTER 1 THE PROBLEM AND ITS BACKGROUND 1. 1 Introduction Man have come a long way in doing business transactions with each other. From the primitive ways of exchanging goods or â€Å"barter system†, to the more complex â€Å"e-commerce† or doing business transactions with the help of the internet. With technology rapidly changing and upgrading every now and then, companies must adopt to be able to excel in each businesses’ â€Å"cut-throat† competition.Automation of one’s point of sale and inventory system puts you a step ahead in the game. It helps you conduct business transactions with ease as you only have to press a few keys. It liberates you from countless paper works as computation of the day’s sale and keeping track of inventory are done automatically. With these things in mind, we, the Blue Link Technology group , hopes that upon completion of this Proposed Point of Sale and Inventory System, Stone Pro Enterprise will find it of great value and an indispensable asset in the company.That through the use of this System, unnecessary loss of time spent on computation of payments will be minimized and greater client satisfaction will be achieved. On the part of the management, knowing which products are in need of procurement and which are not, will help avoid over stocking and greatly minimize unnecessary expenses. At the end of the day, all transactions will be properly documented and generation of reports will just be a few keystrokes away.Finally, we hope that with the development of the said System, we will be able to help Stone Pro Enterprise become a company more competitive and quality wise, worthy of recognition in the local industry. 1. 2 Background and purpose of the study Most companies nowadays use computers in transacting with their clients. Companies are now making their systems computerized because using a computerized system will help the company minimize the time and efforts consumed by using manual system.Stone Pro Enterprise provide not only cleaning services for your natural stones flooring, but also offer wide variety of floor care supplies and products. A sale refers to the exchange of product or services for an amount of money or its equivalent while Inventory in a business, is a total amount of goods and the act of counting them. A company owner must know the precise number of items in their storage areas in order to place orders and control losses. Computerizing both Sales and Inventory System will make an easier and faster transaction with the customers as well as monitoring the stocks of the products.The benefit of Point of Sale with Inventory system is that this system makes a business much more efficient, lowering the costs of running the business while improving customer service and making the business more pleasant to work in while Computerized inventory system helps management control the inventories, in turn lowering overall operating costs in the areas of labor, facilities and logistics. A computerized inventory system also improves customer-service metrics and fulfillment rates. 1. 3 Theoretical Framework The study is for Stone Pro Enterprise by using â€Å"Visual Basic† that were relatively easy to learn and use.The researchers were able to analyze the speed properties. Analyzing the point of sale design and code; it is important because the study needs to have a quality for the transaction to be accepted and a good imitator of transaction. The study use IPO chart on knowing the output of the study. The input will be a design and code. The input will pass through several process. These are the speed of transaction. 1. 4 Conceptual Framework Figure 1 Research Paradigm Point of Sale System Stone Pro Enterprise 1. 5 Statement of the Problem Stone Pro Enterprise System requires some compu ter literacy on the user part.It's not trivial investment in time or money to set up. If the user doesn't have basic knowledge then the technical requirements of this POS system may baffle him. Ignoring normal practices the this POS system will confound and frustrate each user. The whole idea 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 can bring a tremendous advantages. 1. 6 Hypothesis This study is intended to design and develop a Computerized Point of Sale System for Stone Pro Enterprise 2013. Specifically, this study aims: . To minimize the effort of the staff in in processing the on Stock Inventory 2. To make an efficient and accurate computation of cash Registry 3. To create a well-arranged database and to implement strong security of the system for data security. 1. 7 Significance of the Study To Admin Department The proposed system will help the admin section of St uff the Buss School Supplies. It will help to lessen the time and effort of the payroll maker/bookkeeper preparing payments of employees. The System develop can accommodate changing figures and produce a paperless environment through well design database.To Proponents This study will help the proponents to enhance the ability on how to create an understandable computerized system in an easy way. This will serve to the proponents as a challenge to do a better system. To the other Researcher This study gives knowledge to the researcher on how to create a Computerized System in understandable way. This will serve as a fresh ground for the researcher whose study will be related in the field of Information Technology. 1. 8 Scope and Limitation 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 cash registry records safety and computing the exact daily revenue. Th e proposed computerized Point of Sale System is expected to generate receipts and report list of daily and monthly revenue. Limitation The proposed Computerized Point of Sale System for Stone Pro Enterprise does not support network topology implementation and online program or online transaction. 1. 7 Definition of Terms Point of Sale – or  checkout  is the place where a transaction occurs in exchange for goods or services.The point of sale often refers to the physical electronic cash register or dedicated POS hardware used for checkout, but the POS is simply the location where the sale is conducted, money changes hands and a receipt is given. Transaction –   an agreement, communication, or movement carried out between a buyer and a seller to exchange an asset for payment. Cash Register – is a mechanical or electronic device for calculating and recording sales transactions, and an attached  cash drawer  for storing  cash. The cash register also usual ly prints a  receipt  for the customer.Inventory Control System –   is a process for managing and locating objects or materials. Computer Software –   is a collection of  computer programs  and related  data  that provides the instructions for telling a  computer  what to do and how to do it. Computer Hardware – equals the collection of physical elements that comprise a  computer  system. Computer System – A complete, working  computer. Computer systems will include the computer along with any  software  and  peripheral devices  that are necessary to make the computer function Program – is a sequence of  instructions  written to perform a specified task with a  computer.CHAPTER 2 REVIEW OF THE RELATED LITERATURE 2. 1. Foreign Literature Over the years, more enhancements were made to the cash registers until the early 1970s, when the first computer-driven cash registers were introduced. The first computer-driv en cash registers were basically a mainframe computer packaged as a store controller that could control certain registers. These point of sale systems were the first to commercially utilize client-server technology, peer-to-peer communications, Local Area Network (LAN) backups, and remote initialization.In the late 1980s, retail software based on PC technology began to make its way into mainstream retail businesses. Today, retail point of sale systems are light years ahead of where they began. Today's 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. Since computer power was the critical resource, efficiency of processing became the main goal. Emphasis was placed on automating existing process such as purchasing or paying, often within single department as indicated by Jeffrey A.Hofer on Modern System Analysis and Design (1996). Points of sale (P OS) systems are electronic systems that provide businesses with the capability to retain and analyze a wide variety of inventory and transaction data on a continuous basis. POS systems have been touted as valuable tools for a wide variety of business purposes, including refining target marketing strategies; tracking supplier purchases; determining customer purchasing patterns; analyzing sales (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, also known as ECRs; ECR-based network systems; and controller-based systems. Today, point of sale systems are light years ahead of where they began. Today's 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 wild imaginative idea to the world’s highly prioritized tool.Computers today are now used as a substitute to manual processes and other past inventions like the radio, television, etc. It is now used 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 stopped from advancing through the years. Its new innovations helps answer the people’s further complex questions. Why not use these advantages to benefit 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 sound unnecessary but in some cases when storing a file 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 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 fully secured by password. A Computerized system is the best solution and most innovative answer for their needs. The researchers had been motivated to do a study on this topic according to the above observation. The result may help others to understand more about computer-generated data processing, especially on how to deal with computers in terms of speed, accuracy and data security. 2. Related Studies In exploration, we find new techniques, new knowledge, even develop new substances, gadgets, equipment, processes or procedures, imagination and skill is employed by the researcher. The commodities, new devices, services, in technology a re needs of man for a better fuller life which is the concern of the research. These useful arts are the products of the technological environment and the end-user is society in general. The fast growing trend and innovation in technologies today prompts researchers to conduct studies about the efficiency of    system program.This Chapter presents a brief review 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 METHODOLOGY 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 treatment 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 descriptiv e type of research, Creswell (1994) stated that the descriptive method of research is to gather information about the present existing condition. 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 quick and practical in terms of the financial 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 mainly concerned with describing the nature 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 obtain an accurate profile o f 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 being investigated before 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 Subject of the Study A Point of Sale (POS ) System   is a  system  for managing the 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. Most retailers use a POS  system  at their check stands or counters, and several major manufacturers offer POS systems designed for various types of businesses, ranging from grocery stores to clothing boutiques. Using a POS  system  makes a business much more efficient, lowering the costs of running the business while improving customer service  and making the business more pleasant to work in.In the retail trade, the â€Å"point  of  sale† is the moment when a customer walks up to a counter with goods and prepares to purchase them. A POS  system  handles the transaction, whether it takes the form of an  adding machine  and a hand written receipt pad, or a complex computer system. Except in the case of very small businesses, a current POS  system  usually takes the form of a computer  system. 3. 4 Sources of the Study Our source data is divided into 2 groups, namely the source data based on direct observation and data sources based on indirect observations. . ) Source of data based on direct observation, among others: †¢ Conducting  field studies, it was held at the time we worked at a company engaged in the field of office equipment. †¢ Observation of the market to determine market prices. â € ¢ Discussion fellow colleagues, college friends and group member . 2. ) Source of data based on indirect observations: †¢ Searching  the 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.Then we distribute it to our respondents after they answer the question we tallied and get the average of the verbal interpretation. 3. 6 Project Design [pic] [pic] 3. 7 System Flow Chart [pic] Figure 2 System Flowchart 4. 5 System Algorithm 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 ensure not only that the items has been calculated accurately but it will also eliminate the chance of a wrong price being entered.It help retrieved purchase history, item sales detail, stock status reports, monthly, yearly, and seasonal sales data. 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. 3. 9 Hardware and Software Requirements The Point of Sale System by Blue Link 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 Database – The united collection of data, usually stored in one computer file in one location, although databases can encompass information from many sources and locations. Discount – reductions to a basic price of goods or services Frequency Count – This is the most straight-forward approach to working with quantitative data. Items are classified according to a particular scheme and an arithmetical count is made of the number of items (or  tokens) within the text which belong to each classification (or  type) in the scheme.Percentage – A  fraction  or  ratio  with 100 as the fixed and understood denominator. Weighted Mean –   is similar to an  arithmetic mean  (the most common type of  average), where instead of each of the data points contributing equally to the final average, some data points contribute more than others. The notion of weighted mean plays a role in  descriptive statistics  and 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 PRESENTATION ANALYSIS AND INTERPRETATION OF DATAIn this chapter states the level of acceptability of the developed 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 developed system |Questions |Cashier |Employee of Stuff the |Weighted Mean |Verbal Interpretation | | | |Bus | | | |1.The point of sales system is easy to handle? |3 |1. 5 |2. 25 |Uncertain | | | | | | | |   |   |   |   |   | |2. The computation of the amount price is accurate in |3. 5 |3 |3. 25 |Agree | |the Point of Sale System? | | | | | | | | | | | | | | | | |   |   |   |   |   | |3. The point of sales System can maximize the |3. 5 |4. |4 |Agree | |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 think 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 Question 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 respondents 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 respondent's 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 t heir company. Based on the table most of the respondents agreed because of the average weighted mean of 3. 35 which falls on Agree Verbal Interpretation. 4. 2 The significance Difference of the Perception of the Respondents to the Developed System Respondents DistributionThe population consists of 20 persons where 50% of the respondents are cashiers and the employee of Stone Pro Enterprise. |Respondents |Quality |Percentage | |Cashiers |10 |50% | |Customers |10 |50% | Table 1 Respondent Table Opinion Index The researchers will use questionnaires with the opinion index 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. ( see table 2 ). Scale |Range |Verbal Interpretation | |5 |4. 01 – 5. 00 |Strongly 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 Development 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 Algorithm 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 ensure not only that the items has been calculated accurately but it will also eliminate the chance 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.Member Log In Option Explicit Private Sub cmdClose_Click() If Me. cmdClose. Caption = â€Å"Close† Then Dim reply reply = MsgBox(â€Å"Do you realy want to Quit this program? â€Å", vbYesNo + vbQuestion, â€Å"Confirm Qu it†) If reply = vbYes Then End End If Else Unload Me End If End Sub Private Sub cmdOk_Click() Me. AdoUser. Refresh If Me. cmdClose. Caption = â€Å"Close† Then Me. AdoUser. Recordset. Find (â€Å"UserName = ‘† & txtUser. Text & â€Å"‘†) If Me. txtPassword. Text = Me. AdoUser. Recordset. Fields(â€Å"Password†) Then If Me. AdoUser. Recordset. Fields(â€Å"Previledge†) = â€Å"Admin† Then mdiMain. mnuItems. Enabled = True mdiMain. tbMain. Panels(2). Text = Me. AdoUser. Recordset. Fields(â€Å"UserName†) frmSplash. Show mdiMain. Show End If If Me. AdoUser. Recordset. Fields(â€Å"Previledge†) = â€Å"User† Then mdiMain. mnuItems. Enabled = False mdiMain. mnuUser. Enabled = False mdiMain. mnuCustomers. Enabled = False mdiMain. mnuSuppliers. Enabled = False mdiMain. Toolbar1. Buttons(11). Enabled = False mdiMain. stbMain. Panels(2). Text = Me. AdoUser. Recordset. Fields(â€Å"UserName†) ‘Unload Me mdiMain. Show End If Unload Me Else MsgBox â€Å"Invalid Password!!! â€Å", vbExclamation, â€Å"Invalid Password† Me. txtPassword. SetFocus Me. txtPassword = â€Å"† End If End IfEnd Sub Private Sub Form_Load() On Error Resume Next Call SQLDB(AdoUser, â€Å"Select * from UserAccount†) AdoUser. Refresh txtUser. Text = â€Å"Admin† End Sub Private Sub txtPassword_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then cmdOk_Click ‘cmdAccess_Click End If End Sub Private Sub txtUser_Click(Area As Integer) On Error Resume Next Dim temp Me. AdoUser. Recordset. Find (â€Å"UserName = ‘† & txtUser. Text & â€Å"‘†) temp = Me. AdoUser. Recordset. Fields(1) End Sub B. Main Page Private Sub MDIForm_Load() ‘With stbMain ‘ensures all panels are visible upon loading DE. Connection1. ConnectionString = â€Å"Provider=Microsoft. Jet. OLEDB. 4. ;Data Source=† & App. Path & â€Å"DBStonePro. mdb;Persist Security Info= False;Jet OLEDB:Database Password= † mdiMain. Width = 15360 End Sub Private Sub MDIForm_Unload(Cancel As Integer) Dim reply reply = MsgBox(â€Å"Do you want to Quit this program? â€Å", vbYesNo + vbQuestion, â€Å"Confirm Quit†) If reply = vbYes Then End End If error: Cancel = -1 End Sub Private Sub mnuAbout_Click() frmAbout. Show vbModal End Sub Private Sub mnuBD_Click() frmDatabase. Show vbModal End Sub Private Sub mnuCustomers_Click() frmCustomers. Show vbModal End Sub Private Sub mnufind_Click() frmfind. Show 1 End Sub Private Sub mnuGp_Click() frmGroup. Show vbModal End SubPrivate Sub mnuItems_Click() frmFItems. Show vbModal End Sub Private Sub mnuLogOff_Click() Dim reply reply = MsgBox(â€Å"Do you really want to LogOff? â€Å", vbYesNo + vbQuestion, â€Å"Confirm Log-Off†) If reply = vbYes Then ‘frmLogin. cmdClose. Caption = â€Å"Cancel† frmLogin. Show vbModal End If End Sub Private Sub mnuNewSales_Click() ‘On Error Resume Next Cal l SQLDB1(frmNewSales. AdoSales, â€Å"Select * from Sales†) Call SQLDB2(frmNewSales. adoCustomer, â€Å"Select * from Customer order by CustomerNumber†) If frmNewSales. AdoSales. Recordset. RecordCount ;= 0 And frmNewSales. AdoSales. Recordset. RecordCount ; 9 Then frmNewSales. xtSalesNumber. Text = â€Å"00000† & frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount ;= 9 And frmNewSales. AdoSales. Recordset. RecordCount ; 99 Then frmNewSales. txtSalesNumber. Text = â€Å"0000† & frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount ;= 99 And frmNewSales. AdoSales. Recordset. RecordCount ; 999 Then frmNewSales. txtSalesNumber. Text = â€Å"000† & frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount ;= 999 And frmNewSales.AdoSales. Recordset. RecordCount ; 9999 Then frmNewSales. txtSalesNumber. Text = â€Å"00† & frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount ;= 9999 And frmNewSales. AdoSales. Recordset. RecordCount ; 99999 Then frmNewSales. txtSalesNumber. Text = â€Å"0† & frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount ;= 99999 And frmNewSales. AdoSales. Recordset. RecordCount ; 999999 Then frmNewSales. txtSalesNumber. Text = frmNewSales. AdoSales. Recordset. RecordCount + 1 End If frmNewSales. xtAmountPaid. Text = â€Å"0. 00† frmNewSales. txtBalance. Text = â€Å"0. 00† frmNewSales. txtTotalCost. Text = â€Å"0. 00† frmNewSales. txtDeliverySatus. Text = â€Å"Undelivered† frmNewSales. dtDate. Value = date frmNewSales. DTDelivery = date frmNewSales. Show vbModal End Sub Private Sub mnuOrder_Click() frmOrders. Show vbModal End Sub Private Sub mnuOrder2_Click() frmOrders. Show vbModal End Sub Private Sub mnuQuit_Cl ick() 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. Refresh ReOrder. Show End Sub Private Sub 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 En d Sub Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib. Button) Select Case Button. Index Case 3: Call mnufind_Click Case 5: PopupMenu mnuTransaction, , Button. Left, (Button. Top + Button. Height) Case 7: PopupMenu mnuReport, , Button. Left, (Button. Top + Button. 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 error: Cancel = -1 End Select End Sub C. Transaction Page Private Sub cmdAdd_Click() Grid_DblClick cmdEditItems. Enabled = True cmdRemove. Enabled = True End Sub Private Sub cmdCalculator_Click() Shell â€Å"calc. exe†, vbMaximizedFocus End Sub Private Sub cmdClose_Click() Call SQLDB1(AdoSales, â€Å"Select * from Sales†) Me. AdoSales. Refresh If Val(Me. txtTotalCost. Text) = 0 Then Unload Me 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(â€Å"total†) = Me. Text3. Text .Recordset. Fields(â€Å"Discount†) = Me. Text2. Text .Recordset. Fields(â€Å"AmountPaid†) = Me. txtAmountPaid. Text .Recordset.Fields(â€Å"Balance†) = Me. txtBalance. Text .Records et. Update .Refresh Unload Me End With End If End If End Sub Private Sub cmdEditItems_Click() Me. AdoItems. Refresh Me. AdoItems. Recordset. Find (â€Å"ItemNumber = ‘† & Me. AdoSalesInfo. Recordset. Fields(â€Å"ItemNumber†) & â€Å"‘†) frmEditItems. txtinfo(0). Text = Me. AdoSalesInfo. Recordset. Fields(â€Å"SalesNumber†) frmEditItems. txtinfo(1). Text = Me. AdoSalesInfo. Recordset. Fields(â€Å"Date†) frmEditItems. txtinfo(2). Text = Me. AdoSalesInfo. Recordset. Fields(â€Å"ItemNumber†) frmEditItems. txtinfo(3). Text = Me. AdoSalesInfo. Recordset. Fields(â€Å"ItemName†) frmEditItems. txtinfo(4).Text = 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 = False cmdRemove. Enabled = False Call SQLDB1(AdoSales, â€Å"Select * 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. F ields(â€Å"Discount†) = Me. Text2. Text .Recordset. Fields(â€Å"Balance†) = Me. txtBalance. Text .Recordset.Fields(â€Å"total†) = Me. Text3. Text .Recordset. Update .Refresh Me. txtCustomerName. Locked = False Me. txtCustomerNumber. Locked = False Me. txtCustomerName. Text = â€Å"† Me. txtCustomerNumber. Text = â€Å"† Me. txtAmountPaid. Text = â€Å"0. 00† Call SQLDB1(frmNewSales. AdoSales, â€Å"Select * from Sales†) Call SQLDB2(frmNewSales. adoCustomer, â€Å"Select * from Customer order by CustomerName†) If frmNewSales. AdoSales. Recordset. RecordCount >= 0 And frmNewSales. AdoSales. Recordset. RecordCount < 9 Then frmNewSales. txtSalesNumber. Text = â€Å"00000† & frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales.AdoSales. Recordset. RecordCount >= 9 And frmNewSales. AdoSales. Recordset. RecordCount < 99 Then frmNewSales. txtSalesNumber. Text = â€Å"0000† & frmNewSales. AdoSales. Re cordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount >= 99 And frmNewSales. AdoSales. Recordset. RecordCount < 999 Then frmNewSales. txtSalesNumber. Text = â€Å"000† & frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount >= 999 And frmNewSales. AdoSales. Recordset. RecordCount < 9999 Then frmNewSales. txtSalesNumber. Text = â€Å"00† & frmNewSales.AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount >= 9999 And frmNewSales. AdoSales. Recordset. RecordCount < 99999 Then frmNewSales. txtSalesNumber. Text = â€Å"0† & frmNewSales. AdoSales. Recordset. RecordCount + 1 End If If frmNewSales. AdoSales. Recordset. RecordCount >= 99999 And frmNewSales. AdoSales. Recordset. RecordCount > 999999 Then frmNewSales. txtSalesNumber. Text = frmNewSales. AdoSales. Recordset. RecordCount + 1 End If frmNewSales. txtAmountPaid. Text = â€Å"0. 00† frmNew Sales. 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 = False Me. cmdNewCustomer. Enabled = True Me. cmdPayment. Enabled = False Me. cmdReciept. Enabled = False Me. cmdEditItems. Enabled = False Me. cmdRemove. Enabled = False Call SQLDB3(AdoItems, â€Å"Select * from Items where RemainingQty ; 0†) Call SQLDB(AdoSalesInfo, â€Å"Select * from SalesInfo where SalesNumber='† & Me. txtSalesNumber. Text & â€Å"‘†) AdoSalesInfo. Refresh AdoItems. Refresh ‘Me. cmdNew. Enabled = True Set Grid2. DataSource = AdoSalesInfoGrid2. 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). Visible = False Grid. Columns(2). Visible = False Grid. Columns(5). Visible = False Grid. Columns(6). Visible = 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. Visible = 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† & Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustomer. Recordset. RecordCount >= 9 And Me. adoCustomer. Recordset. RecordCount < 99 Then . txtinfo(0 ). Text = â€Å"0000† & Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustomer. Recordset. RecordCount >= 99 And Me. doCustomer. Recordset. RecordCount < 999 Then . txtinfo(0). Text = â€Å"000† & Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustomer. Recordset. RecordCount >= 999 And Me. adoCustomer. Recordset. RecordCount < 9999 Then . txtinfo(0). Text = â€Å"00† & Me. adoCustomer. Recordset. RecordCount + 1 End If If Me. adoCustomer. Recordset. RecordCount >= 9999 And Me. adoCustomer. Recordset. RecordCount < 99999 Then . txtinfo(0). Text = â€Å"0† & 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 proc eed 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 â€Å"There 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 RptReceipt. DataSource = Me. AdoSalesInfo RptReceipt. Refresh RptReceipt. Sections(â€Å"Section2†). Controls(â€Å"lblSalesNumber†). Caption = frmNewSales. txtSalesNumber. Text RptReceipt. Sections(â€Å"Section2†). C ontrols(â€Å"lblTotalCost†). Caption = Format(frmNewSales. Text3. Text, â€Å"#,##0. 00†) RptReceipt. Sections(â€Å"Section2†). Controls(â€Å"lblCustomerNumber†).Caption = frmNewSales. txtCustomerNumber. Text RptReceipt. Sections(â€Å"Section2†). Controls(â€Å"lblCustomerName†). Caption = 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(â€Å"lblBala nce†). 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= ‘† & Me. AdoSalesInfo.Recordset. Fields(â€Å"ItemNumber†) & â€Å"‘†) frmNewSales. AdoItems. Recordset. Fields(â€Å"RemainingQty†) = Val(frmNewSales. AdoItems. Recordset. Fields(â€Å"RemainingQty†)) + Me. AdoSalesInfo. Recordset. Fields(â€Å"Qty†) frmNewSales. AdoItems. Record set. 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='† & Me. txtSalesNumber. Text & â€Å"‘†) 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 = Ad oItems 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='† & Me. txtSalesNumber. Text & â€Å"‘†) 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 Gr id. Columns(0). Visible = 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: † & 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 = â€Å"Quantity† 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 ‘† & LCase(Me. Text1. Text) & â€Å"*'† ‘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 Exit 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. Find (â€Å"CustomerName = ‘† & Me. txtCustomerName. Text & â€Å"‘†) 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 = vbYes 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. Enabl ed = 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. 00†) 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 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 Performing 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, you're 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 larger but quieter fans to minimize heat and noise. Heavy duty power supply that last longer th an the standard items. Hard drive doesn't have to be in large capacity but it has to be reliable. We also want to ensure that you're using good surge protector and UPS ( battery backup) to prevent power related crashes. 1. 1. 1. 2. Display At the very least, you'll need a basic  monitor  at your POS to see what you're doing. Touch screens  have become a more popular and affordable option these days since they are a user friendly option that can help speed up the checkout process.Adding customer-facing  and  pole displays  will offer a clearer customer experience 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, but  cash drawers  are still an essential part of your system. You need to have a secure place to keep cash, checks 1. 1. 1. 4. Receipt Printer Every transaction ends with a receipt for the customer straight from a  receipt printer. Having a printer go down is one of the most crippling things to any POS system. Making sure you have a printer that'll support your print volume and is easy to use is essential.Most printers are thermal based so you don't 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, there's a printer to fit your needs. There are numerous types of receipt printers, categorized – like any other computer printer – by its printing technology and its computer interface. 1. 1. 2. Software The  POS software  by Blue Link Technology is the brains of Stone Pro Enterprise POS system. 1. 2 Convention Double Click : Refer 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/OFF† button. (On top of the computer for Stone Pro Enterprise. ) WAI T. It will take a few moments but eventually Stone Pro Enterprise System and an Address Lookup application will automatically start up. A desktop with icons will appear including [pic] A â€Å"Login† screen will appear: [pic] 2. Sign on to the System a) When the Security 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 Shift A. Cash Register Processing. 1. Press the Transaction Menu button. 2. Select TRANSACTION then NEW SALE. [pic] ( You are now ready to perform 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. Leave the cash drawer open. 2. Close Stone Pro Enterprise System Main Page 3. Exit Stone Pro Enterprise System. 4.Turn off the computer. After you finish the â€Å"End of Shift† procedure, complete the following: A. Log Off of Stone Pro Enterprise System 1. At the main Stone Pro Enterprise System desktop B. Shut 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 summary 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 enable 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 Conclusion We conclude that the research has shown that the study c an 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

Men In The New Society

I was raised to believe that everything is created equal. This belief was suddenly changed when I entered college. People’s perception and opinion has in a way awakened me to the reality that our choices in life are sometimes affected by the inequalities set by our society. These inequalities have adversely influenced people’s choices and roles in life. These may sometimes come in a very subtle form of formal compliance to the expected responsibilities and roles that a person should assume in the society yet these are harsh forms of deprivation of individual’s decision and expression of one’s being. Society’ stereotyping of men and women’s role and responsibilities has created so much damage to people especially among men. In this new age where everything is fast changing and evolving, society should learn to view men and women equally and try to eradicate stereotyping in the system. Society should learn to be fair and equitable in its dealings between men and women. Both are human beings who have the right to live according to personal choices and preferences, rather than according to society’s unfair expectations and bias opinions. Men and women alike should be given equal opportunities to discover their purpose in life rather than force to assume traditional roles in the family, society and in the country. It is a reality that nowadays society still viewed women favorably than men. Women are afforded more tolerance and understanding while men are stiffly expected to do their roles with ease and comfort. This treatment is even reinforced because of greater advocacy to the protection of women’s rights rather than on the promotion of the equality of the two sexes. Studies have shown that feminist movement is more prevalent and supported than men movements. Indeed, society’s treatment between men and women created a huge distance between the two sexes that in effect encouraged men and women alike to strengthen movements purportedly for the purpose of asserting and protecting their respective rights in the society. Conflicts are then heightened rather than resolved. It is said that the most challenging and significant issue that men in the US face today is the oppression among men. This issue is anchored on the reality that society’s treatment to men sometimes partake the nature of oppression. Men are being unfairly deprived from opportunities to express real self. Most often they are pushed to assume roles like that of being the family’s provider, a responsibility that can be traced back traditionally. These norms of roles and responsibilities set by the society are seen as oppressive yet unrecognized by many. According to Schenk â€Å"men’s form of oppression have not been adequately defined, thus they are perceived to be non-existent†. Because of this, society continued to set the standard of behaviors and roles for men and dictate men’s actions and decisions. Since childhood, men are taught to be tough and strong. They are taught not to cry or to demonstrate emotions. Their minds are conditioned to be the provider of the family and the defender of the country. Should they fall short on these social expectations they are criticized, punished, rejected or harmed often throughout their lifetime for the effects of the social conditioning that has been put upon them. Also, men have been systematically trained to give up their beginning inherent, easy expectation of having relaxed attention from another when they are tense. The big boys don't cry principle even begins very early in a boy’s life unless his parents have made the effort that is needed to allow his emotional release process to be left intact. This mistreatment forces males to hide or defend their distresses, which sometimes makes the process of recovering one's inherent individuality and discovering one’s potential and capabilities much more challenging. Indeed social expectations are more difficult for men rather than women and society has not done significant actions to break this vicious and unfair cycle. Rather society allows the continued oppression against men by several institutions. Society’s institutions like the armed services, the courts, police and prisons, the drug and alcohol industries, the sports industry, and the work place has directly and indirectly hurt men. Whether society is aware of this is beyond comprehension as society’s only concern is for men to continue serving women and the society in the same old traditional system of thinking and behavior. Men are also falsely portrayed in the media. They are treated stereotypically and as less than human throughout society. Oftentimes they are projected as the violent sex and oppressive to women. This bad projection has created an indelible mark on the perception of many even to the young generation that makes it more difficult to break the vicious cycle of unrecognized oppression among men. Men in a way do get privilege from the way society sets up everyone with the roles they are in. But the privileges are real and material. It lacks substance and do not in a way satisfy the highest need of men which is to have positive self-esteem. It should be noted that the very best of being human is not material or material privilege, it is our human qualities to be close, to care for others, build many relationships of all kinds, to feel significant and to have positive self-concept. In these areas the lives of men are certainly not privileged and mostly not yet powerful. On the other hand, the extent to which men accept mistreatment and less-than-fully-human relationships is the extent that they not only accept their own oppression but also contribute to that oppression and pass the received oppression to other groups. The internalization of their own group's oppression is all that has been needed to maintain the oppressions of all other groups. When anyone gets tense and behaves in a less-than-fully-human way this behavior reinforces the stereotypes for all the people involved. The oppression of men affects all men. The challenge to face and help resolve the issues of oppression among men is so immense. At my stage now, I may not be able to even make a great contribution to these issues. However, my learnings to these issues in life of men and women would help me a lot in my decisions in life. According to Benett-Goleman, â€Å"life itself can be a teacher, presenting us with the chances to transmute the emotions brought up in us. When life disappoints us, it offers an opportunity to reach beyond ordinary conventions and understandings toward a greater perspective† (365). My awareness and understanding to these issues would then strengthen my resolve that I have to stand firm on my decisions and choices. I may not be able to make a significant effect in the society but at least I can make a difference starting from my own life sphere with the significant people in my life. At least I can break-free from this vicious paradigm of behavior. Reference List Benett-Goleman, Tara. Emotional Alchemy: How the Mind can Heal the Heart. New York: Three Rivers Press, 2001. Schenk, Roy. Shame and Male Oppression. National Coalition of Free Men. Retrieved February 13, 2007

Health Article Example | Topics and Well Written Essays - 500 words

Health - Article Example This issue can easily affect all 7 of the areas of health. Because it is a mental and emotional fear, it easily can have negative repercussions on the mental, emotional, and intellectual areas of health. The irrationality of this fear could also have repercussions on my physical, financial, social, and spiritual health. Because I might be afraid of being alone, I may not exercise unless I could do it with a group, which may not always be able to happen. I may have to spend money on helping my condition, which would have an effect on my financial health. My fear of being alone/ of my self could also cause me to try to always be with people, something my friends may not like. It however, could possibly have a positive impact on my spiritual health, as I may turn to the divine to try to help me with my condition. Autophobia, because it is a "phobia", or fear condition, it is hard to find exactly how many people are affected. I was unable to find exact numbers, however one website refereed to it as a "common, although often unspoken" phobia. I have found several different organizations that are involved with helping people deal with this phobia. One is CTRN(Change That's Right Now) Phobia Clinic.

Hacking Exposed Essay Example | Topics and Well Written Essays - 500 words

Hacking Exposed - Essay Example Similarly, he could acquire social security numbers of many persons at reputed ranks. Lamo misused Times’ LexisNexis account with intent to conduct some researches on various high profile subjects. In the words of Poulsen (2002), Lamo clearly found out ‘seven misconfigured proxy servers’ that acted as the connecting link between public internet and Times’ private intranet. As a result of his discovery; any person, who properly configuring his Web browser could have accessed into Times’ private intranet. Adrian Lamo was a journalism student who was seeking a job. According to the report of Ewalt and Hulme (2004), Lamo thought that hacking high security networks would give him fame so that he could get a reputed job. Therefore, it is obvious that Lamo did not ever think of making money out of act. In most of his hacking cases, he has informed the companies regarding their flows in database. It is reported that Lamo informed The New York Times about the weaker areas of its database and it indicates that his act did not intend to deceive Times. The hacking activity of Lamo at The New York Times indicates that he was a grey hat hacker. Grey hat hackers apply their skills in order to prove their eligibilities and thereby achieve public stature (Grey Hat Hackers).

The role of the mentor in organising, managing and leading programmes Essay

The role of the mentor in organising, managing and leading programmes of learning in clinical education - Essay Example Facilitating learning is very important, as its very nature is very complex ranging from different aspects of the body of knowledge. Learning from the behavioral perspective is a changed of behavior; and it is associated with changes inside of a person from cognitive perspective (Brockbank and McGill, 2006). Learning is one of the most important things to acquire in this world. It is essential because it is viewed as the result of how humans adapt to their environment (Murre, 1992). In nursing career, educating others is an essential intervention which also depicts the importance of learning (Bastable, 2008). All of these substantially illustrate why it is important to facilitate learning. Mentors therefore should be able to come up with simple or basic ideas in order to facilitate learning and ensure that there is increase in knowledge of their learners as far as mentoring is concerned. In nursing, mentoring is necessary and the role of mentors is simply as facilitators emphasising learning in an effective and practical way. Adult learning can be well facilitated using experiential learning, which means acquiring substantial knowledge can be appropriately achieved out from somebody’s significant experiences. In fact, one of the most familiar adages puts it, â€Å"Experience teaches us best.† This can be further elaborated from Kolb’s theory of experiential learning. ... In fact, one of the most familiar adages puts it, â€Å"Experience teaches us best.† This can be further elaborated from Kolb’s theory of experiential learning. Illustration 1: Kolb’s cycle of experiential learning (Quinn, 2000). In this theory, Kolb’s emphasised four generic adaptive abilities to reach effective learning and these involve concrete experience, reflective observation, abstract conceptualization, and active experimentation (Quinn, 2000). It is therefore the role of mentors to effectively organise activities that will allow full immersion of their students into concrete and fresh experiences. Along the way, mentors have to manage important activities that are crucial in the creation of learning experiences. It is not just enough to organise activities, but leading and management is necessary because everything that the mentors do should be considered a guiding path for students to effectively take in order to facilitate learning at a highest maximum level as possible. Students on the other hand must be able to learn from their experiences by reflecting on them. Furthermore, it is also important for them to come up with significant concepts out from their personal observations on their experiences. Finally they have to apply whatever theories they have learned. All of these are important things that students must do while their mentors are facilitating for their learning (Quinn, 2000). It is in line with these that regarding their ability to facilitate learning, mentors must be able to support learning in practice, they have to demonstrate effective time management and leadership skills, and should be able to organise students’ clinical experience (Quinn, 2000). Another

International law and organisation Essay Example | Topics and Well Written Essays - 1500 words

International law and organisation - Essay Example Since there is no common governing power that supervises all countries, despite the existence of international organizations such as United Nations, states find themselves unable to trust each other. Thus, they usually treat each other as possible opponent that could grab them anytime. On the other hand, the modified structural realists believe that since there is anarchy in international relations, the weaker states have to look for means in order to protect its security and interest, as opposed to the powerful states, which tend to resist regulation or control of their movements. Similar to the modified structural realists, neo-liberal institutionalists believe that adherence to international legal principles would help promote transparency in international dealings, reduce transaction costs in international trade, intensify strict monitoring and enforcement of contractual obligations, and eases imposition of penalties for violation thereof. Voluntary observance of the international legal principles would encourage more cooperation in the international arena that would somehow grant long-term benefits, especially in the financial aspects. The hegemonic stability theor... e theories point to only one thing: the creation and observance of international legal principles are supported by the quest for protection of self-interest by the international stakeholders. Clearly, an independent state would not want to impose upon itself a rule that would ultimately restrict its freedom, if it will not reap any benefit from it. It cannot be denied that this voluntary adhesion to certain legal principles is no longer governed or motivated by the spirit of altruism. States need to protect themselves. Nobody can do it better than themselves. In the humanitarian aspect for example, every state must choose to create a standard that would protect its people against unwarranted human rights violations. This is especially true in terms of physical violence where no specific ideology or religion could divert or amend the standards for all human beings because of the basic knowledge that all humans are equal in feelings. If a state for example would think of exempting itself from the international standards of human rights, common sense dictates that it should prepare itself for possible retaliation in the most inhumane way since the state itself does not observe any standards for physical violation of its citizens. A classic example on this one is the law on war. The killing of a war prisoner is generally prohibited. If the United States for example would kill an Iraqi soldier who was left by his troops during a fight and who was captivated by the American soldiers would be killed, Iraq would then have every reason to kill an American war prisoner because the United States in this case was the first one to violate the rights of such war prisoner. To create and obey this particular international legal principle is then more of a reciprocal benefit