.

Monday, September 30, 2019

Chapter 1 indians the settlements of america Essay

1. Jamestown was the first colony that gets found. It was there where the first permanent settlement occurs. Jamestown was a poor location for colonization. The men dug wells to obtain water, but the water they found could not drink because it was contaminated. In addition, the ground was wet and had too many mosquitos. The mosquitoes were carriers of diseases and made the settlers sick. After a year, about half of the settlers had died of disease and starvation. The Native American Indians kept the English alive providing them with food. The English were so busy trying to discover gold that they didn’t bother trying to grow food. That was when Captain John Smith became leader of the Jamestown colony. He saved the colony by creating a rule, which maintained that anyone who did not work would have no right to eat. This made the colonist planted food, and they were forced to build shelters and fences to protect against any attack. These American Indians or â€Å"Amerinds†, showed them great diversity of character and attainments due to the differences in climate, soil, food, building material, and the activities necessary to preserve life. They taught the settlers how to plant and grow corn, beans, squash, etc. and also helped them to establish good relations with neighboring Indian tribes. On the other hand what the English settlers offered to Native Americans Indians was different. In exchange for food, they offered them weapons, horses, cattle, sheep, vegetables and fruits, hatchets, swords, metal pots, skillets and knives, which would give them the technological advantage over their enemies. They brought not only tools for the conquest of the wilderness, but also the forms of government, the religion, the books, and the languages of the Old World. But besides the different technologies and different lifestyles that they offered to them, the English brought with them different types of diseases, such as smallpox, which was lethal to Amerinds, this produced a lethal epidemic that affected a large portion of the tribe. American Indians had a very different culture from the English people. Despite some successful interaction, questions of ownership and control of land and trust between peoples, caused conflicts arise. Virginia suffers very frequent periods of drought and by that time the colonists did not understand that the natives were ill prepared to feed them during the hard times. In the years after 1612, settlers cleared the land to prepare it for export farms dedicated tobacco, its crucial crop for economic purposes. When the tobacco exhausted farmland, the settlers continuously had to clear more areas to replace them. This small wooded land was that the Indians could use to hunt and supplement their food crops. The more settlers arrived, the more demanding land. The spread of tobacco cultivation altered life for everyone, because its cultivation required abundant land. The tribes tried to fight the invasion of the settlers. The main conflicts occurred with the indigenous slaughter of 1622 and another in 1644, both under the command of the younger brother of the late Chief Powhatan, Chief Opechancanough. Recognizing the danger, the war leader launched coordinated attacks along the James River on March 22, 1622. By the end of the day 347 colonist lay dead, and only a timely warning from two Christian converts saved Jamestown itself from destruction. Europeans had a very mixed picture of the native Indians. On one hand, they believed that the Indians could be soft and generous and also attentive and willing to trade. At first it was a very positive image and the settlers had hoped that they would be welcomed with open arms and friendly hands. They wanted to believe their way to the Garden of Eden. 2. After reading the three sources that tell the story of the Indians and the Settlement of America, I found it more accurate the description number 3 â€Å"A people and a Nation† (2008) that gives us Mary Beth Norton, because I think is a very complete description about the events that occurred with the New World. She begins by describing how other civilizations of America were. She mentions how that residents, of what is now central Mexico began to cultivate food crops, especially corn, squash, beans, avocados, and peppers; while in the Andes Mountains of South America, people began to cultivate potatoes, and it was thanks to the improvement of these techniques of agriculture that could be spread this knowledge through America with the exception of those areas with harsher climates. Thanks to agriculture most of the Americans began to adopt a more sedentary life, without the need to spend so much time hunting and gathering. I believe that it is very appropriate that she mentions these details, since it is important to us as readers have an idea of how other civilizations in the Americas were, in this manner we can understand a little more about the civilization of the Native Americans Indians, because in some way they were very similar to each other. In the same way, in this source the author also makes mention of another significant civilization of America, the Aztecs; they were one of the most important and recognized civilizations of the American continent, they had a style a little different from other civilizations, they tended to be a little more wild, they use to forced their neighbors to pay tribute in textiles, gold, foodstuffs and even in human beings, who were sacrificed to the war god Huitzilopochtli. After the author made mention of these events, she continues her story mentioning the arrival of the English for the first time in 1607 to a region near to Chesapeake Bay called Tsenacomoco. It was a group of 104 men and boys, who established the palisaded settlement called Jamestown. This source tells us the beginning of a radical change to this Nation; the author mentions the number of people, the name of the region in which they arrived, and the date on which this happened; it seems to me that these data are necessary to know for any American person, I think it is important for all of us who live in this continent know this historical fact, and more specifically know what happened in this country. I am convinced that this source is more accurate, because it shows us these and more details, and is more precise describing how was the relationship between the colonists and the Native American Indians. It shows us what was the difference between these two different civilizations, and at the same time expresses us which were their similarities. Both groups held deep religious beliefs, subsisted primarily through agriculture, accepted social and political hierarchy, and observed well-defined gender roles. Despite the coexistence that came to have each other, both groups continued to have their own beliefs and thoughts, which for me in somehow led them to start a war, because the settlers wanted to impose their will on the Indians, and at the same time the Indians wanted to not let this happen, and also they were tired of being their food source and carriers of diseases that the settlers brought.

Sunday, September 29, 2019

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

Saturday, September 28, 2019

AIDS Social Workers

Looks at the dangers, relationships with clients, treatment, socioeconomics, diagnosis, at-risk behavior, prevention, and public perceptions. This paper is an examination of the problems that the rising epidemic of HIV infection and AIDS poses to social workers, both as a direct issue in providing service to infected clients and as an indirect part of the overall job of social work. The prevalence of this devastating illness has had a profound effect on society as a whole. The consequences for social workers, however, are even greater, since the field services many of the patients most profoundly affected, either those who are suffering from advanced stages of the disease or those who are closely involved with the ailing. In order to provide the most effective service possible, social workers need to understand the stages of HIV and AIDS, the most current medical understanding of the ways in which HIV can be transmitted, some of the current treatments, and funding and other resources that are available to diagnosed.

Friday, September 27, 2019

The Difference in the Use of Language between the Young and the Old Research Proposal

The Difference in the Use of Language between the Young and the Old Generation - Research Proposal Example It is evident that the old generation tends to differ with the young generation in their use of language when they speak. This topic is necessary in the study of language as it illustrates how the language barrier tends to affect communication between the young generation and the old generation (Cissna & Keating, 2007). The purpose of the study This study will focus on the difference in the use of language between the young and the old generation. The difference in language use between the young generation and the old generation arises from factors such as; difference in perspectives between the two generations. The other factor is the difference in the topics that are normally discussed by people belonging to the two generations, and stereotypes also contribute to this difference in language use between the young and the old generation. It is evident that the taboos that people of the old generation were exposed to influence their use of language; they are normally formal in their u se of language (Fletcher, 2007). Stereotypes also influence the difference in the use of language between the young generation and the old generation in that; the perceptions of people belonging to the young generation towards people belonging to the old generation results to a difference in the use of language between the two generations. ... These expectations, therefore, influence the difference language between the two generations (Gibb, 2008). The other factor that results to a variance in the use of language amid the young generation and the old generation is the generational perspective. In this instance, it is evident that people who lived during World War 2 and the Great depression, tend to be formal in their use of language, this is because of the belief instilled in them that the use of language contributes to respect. However, there is a generation referred to as the Baby Boomers who tend to exhibit a communication style that tends to be more personal. The other generation is generation X that exhibits little formality in their use of language. Therefore, it is true to state that the generational perspective also influences the difference in language use between the two generations (Hayes, 2003). The change in technology, which led to, the introduction of computers, phones and social media have also led to a di fference in language use between the young and the old generation. The change in technology has normally led to a generational communication style, which has also affected the language of persons belonging to the young generation. Technology has contributed to the use of slang by people of the young generation, resulting to variation in the language used by people of the old generation that tends to be restrained and formal (Day, 2007). However, the difference in the use of language between the old and the young generation has also been accompanied by some advantages. It is believed that the difference in the use of language tends to bridge the gap between the two generations. It is evident that for there to be a difference between these two generations, it is essential that a

Thursday, September 26, 2019

Loyality Essay Example | Topics and Well Written Essays - 1000 words

Loyality - Essay Example Most of us often go through life oblivious of what goes on in other states enjoying the bliss of life. We depend on the media to give us a picture of what life is like, despite the fact that in most cases it often fails to depict the real picture. We make so many assumptions without even the least bit of information that can easily help us base our judgments. Racism and economic inequality is a reality that has been in the society for years, despite the fact that most people fail to acknowledge it. All it takes is a simple look around us to finally see the reality of what exists. Most people base their judgments on what they hear and rarely ever do so based on their experience. In her essay, she talks about the â€Å"white trash† she comes across in Mexico. In spite of the fact that she was an American herself, she felt like she was better than them simply because they acted differently than her. She tries to call the reader’s attention to things so inherent that they have become imperceptible to us, such as our assumptions on race. She states â€Å"In the United States, it is very easy for me to forget that the people around me are my people. It is easy, with all our divisions, to think of myself as an outsider in my own country.† (Biss, 93). Although in her country she could easily separate herself from others and act like she was better than others, while in Mexico she finally got to see herself from other people’s perspective. She used to pride herself in the fact that she was better simply because she was a well refined woman from a good background with good education. The US has always been regarded as a land that holds better promises which is why most immigrants are so quick to try and sneak in hoping to find a better life than what they have left behind. To most people’s surprise, life is not any better

Macroeconomic Policies Used by the Federal Reserve Essay - 5

Macroeconomic Policies Used by the Federal Reserve - Essay Example The alternative strategy actions that were set up intended to put more pressure towards the long-term interest rate achievement and to ensure that the overall monetary conditions of the country become improved. This includes bolstering the prices for residential properties and corporate equities (Kashyap & Stein, 2012, p. 266). Â  The Federal Reserve’s adoption of the open market operations involves buying of existing Treasury securities by the Federal Reserve in the secondary market (Bauer & Rudebusch, 2014, p. 234). The secondary markets are securities that have already been obtained and sold off to private investors. When buying the securities, the Federal Reserve ensures it does so but under the equivalence of an existing currency. This expands the Federal Reserve’s base and at the same time increases the ability of depository financial institutions to provide loans as well as expand their existing credit facilities (Bauer & Rudebusch, 2014, p. 234). Â  Normal open market operations involve functions are typically carried out through repurchasing agreements (D’Amico & King, 2013, p. 426). If the Federal Reserve wishes to remove liquidity or add the same liquidity during the normalization period. Repos, also known as repurchase agreements are contracts signed between two or more parties to purchase securities and then repurchase the same securities at a future date and price (D’Amico & King, 2013, p. 425). Repos are considered as an economic equivalent to a collateralized loan. Differences between the first and second transactions determine the interest rates accrued on the loan (Bauer & Rudebusch, 2014, p. 235). Â  

Wednesday, September 25, 2019

Climate Change Research Paper Example | Topics and Well Written Essays - 1750 words

Climate Change - Research Paper Example It cannot be denied that GLOBAL WARMING was under consideration by almost every country and different measures are been taken to prevent but it is required on a very large scale with a contribution of every individual living in. It can be done in a lot of ways for example promote plantation, avoid using plastic products as it a non-biodegradable item and a main source of pollution, energy conservation, recycling of goods, preservation of natural resources, and banning the burning of fossil fuels which contributes highly in the destruction of the ozone layer which works as an umbrella or a shelter from strong sun radiations affecting the globe directly .All these factors are causing Global Warming which works as a driving force for the fluctuations in Climatic System. Climatic change does not only affect the nature but majorly affects the living beings. Whereas, drastic changes are coming up because of the activities done by the masses for worldly pleasures for which natural resources are continuously been misused and immeasurably been wasted. There are some major changes in the climatic system which occurs because of the rise in temperatures of the living world. Human Influences is directly propostional to the global warming. Following are Sub-reasons for the change in climate cycle: Orbital Variations Solar Output Volcanism Ocean Variability Plate Tectonics These are the regions where fluctuations occurs and affect the globe and each will be discussed thoroughly further in this report. It is recorded previously in surveys that Climatic Changes are affecting adversely on Biodiversity. This is alarming for the species which are already left with a handful numbers like Polar Bears, Indus Dolphins and many more. They are getting affected because of the change in eco-system occurring because of the changes in the earth’s crust. As the global temperature rises, it starts throwing off to cool down. Volcanic Eruptions is one of the cooling processes, when done with the eruption, the temperature of the globe drops down to 0.5 degrees. Same is the case is with Earthquakes and Ocean Variability. Footnote: (Wikipedia, the free encyclopedia) Historical and Archeological Evidences: It is studied in the continuous research being done in this aspect and different historical and archeological evidences are pouring in that how the climate used to be in a particular region and how it has become after several years. Civilization changes also predict to a certain level of how the climate probably was. According to archeological evidences, researchers have put their efforts on different areas of life through which they might get to the key. Some of the under consideration areas of life which can predict or can give a clue to the present world that climatic cycle have changed to what extent and whether good or bad. The following are: Glacier changes: Glaciers are the most sensitive indicator of the climate change because of its immediate reaction to any changes in the temperature. There are two things which can contribute in the shrinkage and growth of the glaciers, they are orbital variability and external forcing. Evidences are found because glaciers leaves moraines that contain an anonymous amount of material including organic matter

Tuesday, September 24, 2019

The Six Principles of Painting as Applied to Works of Art Research Paper

The Six Principles of Painting as Applied to Works of Art - Research Paper Example The paper "The Six Principles of Painting as Applied to Works of Art" will discuss the six principles and highlight artworks that use each of the principles. The first principle of art that Xie described was that of spirit resonance rhythm and breath. Xie highlighted that artists who qualified gave life to their art pieces. According to Xie, a painting needed to have life so that it could have an impact on the viewer. In his view, work that did not have any spirit resonance or rhythm was useless and dead. Symbolically, Xie described a viewer seeing the art of an artist as practically taking in the artist’s breath. One of the Chinese paintings that reflect this principle is Emperor Huizong’s artwork titled Auspicious Cranes. The work was 112.5 Ãâ€" 138.2 cm in size. It belonged to the Liaoning Provincial Museum in Shenyang. Emperor Huizong was a leader of his dynasty, but who exhibited an artistic talent. Despite the need to focus on leadership issues, he found time to practice the art. In this painting, he was striving to depict a poetic idea. An inscription on the painting depicted the idea he sought to communicate. The poem described how immortal birds appeared next to clouds in an effort to announce good tidings. In the poem, he highlighted that the birds arranged themselves in twos forming a noble arrangement. The painting depicted 20 white cranes, forming a design above the sky, which appeared as though it was just above the city gates. From the poem next to the painting, it became evident that Huizong.

Monday, September 23, 2019

Hand Hygiene in Surgery Essay Example | Topics and Well Written Essays - 2750 words

Hand Hygiene in Surgery - Essay Example It is obvious that more washing and scrubbing damage ecology and health of the skin and harm resistance of the skin flora, rather than reducing the risk of harbouring and transmitting infectious agents. Taking into account the increase in vulnerable patient population, effort should be made to identify proper antiseptic products that provide adequate protection from transmission of infecting agents, at the same time that does not damage skin health. Recent studies propose use of alcohol-based hand rinses as an alternative to detergent-based antiseptic products, because they have 'rapid and broad-spectrum activity, excellent microbicidal characteristics, and lack of potential for emergence of resistance' as well as require no washing or drying. In addition, alcohol-based formulations are found to be superior to antiseptic detergents for rapid microbial killing potential and addition of appropriate moisturizers make it milder and skin friendly. Extensive studies of use of antimicrobial soaps and skin care products in skin hygiene and role of hand-washing in reducing rates of infection abound in number, whereas studies to assess benefits in reducing transmission of infection without added risk or cost of using antimicrobial soaps and to compare efficacy of aqueous alcohol based preparations over plain or antimicrobial soap and water are still in nascent stage. Since outbreaks of Surgical Sight Infections are linked with transmission of micro-organisms from surgical personnel to patients, policies and guidelines for strict adherence to the principles of asepsis by all surgical workers is paramount in preventing surgical site infections. Background: Surgery is aimed to eliminate suffering and prolong life and the principles of antisepses introduced by Joseph Lister in the late 1860s helped reduce 'post operative infectious morbidity'. Healthcare delivery system in the United States has undergone dramatic changes recently with the opening up avenues for long-term care, home-care, and managed-care industries, leading to decrease in number of acute-care facilities. Whereas, there is increase in hospital acquired infections proportionate with the increase of patients requiring intensive care in acute-care facilities, and the number of surgical procedures performed in outpatient settings or surgical centres. "Because of the severely ill and immunocompromised populations in these settings, prevention of infections and other adverse events is a major component of providing quality care." (Emerging Infectious Diseases 173). Despite improved operating room ventilation, sterilization methods, barriers, surgical technique, and availability of antimicrobial prophylaxis Surgical Sight Infection (SSI) is the most common nosocomial infection causing morbidity and mortality among hospitalized patients all over the world. Hospitals are breeding ground for pathogens and spread of antimicrobial-resistant bacteria, because of inefficient hand hygiene by hospital personnel and frequency of bacterial carriage by

Saturday, September 21, 2019

Description of the Activity Essay Example for Free

Description of the Activity Essay The Heijs Group is a Dutch company which is comprised of three independent operating companies. These companies are solely concerned with the supply of poultry meat. At the companies sites at Leek and Haulerwijk, the chickens are slaughtered and processed for both the deep frozen and fresh chicken markets. The third site at Hoogeveen only produces chicken fillets this is also the company which I shall examine. Heijs Food Products BV Heijs Food products BV became a division of the Heijs Group in 1997. It is purely engaged in producing top grade chicken fillets. The breasts are supplied by other production companies in the group. Once on site, the breasts are boned which produces a better quality cut of fresh chicken fillet the fillets are specifically cut to size and weight graded. They are mainly supplied to the wholesale trade nationally and abroad. Customers include the manufacturers of ready meals, catering companies and supermarkets. Heijs Food Products BV is a company whose filets chicken and makes the chicken meat ready to sell. Heijs food Products BV main objectives are to stay in the highest market segment so that they only produce high quality food. To achieve this main objective HFP has a number of systems to make sure that the product had the highest possible quality. These systems are called HCCP, IKB, GHP, DRC, ISSO9002, ACP, and BRC will be further explained later in my report. Because a few of these systems Heijs food Products BV may also sell their products to England which is their largest trading country. (BRC, ACP) P2 an description of four functional areas, including human resources, explain how each contributes to the business activity and giving examples of job roles associated with each area Quality Control Research and development The use of new and better machinery contributes with making a high quality product. Quality control makes sure that everything is all right with the food safety and hygiene. The companys policy on quality control will be controlled by special trained employees who have had training in handling with the quality control. Twice a year there is an inspection by the NEN-ISO organisation. This inspection can make a big difference for the company, if the NEN-ISO organisation concludes errors in the working method of production the certificate be put on probation for a period of time to get the entire company on the NEN-ISO standards. They do this by the following seven systems: 1 NEN -EN- ISO 9002 This international standard specifies requirements with regard to quality management. The Heijs Group are accredited with NEN -EN- ISO 9002 The objectives of the standard are: * The Heijs Group is capable of consistently supplying products which fully meet client demands and to a standard which complies with relevant legislation * Improving client satisfaction by using the standard to review and improve processes The standards in general concerns quality systems and documentation, with specific emphasis on the management of responsibility, management of resources, product development, measurement, analysis and improvement. 2 HACCP HACCP is the abbreviation for Hazard Analysis Critical Control Points. This signifies risk analysis and the management of critical points in the production process. The system has been developed as a preventative manner of work in relation to the general quality management exercised over the production of foodstuffs. The HACCP system assesses: a. biological contamination, ex. Pathogenic microbes, toxicants, microbes, yeasts, fungi, parasites b. chemical contamination such as pesticides, antibiotics, disinfection or cleansing agents, heavy metals, lubricants, additives c. Physical contamination: rust, wood chippings, metal splinters, glass, stones, plastic, hairs, construction etc. In order to prevent these dangers, there are strict measures and work agreements included in the HACCP quality system of Heijs Food Productions. 3 DLG Qualità ¯Ã‚ ¿Ã‚ ½ts Prà ¯Ã‚ ¿Ã‚ ½mierung Annually, for a number of years, Heijs Food Productions have been awarded a prize by DLG in Germany for their poultry products. The prize was in recognition for products which achieved a high organoleptic standard of products for consumers. The award considered product appearance, consistency, smell and taste. The judges were an independent panel of competent professionals who have extensive knowledge and experience of poultry products. 4 GHP-code The GHP code has two levels of standard an international standard but there is a second level which the Dutch meat processing industry has added to the standard and which has been adopted across the Country. The objective of the code is for meat processing companies to guarantee hygiene standards and to improve hygiene management. The Heijs Group believe this is a basic production requirement. The GHP code is a production requirement which has been incorporated into the IKB standard. 5 BRC Standard (Technical Standard for companies supplying retailer branded food products) The British Retail Consortium developed a technical standard for food manufacturers who supplied to the retail markets. The standard has now been adopted as a requirement of supply by many reputable internal customers and retail supermarkets. The standard includes, amongst other points: a. the application of a HACCP system b. a documented quality system c. the management of all aspects of production the product, processes and personnel to ensure food safety, quality and legality All Companies in the Heijs Group are approved to the BRC standard. The poultry processing units are approved to the Higher Level of the standard. 6 ACP (Assured Chicken Production Ltd. Poultry Standards) ACP is a full quality programme which is assessed by an independent organisation. The ACP scheme objective is to promote products that are produced to a recognised standard, which is recognised by the consumer to guarantee product safety, quality and in the case of poultry -welfare standards. The main points in the standard covers food safety, traceability, animal welfare, environmental care, and the well being and safety of animals in their rearing environment. The Heijs Group was the first company outside the UK which fully satisfied the ACP requirements. Only those Companies which satisfy the conditions laid out in the standard can apply the ACP logo on their products. ACP is a standard which has now a requirement of many supermarkets. 7 IKB The IKB chicken programme is a method for quality management in poultry production. For example in order to reduce the level of microbiological contamination of all species of salmonella there is total control through out the production chain from breeding to processing. This prevents cross contamination within the Company itself and also between other external sites. The IKB standard has specific standards to be complied with for building construction, company hygiene policies and procedures and processing techniques. Provisions are also made which have led to an improvement in the slaughter of birds which has resulted in an improvement in meat quality. The IKB standard has long been recognised by the Heijs Group as an unconditional requirement for quality chicken production. Production Within Heijs Food Productions the main department is the production part. First they get chicken breast and then the breasts are boned for a better quality cut of fresh chicken fillet, than they cut the fillets specifically to size and weight. The use of new machinery and better production methods also contribute to a better and hygiene of the product. Heijs Food Production must also keep food safety in caution because the customer demands a safe and high quality product. This is ensured by the regulations and the food safety systems which Heijs Food Productions has (Please see P1). The chicken fillets are mainly supplied to customers abroad there two main export countries are Germany and Great-Britain. Exporting there product is a main source of income. The percentage of Export and National sales are as follow: * Export 95% * National Sale 5% The delivery time on Export products are divided into two different areass as you will see below: * Fresh: 10 days (after slaughter) * Frozen: 6 months (after slaughter) Most regular customers are in the following sectors: * Manufacturers of ready meals * Catering companies * Supermarkets. Heijs Food Productions has a minimum standard of 18000 kilos production a day this is 65% of their total production capacity. This means that they are capable of producing a theoretical figure of 27692 kilos daily (depending on demand of the customer and supply by supplier). The function of the production is: * Produce high quality chicken fillets * Bone the chicken breast * Cut the Fillets specifically to size and weight After the production the product is packed either in bags or in boxes The production department contributes to the business in a way of making a high quality product. Without the production department the company would not be able to exist! This department is a crucial part of the Heijs Food Group. Marketing and Sales Within the company of Heijs there has been a separation between marketing and sales. They dont market their product a lot because good chicken fillets promote them self, they promote the company by: trucks with advertisement on it and with the package of the chicken fillets (there is also advertisement on it) Marketing activities: * Showing we have a good product (by showing certificates like ISO * Developing new packaging * Driving with trucks with our message on them On sales there are two persons active: One does all the customer contacts and one makes all the contracts and other documentation Customer contact is extremely important if you trade with other customers for example you must know what is appropriate in the country which you are trading with. The most important tasks of sales are: * Customer Contact * Orders enquiries * Making Special offers * Setting up Customer Contracts The sales department within the Heijs Company is a part which is crucial for the existence of the company. As you will know each department within a company are equally important to the business. They contribute to the existence of the company by doing there part of the business activity. Without the Sales department Heijs Food Products they would not be able to handle customers or wouldnt have customers at all. Administration The task of the administration with Heijs Food Productions is to keep a record of all the personnel like for example: sickness and absence. Also is the administration in charge of the pay wages of the personnel. The administration is set in the front of the building so that they can do the reception as well. The administration is done by one employee this person is hired to do all the administration within Heijs Food Production. Another task of the employee is taking care of all the necessary work at Reception. main activities of the Administration and Reception administration reception Keep record of personnel welcoming the visitors in charge of wages answer telephone calls write emails to customers give through messages Customer registration Financial work The reception connects telephone calls through, and gives through messages. They also reply to customer enquiries and orders. Incoming post is divided by the personal of the Administration. Welcoming visitors and guide them to the meeting or contact the person which is requested. The Administration/reception is an important task it contributes to the business in a way of doing all the administrational work if that is not done the company would not know where it would stand, and if the reception would not answer the telephone calls, and welcome the visitors the company would not make a good impression with potential customers. Human Resources With Heijs Food Production the do not have a big Human resource department. The work that the employees on the human recourse department do with Heijs Food Productions are: * Hire people (application form) * Dismiss people * Keep record of absence * Training Employees Hiring People Most of the employees which work with Heijs Food Productions are hired from a Vacancy office. Almost everybody can work with Heijs food at the production everybody gets a change: If a person is hired tell get a test period and if they pass this period they can otherwise their asked to find another job. For other leading jobs there is a whole other plan: these people must have HBO Diploma and a good Curriculum Vita. Welfare of the employees The welfare of the employees is very important; the human recourse department makes sure that the working conditions are safe and fun to work in. This is very important for the quality of the product because if the employees do not have any fun in their work, the will not do their work with care and the product is from a less quality. There are also a number of rights that all the employees have * To be paid at the agreed time * To me treated fairly * To be provided with a workspace that is healthy and save * To receive appropriate training * Not to be asked to do anything that is dangerous, unethical or illegal There are also a number of Responsibilities that all the employees have * Work conscientiously in accordance with the agreed term of their employment * Maintain standards of quality * Cooperate in trying to achieve the objectives of the business * Follow established procedures * Comply with health and safety regulations P3 A Description of how equal opportunities of employees are safeguarded by legislation How it is arranged with Heijs Food Productions? With Heijs Food Productions all the personnel equally threaten, if you work hard you can also get a promoted to a higher level on the hierarchy. An example of this is a Foreman (which is responsible for managing his area in the company), but if you do not work hard you cannot expect to get a promotion in the company. The company has a very clear policy on equal opportunities who works hard has more changes of promotion. Legislation All the employees with Heijs Food Productions have equal opportunities in the business. This legislation is arranged by law * The equal pay act 1970 (states that women performing comparable to men should me threaten equally including the same rates of payment) * The sex discrimination acts 1975 and 1986 (rule against discrimination on the basis of sex or marital status) * The race relations act 1976 (makes it illegal to discriminate against employees or potential employees on the grounds of race or ethnic grounds) * The disability discrimination act 1995 (Gives additional rights to disabled people and provides for a code of practise aimed at tending discrimination) * The employment rights act 1996 ( confirms the legal rights of employees and covers the contract of employment, payslips and other meteors Works council Act Businesses with more than 50 employees are obliged to found a work council. The work council can give advise on: * Investments * Shrinking, fusions takeovers, expansion * Hiring of advisers The work council can give approval in decisions about: * Rewarding systems Health and safety * Holiday arrangements Work deliberation * Labor arrangements P4 Communications in Business Communications in business are very important without proper communications you cannot work actively. You wouldnt know what your customers demands are and you are not well informed. This is why good communication within business is very important. With Heijs Food Productions there are a few communication types which they use: Intern communications: * Intern telephone (most often used by the management) * Intern E-mail (most often used by the management) * Intercom (used for announcements) * Oral communications (used for communication between employees) Every day there is a short briefing with the managing people, they will discuss what theyll have to do for the day and at what time they will be finished. than theyll give the orders to the employees to make the product the customer has order (for example chicken fillets of 200 gram) External Communications * Telephone ( for customer and suppliers contact) * E-mail (customer contact + suppliers) * Written Letters E-mail (customer contact + suppliers) * Fax E-mail (customer contact + suppliers) The communications with customers are very important the sales manager calls with the customer at least twice a week. They do this to make sure that the customers is satisfied about the product and for selling more chicken fillets. P5 A Comparison of the organisational structure of your chosen business with a contrasting structure Organisational Structure of Heijs Food Products BV Organisational structure of NSA I have chosen for 2 different kinds of organisational structures: * Line staff organisation (organisational chart) * flat organisational structure (hierarchical structure) Advantages and disadvantages of the hierarchical structure Advantage: * The advantage of a hierarchical structure is that the control of the organisation is kept in the hands of the person at top of the organisation. * Easy to maintain a particular identity or standard of service and quality in a large organisation. * Clear defined chain of commend, which instructions are flowing downward through all employees, and information about performance flowing upwards * Everyone in the organisations knows their role within the organisation. Disadvantage: * No limit to the number of management between the top decision maker and the shop floor or other support staff * Decision making can be slow or delayed as it takes a long time for information to flow upwards, for decisions to be taken at the top and communicated downwards again and implemented by support staff * At each level information and instructions may be interpreted differently so that information passed on, or action taken, may be biased by the attitudes of individual managers. Advantages and disadvantages of a flat structure Advantage: * The flow of information between upper and lower levels is fast this enables quick decision making and a faster response to problems. * With fewer levels of management many managers and operatives feel they have more responsibility for their own work this increases job motivation and satisfaction. Conclusion I could find any disadvantages about a flat structure so my conclusion is that a flat structure is the best one because there are no disadvantages about it (recording to the book)

Friday, September 20, 2019

Erp Implementation At Lupin Information Technology Essay

Erp Implementation At Lupin Information Technology Essay Lupin is a transnational pharmaceutical company producing an extensive range of quality specific generic and branded formulations and APIs in more than 70 countries like India, USA, Japan, South Africa, Australia, Philippines, with its headquarters located in Mumbai. Lupin was found in the year 1968 by Dr. Desh Bandhu Gupta who had the vision to fight life threatening infectious diseases and manufacture drugs which had superior quality. His dream has steered Lupin to be a part of Indias top 5 pharmaceutical companies. Lupins success story begins with the manufacture of tuberculosis drugs followed by a range of intermediaries and APIs and it also strengthened its position by making innumerable formulations. Financial Performance The following statistics about Lupin have been impacted by the recent changes in its business integration processes. In FY 2010, net sales grew by 26% to INR 47,405 million up from INR 37,759 the previous year and net profits grew at 36% to INR 6,816 million compared to INR 5,015 million in FY 2009 Manufacturing facilities Lupin has formulation plants at 5 different locations namely Aurangabad, Jammu, Mandideep, Goa and Indore and API plants at Ankaleshwar, Mandideep, Tarapur and Vadodara. Its ultimate aim is to deliver quality and scale, with successful integration of their capabilities and capacities to deliver a wide product portfolio that caters to the varied needs of diverse markets. Precisely committed to quality, safety and the environment, most of their manufacturing facilities have been inspected and approved by the US FDA and UK MHRA, WHO, Australian TGA and Japans MHLW. RD Research will continue to be the main driver for Lupins success. Lupin has a state of art Research and development centre at Pune, Maharashtra. It is a 19 acre land with more than 320 scientists working there. Lupin has 145 patents filed and 53 patents granted worldwide. BACKGROUND BEFORE ERP IMPLEMENTATION As we see above, with extensive manufacturing facilities and products coming in mainly from research, to sustain its position in the market it was essential for Lupin to integrate its manufacturing units by enhanced connectivity between them. In the year 2002, it had operations spread across 5 plants and more than 30 depots to manage. They were at this time using the FoxPro based systems. This system would not work online and the key issue with it was it used to take almost 10 days to get the month end sales figure compiled together and presented to the authorities. With this key problem in the backdrop, Lupin felt the need to adopt and implement an ERP system for its operations. At this point, Lupin initially went for a localized ERP version which was specific for every location and as per location specific requirements. But the problem here was decentralization. Lack of cohesion hampered the successful implementation of this. Thus a ERP software which would help Lupin set up, implement, monitor and evaluate business processes and then make it possible to integrate that information so that management may take a review of efficiencies was required. TIMELINE FOR IMPLEMENTATIONS OF VARIOUS ERPs AT LUPIN IMPLEMENTATION OF SAP ERP Impact SAP ERP package has benefitted LUPIN by streamlining business processes increasing accessibility and connectivity. From the time of implementation, Lupin has not required any additional staff in the service areas like accounting, IT, finance and HR. The 4 main modules, namely materials, production and quality management, have been adapted into the system. After implementation the company has doubled in size but this was possible with the same number of people. It also improved ease of access to available information. For instance, now even a sales manager has access to real time data with respect to the inventory levels which was not possible earlier. Online connectivity has improved the online accounting system considerably. It has also enhanced the inventory tracking and helped in materials planning as now the required raw materials can be ordered online, resulting in cost saving to a large extent. Implementation Problems and its overcoming Lupin had to overcome certain hurdles for the successful implementation of this ERP package. Some of these included user training including basics such as the mere operation of a computer; master data supervision, day to day trouble shooting and configuring new business processes coming into the system as per requirements. All these problems were mainly done by several rounds of user training, interaction, discussions which was mainly done by IBM. Also the 1st problem faced for implementation included to get all the disjoined systems connected online. This was done by establishing a complete VSAT network and Lotus workflows. This implementation was done by IBM and the initial investment including up gradation of network, hardware installations and cost of implementation cost Lupin around Cr.15. NEED FOR MORE ADVANCED AND SPECIFIC ERP MODULES Between the years 2003 and 2008, Lupin had successfully got US FDA approvals for plants in 5 places across India. These approvals specified stringent quality levels which needed to be measured and tracked daily. Sales and order management, travel and expense management and environmental and safety compliance management also become more and more important. It had started operations in Japan, South Africa, Australia, Germany and others through acquisitions. Regulatory compliance across these different countries needed to be managed. Accounting and financial reporting compliance was also a requirement. It had started its own research centre in Pune which required extensive information protection and security. Management of investigator sites, proper documentation, site agreements and contracts management were some other problems faced by the company. Increasing end-user productivity, product design cost estimations, shared services for HR, talent retention and attraction, procurement were some other business need faced. SOLUTIONS There were 4 major technology changes that were made to overcome a majority of these problems. Upgradation of existing SAP software to SAP ERP 6.0 Laboratory Information Management System (LIMS) from LabWare Quality Management System Enterprise version from Novatek International Language Independent Proof Reader Enterprise version from Novatek International Lupin has been successful in gaining a competitive advantage by using enterprise resource planning systems in combination with its existing systems. The major reason for this success lies in the fact that it decided to choose an ERP vendor which was familiar with the pharmaceutical industry and this gave it the advantage of financial savings and increased efficiencies. ERP IMPLEMENTATION SAP ERP 6.0 BUSINESS CHALLENGE ERP 6.0 ENHANCEMENT IMPACT Support growth plan Service in new therapy areas and business segments Accounting and Financial report Compliance: Enhanced contract accounting and collections Automated allocations and balancing by multiple dimensions Ability to operate a HR shared service center New general ledger for consolidated financial statements Better management of internal controls of 8 manufacturing units across the globe Contract Accounting with almost 10 contractors Advanced financial supply chain management Universal work lists for global operations Time management HR administrator Ensure quality compliance in products Ability to import rules regulations from third party providers Support for OSHA Monitoring dangerous material Increased support to: Occupational health Waste management Industrial hygiene Hazardous material management These factors are of utmost importance for a pharmaceutical company Sustain position of Global market leader in several drugs like cardiovascular anti-tuberculosis Better planning Better forecasting tools Investment tracking Superior product costing module Enables express Planning Business consolidations Product design cost estimate Important from global operations point of view Improve operational efficiencies in core business processes while bringing down interim costs Sales Order Management Better order-entry process Support to internet sales Price configurations Travel Expense management Speedy expense reporting Better travel planning Order quotation management Automated credit card feeds Integrated mileage calculation Mobile travel expense Integration with travel agency The implementation was done by a multi disciplinary core team from Lupin in partnership with Bristlecone, a company which specializes in SAP supply chain ERP implementation. Increasing end user productivity New application interfaces Updated role-based access Greater use of adobe interactive forms Self-serviced employees, managers Employee interaction center Laboratory Information Management System (LIMS) from LabWare Need Patent of new drugs is a very integral part of pharmaceutical companies. Also at Lupin, documentation for intellectual property management was not organized and the IP registration rules were becoming more and more stringent. Another problem faced at Lupin was that research labs were treated as a separate part of the business. As the pharmaceutical industry has gradually progressed, it has been seen that research laboratories have become an integral part if the company want sustainable growth. The key problem here was that it was difficult to communicate RD with other business systems like MRP and Process Control System. WHY LabWare LIMS Can be integrated with SAP ERP The core code is separated from the configuration and thus allows LIMS systems to be implemented with ease. Easy Upgradation Scalable architecture for centralized operations at Lupin Multi lingual support which allows application across Lupins operation globally High level of security required by research laboratories in the pharmaceutical sector Compatible with any browser including Mozilla FireFox operated in Lupin LIMS Implementation Support for LUPIN Templates were designed in accordance with the requirements of Lupin as decided by the core team. Some of the important templates designed were stability testing, environment monitoring and QA/QC manufacturing. The following chart gives an indication of the various modules of LIMS used by LUPIN Main Business System(s) Electronic Document Management Systems (EDMS) Project Management (PM) Customer Relationship Management (CRM) Testing/Stability/Shelf-Life Please refer appendix 1 for snapshots of stability and shelf life testing using LIMS Please refer appendix 2 for snapshot of a summary report of sample testing prepared by LIMS Impact: The benefit seen after the implementation of LIMS was that today when Lupin develops a new product, LIMS is used to; Test the new prototype product. Scale up manufacturing of the product Release to the market Testing defective samples after production. Environment monitoring Storage of historical research data Full sample tracking User certification Instrument and calibration management Standards reagents management Full auditing Report and sample scheduling Bar coding Please refer appendix 3 to get detailed understanding of how modules work, and information flow within the system using LIMS Quality Management System Enterprise version from Novatek International Need: Risk Reduction Integration to Key Systems Reporting: Documentation Flexibility Industry Best Practices Document Management Application Modules: SOPs, policies, work instructions Batch records Certificates of Analysis (COAs) Regulatory submissions Regulatory correspondence CAPA objective evidence Documentation related to change control Validation documentation Manuals, instructions Employee training and qualification records Project documentation Investigation documents, photographs, etc. Contractor batch records, quality records Audit reports and follow-ups Impact: Allows compliance with industry standards like 21 CFR Part 11, 21 CFR Part 210, 211, and ISO Consistent with FDA Compatible with ERP Maintenance of quality across different plants Reduce re-works scrap cost Reduce cycle time and process down time By implementing this software, Lupin has been able to manage audits like GMP/GLP/GCP, Clinical support audits, internal quality audits, site audits, pre-clinical studies etc. Language Independent Proof Reader Enterprise version from Novatek International This software is basically related to Automatic packaging. It has an Analyzer which proof reads insets, cartons and other printed material. It is language indifferent and hence most suitable for Lupin packaging as Lupin is a supplier of drugs across the globe. This software allows to spot and correct not only discrepancies between characters but also changes in color and pictures. This is very important for any drug packaging as it has life threatening outcomes. SOLUTIONS FOR THE FUTURE Lupin plans to implement more applications like the Human resources, to control attrition rates and developing the internal organizational structure. ERP 6.0 has been successful in bringing together core business components. Lupin now plans to upgrade to SAP Netweaver 7.0 and also Business Intelligence for a more extensive and specific approach to pharmaceutical operations. Personally, I believe the company should aim at integrating their system with the customers i.e. contract manufacturers to enhance their supply chain further. Bandwidth and infrastructure are the two biggest setbacks that Lupin is currently facing and needs to improve upon. APPENDIX Appendix 1 LIMS from LabWare Module: Testing Stability of a product (Various graphs for pH testing have been produced) Appendix 2 Snapshot of LIMS showing a summary report of a sample produced Appendix 3 Modules used in LIMS along with their information flow throughout the system