Write a cause and effect essay
Essay Topics For Michigan Test
Wednesday, August 26, 2020
Five Elements In The Rhetorical Situation
1. What are the five components in the logical circumstance? Use TRACE to help you remember.Text Reader Author Constraints Exigence2. In what manner can a peruser utilize the logical circumstance to examine a contention paper? How ca a watcher utilize the expository circumstance to examine a picture? In what manner can an author utilize the explanatory circumstance during the arranging period of composing a paper?They can investigate all items above by utilizing the TRACE analysis3. For what reason is the crowd significant in contention? What sorts of positions may a group of people at first hold?The crowd is significant in light of the fact that without the crowd you have no contention. You won't have the option to demonstrate your point with no crowd. The crowd may at first be an inviting crowd, unsure crowd, impartial crowd, unfriendly crowd, new crowd, or connected audience.4. What is a talk network? What exactly talk networks do you have a place? How does a talk network help bui ld up shared conviction for its members?A talk network is a gathering of individuals who share a lot of talks, comprehended as essential qualities and suspicions, and methods of imparting about those objectives. I accept that we as a whole, have a place with a few talk networks it would simply rely upon the circumstance and what your convictions are. It builds up shared conviction by having assets and companions inspired by similar convictions and ideas.5. What is the all inclusive crowd? What are the uncommon characteristics of this crowd? For what reason is it a helpful idea?A all inclusive crowd is unified with unmistakable individual contrasts yet in addition significant regular characteristics. This all inclusive crowd is instructed, sensible, typical, grown-up, and ready to tune in.
Saturday, August 22, 2020
Corporate finance Assignment Example | Topics and Well Written Essays - 3000 words
Corporate fund - Assignment Example Mill operator and Modigliani capital structure superfluity recommendation In the year 1958 Franco Modigliani and Merton Miller featured that in ââ¬Å"perfect capital marketsâ⬠the capital structure doesn't have any impact on the estimation of the firm rendering it immaterial. The ideal capital markets are not described by any market grindings like exchanging costs, charges and the data is effortlessly transmitted between the speculators and the chiefs. M&M made an understood differentiation between the money related hazard and business chance looked by a firm. While the budgetary hazard alludes to the decision of hazard dispersion between the bondholders and investors, the business chance alludes to the vulnerability of incomes of the business. It has been brought up by Miller and Modigliani that adjustments in influence doesn't cast any noteworthy impact on the incomes produced by the business. In this manner changes in influence can't adjust the estimation of the firm. .. . The organizations just as people can acquire or loan at the hazard free financing cost. The organizations utilize hazardous value and hazard free obligation. There exist just corporate assessments for example nonattendance of individual annual assessments or riches charges. They accepted unendingness of incomes for example accepting the development rate to be zero (Lee, et al., 2009, p.202). According to M&M model the estimation of turned firm (VL) is equivalent to the estimation of unlevered firm (VU). Assume there are two organizations Company 1 and Company2. It is accepted that the two organizations have indistinguishable incomes and have a place with same hazard profile. The contrast between the two organizations is concerning financing. M&M express that the market estimation of the two organizations is same. Assume the result of Company 1 in great state is 160 and in terrible state is 50. This organization is financed uniquely by the value method of financing. Thus the r esult of Company 2 is 160 in acceptable state and 50 in awful state. It is financed by the blend of obligation and value. Assume the complete obligation of Company 2 is $60 and its fairly estimated worth is $50; the market estimation of its value is $50. At that point the estimation of the Company 2 is-VL = Value of its value + Value of obligation = 50+50 =100 Now if the estimation of Company 1 is not the same as Company 2 state 103. At that point an exchange technique can be made A financial specialist can sell Company 1 at 103. He can purchase the value of Company 2 at $50 and obligation at $50. The net income is-= 103-100 =3 This procedure will proceed until the Value of Company 1 is equivalent to Company 2 (Banal-Estanol , 2010). The expansion in influence segment raises the hazard and return of the investors. This can be expressed as-RE = RO + (B/S)(RO â⬠RD) RE is the arrival on turned value RO is return on unlevered value B is the obligation esteem S is the
Sunday, August 16, 2020
Greetings From The Old Man Store Richmond Writing
Greetings From The Old Man Store Richmond Writing Today I placed an order with Staples for some supplies badly needed at the Center: Reinforcement, hole Pressboard Report Cover, side tab My reader may well wonder, why badly needed? No one died because pages fell out of a three-ring binder. We forget at times how much the work of writing still depends on paper. As much as Ive tried, mightily in fact, to be rid of paper in my office, I find that about once per year, I will need an ancient text I photocopied in grad school in the late 1980s, an article I saved and hole-punched from a moldy issue of The Chronicle of Higher Education in the mid 90s, or a news item printed from the New York Times Web site in 2005. These sorts of materials are not alien to my students, but I suspect that keeping and organizing them are as alien as, say, using a slide rule would be to their peers in the sciences. And yet a Writing Center could not exist without its crumbling archives of printed matter. One day in the not-too-distant future, such paper-based storage supplies will be as hard to locate as typewriter ribbons (Google that, you young rascals! We can still order them!). When that dolorous day arrives, Ill do one of two things. Option One: horde the remaining stocks of Dymo labels from the 1970s, hole-punch machines, and White-Out for personal use. Option Two: Open The Old Man Store, with lines of clothing (suspenders, by gum!) and food (Where in the Sam Hill can I get me any Ovaltine?). For a long while, The Vermont Country Store served this purpose, even including jabs at the young word-processing crowd in their praise for a manual typewriter (no longer available, it seems). As if my students get sweaty palms thinking about opening MS Word. I just wonder if, in a few years, their younger siblings will be saying things like OMG you still have an external computer! as they chat on their brain-implants. What that will mean for writing remains unseen, but I worry about the longevity of the technologies for paper storage. These everyday items have so long been a part of a writers fortifications against forgetfulness and stupidity.
Sunday, May 24, 2020
Viability of wind energy generation in Nigeria - Free Essay Example
Sample details Pages: 8 Words: 2365 Downloads: 8 Date added: 2019/08/08 Category Energy Industry Essay Level High school Topics: Wind Energy Essay Did you like this example? ABSTRACT Globally, it is on record that wind energy is fast becoming a growing technology in energy generation. The usual erratic and epileptic power supply in Nigeria is no longer news. This, coupled with the interest in global warming must be a great concern for all and should activate our passion to key into strong demand for wind energy generation. With the attendant advantages of absence of harmful emissions, very clean energy, a great proportion is converted into electricity. Unfortunately, Nigeria where the wind power is estimated to be high or moderate has not connected this Renewable source to the grid. It is not just enough to say that the wind turbines should be connected to the grid because there are sufficient wind speeds to drive the wind turbine, mostly, the stability, reliability and viability studies must be carried out whenever wind power is to be connected to power system to predict severe consequences on the system to which the wind generators will be applied. Donââ¬â¢t waste time! Our writers will create an original "Viability of wind energy generation in Nigeria" essay for you Create order This paper therefore assesses the viability of wind power sources in Nigeria and specifies the conditions to be met before this renewable energy can be of optimum utilization to all. INTRODUCTION Wind is one of the abundant natural energy resources in Nigeria, an alternative energy source that has not been fully developed and utilized. Considering it as a promising alternative to the current inadequate power generation will go a long way to address the epileptic power supply across the country and also cater for the teeming rural dwellers. Wind energy has been significantly developed in other parts of the world and this has helped to improve their energy status. Most countries who have considered wind energy as a viable means of power generation have found out that wind energy has a decentralized mode of operation that reduces transmission and distribution failure .Apart from this, wind energy is cheap, free, available, friendly to the environment and abundantly available. This is exactly what is obtainable in Nigeria. Wind energy can be used in form of mechanical energy, as wind generator, wind power, wind converter, wind turbine and so on. Wind as a natural phenomenon is essentially related to the movement of air masses resulting from the differential heating of the earth surface. Unfortunately the country has not realized the enormous energy generation available to us in this regard. ASSESMENT OF FAVOURABLE FACTORS FOR WIND ENERGY IN NIGERIA Location on world map In term of location, Nigeria is situated in West Africa and within latitude 4.32?ââ¬âà ¦ N and 14?ââ¬âà ¦ N and longitude 2.72?ââ¬âà ¦ E and 14.64?ââ¬âà ¦ E with a total area of 923,768 km2. As of 2014, it has a population of 186.1 million, which made it the most densely populated country in Africa .Nigeria has become Africas largest economy with the 2016 GDP estimated at USD 1.1 trillion. Its economy relies heavily on crude oil and natural gas, with a global ranking of Number 10 and Number 9, respectively, in terms of the proven reserved. Power Sector Nigeria shows a sharp rising trend,from13,463 GWh in 1990 to 30,390 GWh in 2014 .In the 1990s, oil and coal contributed up to 20% of the electricity production, but these sources were phased out, leaving only two major sources; natural gas at 82.4% and the remaining contributed by hydro (see Figure 4) .Table 3 shows the electricity usage in various sectors in Nigeria from 1990-2014,more than half of the electricity generated in Nigeria was consumed in the residential sector, followed by commercial, public service and industrial sector. OUR ENERGY SITUATION AND NECESSITY OF RENEWABLE ENERGY It is an open secret that currently our energy situation is pathetic. This is so because the total installed power capacity is 12.5 GW; 85% gas, 15% hydro only with an average available capacity of 31% [2].For an estimated population of about 200million people the demand has always outweighs the supply. With an estimated demand of 31GW as at 2015 [3], the average available capacity was 4GW (less than 35% of installed). The demand is ever increasing and current fossil fuels which have been the mainstream of our economy based generations have suffered greatly due to gas shortages, obsolete equipment, and incessant attacks on pipelines by vandals amongst other identifiable constraints. The effect of global warming and climate change is happening right now desertification of the northern part, drying of the lakes, overflow of some rivers, and encroachment of land by the ocean. Currently, only four existing project were found in the country: a 5.0 kW/h wind power project in Sayya Gida-Gada Sokoto, 0.75 kw/h Danjawa village, 1 kW/h, hybrid wind-solar in NCCE, Benin, and finally a 10 mW wind farm under construction in Katrina state and these are grossly inadequate to cater for the ever increasing population. The demand always outweighs the supply. E.g. with an estimated demand of 31GW as at 2015 the average available capacity was 4GW (less than 35% of installed). GLOBAL TRENDS IN WIND ENERGY DEVELOPMENT AND OPTIMIZATION Wind energy is today one of the fastest growing renewable energy source in the world .This is so partly because wind is among the cheapest renewable sources per unit of electricity produced. Analysis indicates that a network of land-based 2.5MW wind turbines could supply over 40 times current worldwide electricity consumption [2]. Day by day wind energy generation markets are continuously developing globally. In 2009, 82 countries used wind to generate energy, and 49 countries increased their installed capacity [3]. Middle East and Africa also recorded a total of 230MW of newly installed capacity with almost 90% growth rate in Morocco and 170% growth in Tunisia. Although these values are small compared with wind energy producing regions like North America, Europe and Asia, the presence of wind energy in remote locations of the world simply highlights the continued rapid growth in global demand for emissions-free wind power. A careful analysis of countries with high wind energy utilization have even gone a step further to patent their wind energy technology. TYPES OF WIND POWER There are different types of wind power generator but the most common are called windmills, or wind turbines. These have two major distinguishing features that differentiate them from each other. The first and most recognizable is the horizontal axis windmill, which has propeller blades similar to that of an airplane. The other type of wind power generator is the vertical axis wind turbine that is generally used in residential areas and for personal production of power. CURRENT AND FUTURE INSTALLATIONS OF WIND ENERGY POTENTIALS Several investigations have been carried out to assess wind energy potentials across Nigeria in order to identify areas best suited for wind farms. Previous work indicate that there [19, 4] are wind speed variations across Nigeria,[19, 4] and that the variations show [3,] that wind speeds are found to be higher in some parts of northern Nigeria compared to the other part of the country (seeFigure7).Specifically, investigation made by Ojosu and Salawu [19] reported that Sokoto state in the northern part of Nigeria has thehighestaveragewindspeedofabout5.12m/s annually. It has been suggested by different authors [18, 22] suggested that wind potentials in Nigeria are adequate for wind power integration to the national grid. In addition, the research carried out by the Energy Commission of Nigeria (ECN)[22]shows that it is possible to integrate wind farms at the distribution end of the national grid. Another study was reported by the African Development Bank (ADB) in 2004; to Longitude 2.72?ââ¬âà ¦ E and 14.64?ââ¬âà ¦ E with a total area of 923,768 km2 evaluate the wind energy potential in 14 selected states in Nigeria. The study concluded that by just considering only1% of land and a capacity factor of 30%, an annual generation more than 50 GWh could be achieved in those states, as demonstrated in Table 5.To date, there are no visible wind powers projects connected to the grid. On top of that, currently in Nigeria, there is no sound and working policy those private institutions can rely on to enhance the sector. Energy Policy in Nigeria Agreeably, there is a power crisis in the country and the frequent experience of scarcity of refined fossil fuels, has prompted the Nigerian government to pay attention to Renewable Energy Technologies (RETs) as alternative sources of generation. In 2015, the National Renewable Energy and Energy Efficiency Policy (NREEEP) was prepared and approved. In addition, in compliance with the ECOWAS Renewable Energy Policy (EREP), the National Renewable Energy Action Plan (NREAP) was approved in the year 2016. The Nigerian government has already developed a policy for wind energy utilization under the National Energy Master Plan. The policy states that the country shall promote its wind power resources for integration into a balanced energy mix. No effort should be spared to harness this power at an affordable cost, especially to rural settlers. Specifically, the policy outlines the following objectives: Promoting research and development in wind energy: The government should embark on high impact energy research and development activities by setting up research institutions relating to wind power technologies. Developing and deploying skilled manpower to ensure local production of wind turbines Intensifying efforts to ensure the acquisition and development of wind maps:the government shall establish more metrological centers for a regular acquisition of data relating to wind speed characteristics. Training skilled local technicians for effective and efficient operation and maintenance of wind energy system. The government shall train experts on installations, utilization and maintenance of energy systems. Providing appropriate incentives for developers and producers of wind power systems: The Government shall provide fiscal incentives, such as suspension of import duty, tax holiday, investment grants, operational grants, etc., to encourage local production of wind energy systems. Developingextensionprogramtospeedupthegeneralapplicationofwindenergytechnology: The government shall conduct public enlightenment through workshops, seminars and lectures. The government shall also design and sponsor any publicity through print and electronic media. Nigeria has already developed RE policy (wind energy inclusive). The ECN through the SERC has been empowered by the Nigerian government to carry out research and development related to wind energy. Several issues hinder the development of wind energy in Nigeria. These include inadequate funding for wind projects; lack of sufficient budget for research; specialized training of technical personnel is required; the current development is insignificant; and the lack of technical knowledge discourages the private sector from investing in new projects [23]. ECONOMIC VIABILITY AND COST PROJECTION OF WIND ENERGY Based on the wind data information from 1951 to 1960 and from twelve meteorological stations, Fagbenle et al., (1980) reported that average wind speed across Nigeria is about 3 m/s .Also, they concluded that speeds of wind are generally higher in the northern part of the country than the southern part with the highest wind speed of about 3.6 m/s recorded in the Jos area. In addition, a third degree polynomial expression for power density (W/m2) formula for Nigeria was developed as a function of average wind speed across these meteorological stations: where P is the power (W), A is the rotor swept area (m2) and U is the average wind speed (m/s). Ojosu and Salawu (1990a) reported wind speed data from 1951-1975 from 22 stations across the country and they concluded that Sokoto area (in northern part) have highest wind speed of about 5.12 m/s in June and annual average of 3.92 m/s. Furthermore, they reported wind speed of about 2 m/s or less in the middle and southern areas. Further study by these authors (1990b) that was b classified wind speeds across Nigeria into four different regimes: 1.0-2.0 m/s (e.g. Oshogbo, Minna and Yola), 2.1- 3.0 m/s (e.g. Lagos, Makurdi and Port Harcourt), 3.1-4.0 m/s (e.g. Enugu, Kano, Maiduguri) and 4.1 m/s (e.g. Jos, Nguru, Sokoto). These wind regimes are shown in Figure1. In general, the findings of Ojosu and Salawu (1990a, b) are similar to that of Fagbenle et al., (1980) used on another set of wind speed data (1968-1983). Therefore in regions with a high average wind speeds, the total costs of wind power generation are significantly less.75-80% of these costs are upfront costs of physical capital and installation [6]. The remaining costs are dispersed over the life of the wind power system and are comprised of operating, maintenance, and insurances costs [16]. Although the wind power generation is financially competitive with grid extension and diesel generators in most regions, the costs are declining. One paper estimates the effects of the experience curve in Nigeria to reduce the costs of windpower between 9% and 17% every time the installed capacity doubles. Cost Projection: larger systems range from 4 to 8 kilowatts with towers up to 100 feet tall. These will generally produce enough electricity to completely satisfy the needs of most homes with average energy efficiency [6]. This may cost between 22000 to 50000 dollars [6]. A 10 kilowatt system may go for 80000 to 120000 dollars []. This is a very substantial wind turbine system requiring a 90- to 120-foot tower [6, 16]. CONCLUSION This term paper has succinctly evaluated the viability of wind renewable energy.Several data have established the dependent of wind energy on the average wind speed obtainable in a particular environment where it is to be used. The economic viability of such is solely dependent on the consistency and characteristics of the wind speed as shown in different works and data. In view of the enormous amount of money that has gone than the drain in fixing our power sector with little or nothing to show for it, it is high time to massively deploy the nations attention and resources to wind energy generation as a viable alternative and complementing source of electricity across the country. Erratic supply of electricity in Nigeria and the near non-existence of power supply in the rural centers could be tackled headlong if the government and all stake holders will consider the viability of wind energy. Our population is a pointer for the need to launch out into annexing the gift of nature like other nations of the world to solve the energy problems and improve power generation. For this reason, renewable energy source like wind cannot be neglected and as such, wind turbine technology should be enhanced. The country urgently needs to maximize the energy mix, mixing the available renewable energy with the non-renewable fossil fuel. This can be done by developing capacities and infrastructural facilities for harvesting wind energy for power generation from sites within regions with high wind capacity to drive turbines for electricity generation across the rural areas and throughout the breathe and length of our great country, Nigeria.
Wednesday, May 13, 2020
Slavery Was The Civil War For Multiple Reasons - 1536 Words
I think slavery started the civil war for multiple reasons. The slaves were probably way beyond their limits, when it came to cruel and unusual treatment by owners. They wanted to be free; they wanted to see what it feels like to be independent. Make their own money and not get screwed out of their pay. They wanted to be looked and treated as equals of the would to be United States. They did a lot of ground work, and they felt like they deserved respect and a pay out for their dues. I think they should be compensated as well. They were brought here on ships, against their free will, sold to the highest bidder like a showroom car. They worked their tails off day in and day out, under cruel working conditions. The definition of slavery is the practice or system of owning slaves. Google also says slavery is a condition compared to that of a slave in respect of exhausting labor or restricted freedom. Slavery was pretty much frowned upon in the North. Slaves that were in the North were considered to be free but not regular people. They lived in better housing opposed to the slaves living in the south. Slaves down south worked on plantations, mostly picking cotton in the fields. Cotton was the cash crop of the south. The more they harvested the more money they made. The more money they made, the more slaves that were bought. This cycle continued until Eli Whitney invented the cotton gin. The cotton gin would remove seeds from the cotton like two or three times as fast as slavesShow MoreRelatedThe Effects Of Slavery On Women During The Civil War877 Words à |à 4 Pages The reason why movements like the Daughters of the Confederacy believe in the Lost Cause of the Confederacy, an intellectual movement that believes the civil war was fought over honor and ideals instead of slavery, is because Southern Women saw the Civil War as a war on one of the fundamentals that made up their way life. My research paper is about understanding the effects that slavery had on women during and prior to the civil war, and how the absence of slavery effected them. This research willRead MoreSlavery Is The Inhuman Act And Should Be Abolished Essay1589 Words à |à 7 PagesThroughout history, slavery has always played a vital importance in American History. Slavery has stayed constant throughout history and is still present in the modern era. As per the International Labor Organization, there are roughly 21 million people worldwide who are victims of forced labor. Although it was referred as morally unjust, slavery institutionalized by the legal means and slaveholders w ere protected by property rights. Many arguments made by those that support slavery have attempted toRead MoreThe Impact Of Abraham Lincolns Emancipation Proclamation1093 Words à |à 5 Pageson the outcome of the Civil War. However, even though Lincoln was morally against the concept of slavery, he had previously stated that he had no intention of abolishing it. Why did he explicitly violate his own word? Multiple factors played a part in Lincolnââ¬â¢s decision to emancipate the slaves. Firstly, as the conflict progressed from a minor rebellion to a full-blown civil war, Lincoln felt that the Emancipation Proclamation would strengthen the Unionââ¬â¢s position in the war. Furthermore, free African-AmericansRead MoreThe War Of The American Civil War1618 Words à |à 7 Pages A Civil War is a battle between the same citizens in a country. The American Civil War was fought from 1861 to 1865 to determine the independence for the Confederacy or the survival of the Union. By the time Abraham Lincoln was elected president in 1861, in the mist of 34 states, the constant disagreement caused seven Southern slave states to their independence from the United States and formed the Confederate States of America. The Confederacy, generally known as the South, grew to include elevenRead MorePrimary Causes Of The Civil War820 Words à |à 4 Pagesand standpoints on why the Civil War had been fought but the primary reason why the Civil War started over uncompromisable differences between free Southern states and pro-slavery Northern states and their controversy over government power and slave laws. Fought during April of 1861 to 1865, the Civil War had divided the country into a frenzy against each other. In fact, a devastating 620,000 soldiers had died from accident, combat, starvation and disease, the deadliest war in American history. To addRead MoreInterpreting The Consequences And Causations Of The American Civil War1058 Words à |à 5 PagesInterpreting the con sequences and causations of the American Civil war is a complex and multifarious issue that is defined by two predominant archetypes, the revisionist and fundamentalist viewpoints. The multiple revisionist viewpoints emphasize different interpretations of the origins and significance of the Civil War such as a Southern constitutional viewpoint, politics, economics, sectional differences between the North and South, or the great slave power conspiracy. Moreover, while some of theseRead MoreJames M. Mcpherson : An American Civil War Essay1397 Words à |à 6 PagesJames M. McPherson: James McPherson was born on October 11th 1936, he is an American Civil War historian. He received the 1989 Pulitzer Prize for Battle Cry of Freedom, his most famous book. McPherson was the president of the American Historical Association in 2003, and is a member of the editorial board of Encyclopedia Britannica. In his early career McPherson wanted to leave a legacy as being known for the historian who focusses on more than one point. Through skillful narrative in a broad-rangingRead MoreMinimum Wage vs. Slavery1407 Words à |à 6 PagesSLAVERY VS. MINIMUM WAGE Leââ¬â¢Sean Marks English 102; Civil War Term Paper March 21, 2013 In a time like today, everyone who has ever received minimum wage could agree that it is not ideal, nor is it fair in most cases. However, to compare the brutality of minimum wage to that of slavery is preposterous! In slavery, especially the slavery that occurred in America, human beings lacked more than just proper compensation for their labor. Along with not being fairly rewarded: families were rippedRead MoreThe American Civil War and Its Inevitability Essay1190 Words à |à 5 Pages The Civil War was the bloodiest and most violent war in all of Americas history. Not only did it pit brother against brother and father against son, but it also caused more deaths than all of Americas wars before or since combined. The cause for the Civil War was not a single event; instead it was a combination of several. In general, the South felt overpowered by the North socially, economically, and culturally. The two sidesââ¬â¢ ways of life were completely different in every aspect of the wor dRead MoreThe Age Of The Civil War1592 Words à |à 7 Pages The United States of America became a diversified country due to colonization, slavery, and immigration. There were various types of races, ethnicities, and nationalities all in one geographical area. There were pros and there were cons during this time in America. The cons seemed to outweigh the pros; racism, wars, and other societal problems became major issues within North America. The age of the Civil War revealed the United of States Americas societal and racial issues in great depth. Acts
Wednesday, May 6, 2020
Point of Sale and Inventory System Free Essays
string(92) " Sale System is expected to generate receipts and report list of daily and monthly revenue\." 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. We will write a custom essay sample on Point of Sale and Inventory System or any similar topic only for you Order Now 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 computer 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 Stuff the Buss Scho ol 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. The proposed computerized Point of Sale System is expected to generate receipts and report list of daily and monthly revenue. You read "Point of Sale and Inventory System" in category "Papers" 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 usually 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-driven 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 (POS) 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 are 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 socie ty 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 descriptive 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 of the people, events or situations. With this research type, it is essential that the researcher already has a clear view or picture of the phenomena 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à th e 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-f orward 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 DATA In 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 3 Computation 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 their 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 Distribution The 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 Quitâ⬠) 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 md iMain. 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 If End 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 + v bQuestion, ââ¬Å"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 Sub Private 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 Call 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. Recor dCount + 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 m nuOrder2_Click() frmOrders. Show vbModal End Sub Private Sub mnuQuit_Click() Dim reply reply = MsgBox(ââ¬Å"Do you want to Quit this program? ââ¬Å", vbYesNo + vbQuestion, ââ¬Å"Confirm Quitâ⬠) If reply = vbYes Then End End If End Sub Private Sub mnuROP_Click() Set ReOrder. DataSource = frmReProd. Adodc1. Recordset ReOrder. 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 Sub Private Sub mnuUpdateSales_Click() frmUpdateBalance. Show vbModal End Sub Private Sub mnuUser_Click() frmUser. Show vbModal End Sub Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib. Button) 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_C lick() 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 .Recordset. Update .Refresh Unload Me End With End If End If End Sub Private Sub cmdEditItems_Click() Me. AdoItems. Refresh Me. AdoItems. Recordset. Find (ââ¬Å"ItemNumber = ââ¬Ëâ⬠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. Fields(ââ¬Å"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. 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. txtAmountPaid. Text = ââ¬Å"0. 00â⬠frmNewSales. txtBalance. Text = ââ¬Å"0. 00â⬠frmNewSales. txtTotalCost. Text = ââ¬Å"0. 00â⬠rmNewSales. Text3. Text = ââ¬Å"0. 00â⬠frmNewSales. txtDeliverySatus. Text = ââ¬Å"Undeliveredâ⬠frmNewSales. dtDate. Value = date frmNewSales. DTDelivery = date Me. cmdNew. Enabled = False Me. cmdNewCustomer. Enabled = True Me. cmdPayment. Enabled = False Me. cmdReciept. Enabled = False Me. cmdEditItems. Enabled = False Me. cmdRemove. E nabled = 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 = AdoSalesInfo Grid2. Columns(1). Visible = False Grid2. Columns(2). Visible = False Grid2. Columns(5). NumberFormat = ââ¬Å"##0. 00â⬠Grid2. Columns(6). NumberFormat = ââ¬Å"##0. 00â⬠Set Grid. DataSource = AdoItems Grid. Columns(0). 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 = 9 999 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 proceed to payment because there is no item in your sales item list!!! ââ¬Å", vbExclamation, ââ¬Å"Errorâ⬠Else frmPayment. txtBalance. Text = Me. txtBalance. Text frmPayment. Text3. Text = Me. txtTotalCost. Text frmPayment. txtChange. Text = ââ¬Å"0. 00â⬠frmPayment. txtPayment. Text = ââ¬Å"0â⬠frmPayment. Show vbModal End If End Sub Private Sub cmdReciept_Click() If Me. AdoSalesInfo. Recordset. RecordCount = 0 Then MsgBox ââ¬Å"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â⬠). Controls(ââ¬Å"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(ââ¬Å"lblBalanceâ⬠). Caption = Format(frmNewSales. txtBalance. Text, ââ¬Å"#,##0. 00â⬠) RptReceipt. Sections(ââ¬Å"Section2â⬠). Controls(ââ¬Å"lblChangeâ⬠). Caption = Format(frmNewSales. lblChange. Caption, ââ¬Å"#,##0. 00â⬠) cmdNew. Enabled = True RptReceipt. Show 1 End If End If End Sub Private Sub cmdRemove_Click() Dim reply reply = MsgBox(ââ¬Å"Are you sure you want to remove this item to sales list? ââ¬Å", vbYesNo + vbQuestion, ââ¬Å"Confirmation to Removeâ⬠) If reply = vbYes Then frmNewSales. AdoItems. Refresh Call SQLDB3(AdoItems, ââ¬Å"Select * from Itemsâ⬠) frmNewSales. AdoItems. Recordset. Find (ââ¬Å"ItemNumber= ââ¬Ëâ⬠Me. AdoSalesInfo. Recordset. Fields(ââ¬Å"ItemNumberâ⬠) ââ¬Å"ââ¬Ëâ⬠) frmNewSales. AdoItems. Recordset. Fields(ââ¬Å"RemainingQtyâ⬠) = Val(frmNewSales. AdoItems. Recordset. Fields(ââ¬Å"RemainingQtyâ⬠)) + Me. AdoSalesInfo. Recordset. Fields(ââ¬Å"Qtyâ⬠) frmNewSales. AdoItems. Recordset. Update frmNewSales. AdoItems. Refresh frmNewSales. txtTotalCost. Text = Format(Val(frmNewSales. txtTotalCost. Text) ââ¬â Me. AdoSalesInfo. Recordset. Fields(ââ¬Å"TotalPriceâ⬠), ââ¬Å"##0. 00â⬠) frmNewSales. txtBalance. Text = Format(Val(frmNewSales. txtBalance. Text) ââ¬â Me. AdoSalesInfo. Recordset. Fields(ââ¬Å"TotalPriceâ⬠), ââ¬Å"##0. 00â⬠) frmNewSales. AdoSalesInfo. Recordset. Delete frmNewSales. AdoSalesInfo. Refresh Call SQLDB3(AdoItems, ââ¬Å"Select * from Items where RemainingQty ; 0â⬠) Call SQLDB(AdoSalesInfo, ââ¬Å"Select * from SalesInfo where SalesNumber='â⬠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 = AdoItems Grid. Columns(0). Visible = False Grid. Columns(2). Visible = False Grid. Columns(5). Visible = False If Me. AdoSalesInfo. Recordset. RecordCount = 0 Then Me. cmdEditItems. Enabled = False Me. cmdRemove. Enabled = False Me. cmdPayment. Enabled = False End If Else End If End Sub Private Sub Form_Load() ââ¬ËOn Error Resume Next Call SQLDB3(AdoItems, ââ¬Å"Select * from Items where RemainingQty ; 0â⬠) Call SQLDB(AdoSalesInfo, ââ¬Å"Select * from SalesInfo where SalesNumber='â⬠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 Grid. 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 = False Grid. 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 Sub Private 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 Sub Confirm 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. Enabled = False frmNewSales. cmdRemove. Enabled = False frmNewSales. Text3. Text = Format(Val(Text3. Text) ââ¬â Val(Text1. Text), ââ¬Å"#,##0. 00â⬠) Me. Text1. Text = ââ¬Å"0. 00â⬠Else Me. txtBalance. Text = Format(Val(Me. txtPayment) ââ¬â Val(Me. Text3. Text) ââ¬â Val(Me. Text1. Text), ââ¬Å"#,##0. 00â⬠) Me. txtChange. Text = ââ¬Å"0. 00â⬠Me. cmdOk. Enabled = False frmNewSales. txtBalance. Text = Format(Val(Me. txtPayment) ââ¬â Val(Me. Text3. Text) ââ¬â Val(Me. Text1. Text), ââ¬Å"#,##0. 00â⬠) frmNewSales. txtBalance. Text = Format(Val(Me. Text3) ââ¬â Val(Me. txtPayment. Text) ââ¬â Val(Me. Text1. Text), ââ¬Å"#,##0. 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 co mputerized 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 than 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 interface Log 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. ) WAIT. 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 Findings Point 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 can be useful for the company Stone Pro Enterprise. In this study considering all the factors affecting. 4. 3 Recommendation The Researchers recommend this Point of Sale System of Stone Pro Enterprise to be used in interested establishment in improving and helping people retail their products. BIBLIOGRAPHY How to cite Point of Sale and Inventory System, Papers
Monday, May 4, 2020
Case Cash and Receivables free essay sample
Instructions 1. Prepare the journal entries required to establish the petty cash fund. 2. Prepare in general journal form the entry to replenish the fund. 3. On December 31, the office manager gives instructions to increase the petty cash fund by $100. Make the appropriate journal entry. 2. Bank Reconciliation (25 min. ) Reebles Food Store developed the following information in recording its bank statement for the month of March. Balance per books March 31 $ 2,905 Balance per bank statement March 31 $10,900 ââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬âââ¬â (1) Checks written in March but still outstanding $7,000. (2) Checks written in February but still outstanding $2,800. (3) Deposits of March 30 and 31 not yet recorded by bank $5,200. (4) NSF check of customer returned by bank $1,200. (5) Check No. 210 for $594 was correctly issued and paid by bank but incorrectly entered in the cash payments journal as payment on account for $549. (6) Bank service charge for March was $50. (7) A payment on account was incorrectly entered in the cash payments journal and posted to the accounts payable subsidiary ledger for $824 when Check No. We will write a custom essay sample on Case Cash and Receivables or any similar topic specifically for you Do Not WasteYour Time HIRE WRITER Only 13.90 / page 318 was correctly prepared for $284. The check cleared the bank in March. (8) The bank collected a note receivable for the company for $4,000 plus $150 interest revenue. Instructions (a) Prepare a bank reconciliation for Reebles Food Store at March 31. (b) Prepare any adjusting entries necessary as a result of the bank reconciliation. 3. Sales Gross and Net ( 10 Min) On January 4, Mary company sold to Andry Company merchandise at a sales price of $ 6,000 with terms of 2/10, n/30, f. o. b shipping point. An invoice totaling $45 was received by Andry on January 10 from John Transport Service for the freight cost. On January 12, the company received a check for the balance due from Andry Company. (A) Prepare journal entries on the Mary Company Books to record all the events noted above under: (1) Sales and receivables are entered at gross selling price (2) Sales and receivables are entered at net of cash discounts (B) Prepare journal entry under the ââ¬Å"net of cash discountsâ⬠basis, assuming that Andry Company did not remit payment until February 2. 4. Bad Debt Reporting ( 25 Min) From inceptions of operations to December 31, 2013, Tisdale Corporation provided for uncollectible accounts receivable under the allowance method : provisions were made monthly 6% of credit sales, bad debts written off were charged to allowance account, recoveries of bad debt previously written off were credited to allowance account. The balance in the Allowance for Doubtful Accounts was $100,000 at January 2013. During 2013, credit sales totaled $10,000,000, bad debts of $150,000 were written off, and recoveries of accounts previously written off amounted to $ 40,000. Tisdale installed a computer system in November 2013 and prepared an aging of accounts receivable for the first time as of December 31, 2013 as follows. Classification by month of sale Balance in each category Estimated % Uncollectible November-December 2013 $ 1,050,000 5% July-October 2013 $ 860,000 18% January-June 2013 $ 570,000 35% Prior to 1/1/2013 $ 230,000 80% Based on the review of collectability of the account balances in the ââ¬Å"prior to 1/1/2013â⬠aging category, additional receivables totaling $80,000 were written off as of December 31, 2013. Effective with the year ended December 31, 2013, Tisdale adopted a different method for estimating the allowance for doubtful accounts at the amount indicated by the year-end aging analysis of accounts receivable. Instructions (A) Prepare a schedule analyzing the changes in the Allowance for Doubtful Accounts for the year ended December 31, 2013. (B) Prepare the journal entry for the year-ended adjustment to the Allowance for Doubtful Accounts balance as of December 31, 2013 5. Notes Receivable ( 20 Min) Presented below is information from Supply Co. Jan 1 Sold goods to Tyler. Inc by accepting $ 25. 000, 1 year 6% note. The effective interest rate is 6% Jan 10 Sold goods to Grayson Co. by accepting 2 year $30. 000, zero interest bearing notes. The market interest rate is 10 %. Jan 15 Supply Co make loan to Tech Auto. Inc by accepting $ 50. 000, 3 year 10% note. The effective interest rate is 12% Jan 20 Sold Machine having fair value $ 900. 000 in exchange for 4 year zero interest bearing promissory note in the face amount $1. 416. 163. The land is carried on Rentoulââ¬â¢s book at cost of $ 590. 000 Instructions: Prepare the journal entries for the initial transaction and recognition of the interest for first year ! 6. Transfer Receivable ( 15 min) Below is independence situation. a) Anderson Co. factored $ 200. 000 of account receivable with Finman Factors Inc, without guarantee basis. Commercial assesses a fnance charge of 5 % and retains an amount equal to 4 % of account receivable. b) Adidas Co. factored $ 300. 000 of account receivable with Finman Factors Inc, with full guarantee for credit losses. Commercial assesses a fnance charge of 5 % and retains an amount equal to 4 % of account receivable. c) On November 1, 2013 Braxton Inc. assigns $ 2. 000. 000 of its account receivable to Wilton National Bank as collateral for a $ 1. 750. 000 note. The bank assesses a finance charge of 2 % of the receivables assigned and interest on the note of 10 %. Instructions Prepare the journal for the above situation for both company. Answers: TISDALE CORPORATION Analysis of Changes in the Allowance for Doubtful Accounts For the Year Ended December 31, 2013 Balance at January 1, 2013 $100,000 Provision for doubtful accounts ($ 10,000,000 X 6%) 600,000 Recovery of bad debts written off previously 40,000 Deduct write-offs for 2013 ($150,000 + $80,000) 230,000 Balance at December 31, 2013 before change in accounting estimate.. 510,000 Increase due to change in accounting estimate during 2013 (? 526,800 ââ¬â ? 510,000).. 16,800 Balance at December 31, 2013 adjusted (Schedule 1) $526,800 Schedule 1 Computation of Allowance for Doubtful Accounts at December 31, 2010 Aging Category Balance %Uncollectible Doubtful Accounts Nov-Dec 2013 $ 1,050,000 5% $ 52,500 July-Oct 2013 $ 860,000 18% $ 154,800 Jan-Jun 2013 $ 570,000 35% $ 199,500 Prior to 1/1/2013 $ 150,000* 80% $ 120,000 $ 526,800 Sales Gross Net (A) (1) Jan 4Acc. Receivable$ 6,000 Sales$ 6,000 Jan 12Cash$ 5,880 Sales Discount$ 120 Acc. Receivable$ 6,000 (2) Jan 4Acc. Receivable$ 5,880 Sales$ 5,880 Jan 12Cash$ 5,880 Acc. Receivable $ 5,880 (B) Feb 2 Cash$ 6,000 Acc. Receivable $ 5,880 Sales Discount Forfeited$ 120 Notes Receivable Jan 1 Notes Receivables 25000 Sales25000 Jan 10 Notes Receivables39860 Sales39860 PV Principal = 50000 x PVF, 1, 12% = 50000 x 0,79719 Jan 15 Note Receivable47598 Cash47598 PV Principal = 50. 000 x 0,71178 = 35. 589 PV Interest = 5. 000 x 2,40183 = 12. 009 PV note` = 47. 598 Jan 20 Notes Receivable900. 000 Machine590. 000 Gain on sale of machine310. 000 Interest Tyler Inc. Cash1500 Interest revenue1500 Grayson Inc Notes Receivable4783,2 Interest revenue4783,2 Suppy Co. Cash5000 Notes Receivable711,76 Interest revenue5. 711,76 Rentol Notes Receivable108. 000
Subscribe to:
Posts (Atom)