تاريخچه شركت آچاچي

آچاچي نام روستايي در نزديكي شهرستان ميانه از توابع آذربايجان شرقي است و اين كارخانه در سال 1357 شروع به كار كرده است كه توسط آقاي ايراني كه مدير عامل و رئيس كنوني شركت است در واحدهاي كوچك آغاز به كار كردند و اولين كارگاه شيريني پذيري در تهران بوده كه به علت نارضايتي افراد و شهرداري به خارج از تهران انتقال پيدا كرده است چون هيچ وقت كارخانه صنعتي نمي تواند در داخل شهر باشد و نياز به متراژ بالايي دارد و پس از استقراق كارخانه براي توسعة بيشتر و تداوم و استحكام بيشتر با كارخانه اي به نام قافلانكوه متحد شدند كه بعد از مدتي همكاري به علت اختلاف نظر از يكديگر مجزا شدند هر كدام به صورت مستقل فعاليت مي كنند .

و برترين امتياز اين شركت گرفتن اولين پروانه ساخت سوهان و باسلق در ايران است .

مواد لازم جهت تاسيس يك كارخانه شكلات سازي

1)يك قطعه زمين با متراژ بالا و خارج از شهر كه داراي اين قسمت ها مي باشد :‌

(انبار – محل توليد – سردخانه – اتاق هاي داراي و نگهباني)

2)تقاضاي كتبي ه اداره كل صنايع غذايي جهت ساخت

3)تهية دستگاه هاي مورد نظر جهت توليد محصول مورد نظر

4)تقاضاي مجوز از وزارت بهداري

5)بارديد وزارت بهداري از دستگاه ها‌ و عملكرد آنها

6)گرفتن پروانه بهره برداري يعني پروانه تاسيس كارخانه

7)صدور پروانه ساخت از وزارت بهداشت

8)مهترين مساله براي ساخت كارخانه مواد غذايي اولا كارت شناسايي از اداره كل صنايع و درما صدور پروانه ساخت از وزارت بهداشت باشد و تامين نيروهاي متخصص .

وضعيت شركت آچاچي با شركت قافلانكوه .

1)تقسيم كار بين دو شركت به صورتي كه انجام عمليات داخلي اعم از پخت و بسته بندي و دريافت مواد اوليه و باز پرداخت مواد ساخته شده جهت فروش به شركت آچاچي محول شده بود و خريد مواد اوليه و بازار يابي و فروش محصولات و عمليات خارج كارخانه به عهده شركت قافلانكوه بود .

2)معيار فروش با فرمول كيفيت بالا + سود بيشتر با توليد محصول به هرميزان + سود مضاعف و بالا .

3)زياد بودن مشتري

4)عدم جوابگويي به موقع به كاركنان و پرسنل

5)اختلاف نظر بين مديريت شركت آچاچي و شركت قافلانكوه ( وجود دو مدير عامل متفاوت )

6)عدم سيستم مرتب اداري

7)توليد محصولات متنوع و يكسان نبود توليد

8)روابط عمومي قوي

قدرتهاي كارخانه آچاچي

1)تثبيت قيمت هنگام نوسان افزايش قيمت در بازار

2)تنظيم عرضه و تقاضا 

3)پيگري محصولات در بازار از نظر كيفيت – قيمت و طرح نسبت به اجناس مشابه

4)نوآوري درارائه محصولات وارائه محصولات جديد در بازار

5)ساخت مشابه محصولات خارجي

و مهمترين قدرت آنها ثبت قيمت آنهاست با اينكه مواد اوليه در فصل هاي مختلفي بوده در بعضي از فصول قيمت آن نزولي و در بعضي فصول صعودي بوده ولي هيچ يك از اينها در ثابت نبودن قيمت در اين شركت اثر نمي گذارند و همين ثابت بودن باعث اعتبار بيشتر براي شركت خواهد بود.

6)روابط دوستانه بين مصرف كنندگان

7)بالا بودن ميزان مصرف كنندگان به اجناس توليد شده جوابگوي نياز داخلي نمي باشند ( در بعضي مواقع )

8)صدور محصولات به كشورهاي ديگر بصورت غير مستقييم .

قسمت هاي شركت

مقايسه كالاي شركت آچاچي با شركت هاي داخلي هم سطح و بزرگ و خارجي

شركت آچاچي با توجه به اينكه هنوز سيستم آن كاملا مكانيزه نشده است و از نظر اداري از قبيل حسابداري و فرم هاي مخصوص و كليه ضوابط اداري ضعيف بوده ولي باشركت هاي هم سطح مثل قافلانكوه و شهدشكر وآي سودا و فرمند رقابت قابل ملاحظه اي را دارد و بيشترين اتكاء به مدير عامل شركت است كه از نظر تحصيلات بسيار پايين بوده لذا تجربه كاري بسيار بالايي دارد در اين زمينه و اطلاعات عمومي وسيعي كسب كرده ولي همچنين تلاش خود را پي گيري مي كند اما از نظر رابطه با شركت هاي بزرگ همچون مينو و آناتا و… و ساير شركت هاي قوي ضعيفت مي باشد چونكه شركت هاي مذكور از نظر دستگاهي و از نظر مالي بسيار  در سطح بالايي قرار دارند و اولين هدف شركت آچاچي رسيدن به اين درجات و درجات بالاتري است و شركت هاي خارجي كه قابل مقياس با شركت هاي ايراني نيستند زيرا كه بسيار صنعتي و مكانيزه عمل مي كنند و سطح كيفيت آنها بسيار بالا تر است .

محصولات توليدي و كد گذاري آنها :

 محصولات توليدي اين شركت شامل مي شود :

1-انواع شكلات ( مغزدار – كاكائو )

2-انواع ژله ( شكري – ميوه اي )

3-باسلق لقمه اي

4-سوهان عسلي

5-نخود چي

همه محصولات توليد شده توسط كدهايي مشخص مي شوند كه اين شركت كدهايي را كه استفاده مي كند به اين طريق است كه شماره اي را مبنا قرار داده (101) و اعداد بعدي را طبق نوبت توليد در ماه كد گذاري مي كنند مانند ( 6-2-101 ) كه اين روش توافقي به دست آمده و به كار مي گيرند و مواد اوليه در اينجا در بعضي اوقات مستقيم است مانند خريد گردو از كشاورزان و در محصولاتي كه نمي توانند چنين كاري را كنند از عمده فروش هاي بازار خريداري مي نمايند و اجناس خريداري شده بايد از محلي باشد كه تاييد وزارت بازرگاني و بهداشت باشد و مواد خريداري شده غالبا مايحتاج مصرفي هر هفته مي باشد چون در مرحله نخست نبودن انبار كافي براي نگهداري و مرحله دوم تازه بودن مواد براي كيفيت بالا است و براي خريد كالا از قسمتي كه نياز است درخواست مي شود و بعد اجازه خريد توسط صاحب نظران داده مي شود و بعد با استعلام (‌با پيش فاكتر كردن كالاها براي خريد بهترين ) خريداري مي شود و زماني در خواست خريد داده مي شود كه مواد به حد  خود رسيده باشند كه يك نوع از برگه در خواست خريد را مشاهده مي كنيد كه بايد داراي امضاء اعتبار باشد و فاكتور هاي خريد به ترتيب تاريخ در زونكني نگهداري مي شوند به دليل اينكه خريدها از مكانهاي مختلف تهيه مي شودداراي شماره سريال يكي نيستند به همين دليل به ترتيب تاريخ نگهداري مي كنند .

فرم درخواست خريد

‹شركت آچاچي›

درخواست خريد

تاريخ

رديف نوع كالا دايره درخواست كننده مقدار در خواستي ملاحضات
 

 

 

 

 

 

 

 

       

آدرس : كرج جاده محمد شهر بعد از خط راه آهن خيابان صبوري

بايد در خواست كنندگان فرم درخواست زرا به حسابداري تحويل داده تا اجازه داده شود با توافق مديران و بعد عمل انجام مي شود .

مواد خريداري شده به دو دسته تقسيم مي شوند :‌

1)مواد مصرفي خوراكي اعم از : شكر – پكتين ( عصاره ميوه ) سديم سيترات – اسيد سيتريك و اسانس

2)مواد مصرفي غير خوراكي اعم از : كاغذ – سلفون – زرورق و انواع رويه هاي بسته بندي و بعد از خريد وقتي اجناس وارد شركت مي شوند بايد شناسنامه كالاي ورودي به شركت را دارا باشند با مشخصات كامل كه نوعي از آن را مشاهده مي كنيد كه خيلي ساده طراحي شده است كه اين برگه به دست حسابداري مي رسد و پس از تائيد برگه تخليه صادر مي شود و در مرحله اول مورد نمونه برداري قرار مي گيرند .

شناسنامه كالاي ورودي

نوع كالا :

از طرف :

تاريخ ورود :‌

درجه خلوص :

و پس از ورود كالا به داخل انبار سه فرم تهيه شده كه اين فرم ها در حسابداري و اداره خريد بايگاني نگهداري مي شود .

دريافت كالا           حسابداري              اداره خريد

و براي فروش كالاها فاكتورهايي وجود دارند كه در سه برگ هستند كه اين فاكتورها در دفاتر طبق شماره سريال نگهداري مي شوند و در اين شركت براي فروش‌هاي نسيه خود تخفيفهايي را تعيين كرده اند هم نسيه و هم تخفيف هاي تجاري و فروش هاي نسيه به افرادي تعلق مي گيرد كه شركت شناخت كافي نسبت به آنها داشته باشند .

شماره مسلسل :                       شركت آچاچي

تاريخ :                                 فاكتور فروش

خريدار :                   توسط :                       آدرس :
شماره شرح كالا تعداد قيمت واحد مبلغ
 

 

 

 

 

       
آدرس : كرج جاده محمد شهر بعد از خط راه آهن خيابان صبوري

و سه برگ فاكتور در سه رنگ متفاوت ( سفيد ، سبز ، زرد است ) كه برگه سفيد در حسابداري و سبز به خريدار و زرد بايگاني است كه توزيع آنها به صورت زير است :

فاكتور فروش          حسابداري              تقاضا كننده(خريدار)  

مسئوليت فروش كارخانة آچاچي بيشتر مربوط به معاون مي باشد كه نقش كليدي در كارها را دارد غالبا مشتريان شركت شناخته شده هستند و نيازي به تبليغ كالا و شناخت آن ندارند و طي سالهاي متمادي از شركت آچاچي خريد داشته اند و مشتريان شركت به دو دسته تقسيم مي شوند :

1)عمده فروش هاي مواد غذايي      2)خرده فروشها

عمده فروشهاي غذايي كه خريد عمده محصولات شركت باشند معمولا با گرفتن تماس تلفني و اعلام و ميزان سفارش كالاي خود را دريافت مي نمايند و شركت براي فروش محصولات خود قيمت پايه اي براي هر محصول تعيين مي كند كه عمده فروشها براي خريد از تخفيف 5 الي 10 % به صورت متغيير استفاده مي نمايند و خرده فروشها مانند سوپرماركتهاي بزرگ و فروشگاههاي زنجيره اي و شيريني فروشيهايي هستند كه فروش محصولات شركت به خرده فروش هاي به همان قيمت پايه تعيين شده است و شركت از كارت انبار جهت موجودي كالا بخاطر خريدها و فروشها استفاده مي كند تا از مقدار و ارزش موجوديهايش اطلاع داشته باشد كه شامل تاريخ با شماره رسيد و حواله انبار ، شرح ، وارده و صادره كه خود اين دو داراي سقفهاي ( مقدار با نرخ با مبلغ ) هستند .

كارت انبار ( موجودي كالا )
تاريخ دستگاه رسيد حواله انبار شرح وارده صادره
مقدار نرخ مبلغ مقدار نرخ مبلغ
 

 

 

 

 

 

 

 

 

 

 

 

               

و اين شركت از حساب تنخواه گردان نيز استفاده مي كند براي هزينه هاي تصادفي و كارهاي ضروري كه اين فرم به اين صورت تهيه شده ، و پس از خريد انجام شده يا هزينه انجام شده آن پر مي شود كه داراي رديف ، مشخصات مدارك كه خود شامل شماره و نام فروشنده مي شود و شرح ، واحد كالا ، مقدار ، قيمت هر واحد ، مبلغ كل ، ملاحضات است .

رديف شماره  نام فروشنده شرح واحد كالا مقدار قيمت هر واحد مبلغ كل ملاحضات
 

 

 

 

 

 

 

 

 

             

ماشين آلات مورد استفاده و نيرو هاي مورد نياز بردستگاه ها :

1)والس ( شكلات را بصورت توپ نرم مي كند و به ميكسرها انتقال مي دهد ) كه دستگاه والس نياز به چهار نفر دارد .

2)آسياب شكر ( شكر را مانند آرد پودر مي كند ) و يك نفر كارگر دارد .

3)مسيكر ( وظيفه هم زدن و مخلوط كردن را دارد كه بعد از مخلوط آماده قالب گيري مي شود ) يك نفر

4)ديپازيتور ( نوعي دستگاه پر كن است كه مغز شكلات را با هم مي سازد ) چهار نفر .

5)سرد خانه ثابت و متحرك هر كدام يك نفر

6)دستگاه بسته بندي ( پلمپ كردن مواد ساخته شده ) يك نفر

7)دستگاه شيرينگ ( كشيدن سلفون روي بسته ها ) يك نفر

8)دستگاه پر كن ( براي بسته بندي و وزن كشي محصول ) سه نفر

كه دستگاه هاي شكلات سازي مانند شكلات مغز دار و كاكائو در اين شركت به طور مكانيزه است و در بعضي محصولات مانند ژله ساخت محصول به صورت نيمه دستي و نيمه مكانيزه صورت مي گيرد به طوري كه نيمه از كار كه مرحله پخت مي باشد با دستگاه مخصوص  مي باشد و نيمي ديگر قسمت تزريق آن است كه با دست و با ظرف مخصوص استيل انجام مي شود . چونكه دستگاهي كه اين عمل را انجام مي دهد فقط نمونه خارجي دارد و مبلغ آن خيلي بالا است و در ايران نمونه مشابه ندارد كه حتي مسئولان اين كارخانه نيز دوبار اقدام به ساخت آن كرده اند كه دستگاه جوابگوي نياز كاخانه نشده است و كارايي نداشته است در نتيجه روش ژله به صورت نيمه دستي اعمال مي شود .

كا آفريني شركت و كار در پرسنلي آن طوري است كه در اوايل سال و اواسط سال از بازار فروش پاييني برخوردار هستند كه در اين دوران حدود 50 اي 60 نفر نيروي انسامي استفاده كننده و براي آنها در اواخر سال چنين اقدامي پاسخگو نيست زيرا كه حجم كار به اوج فعاليت خود مي رسد و نيروي انساني به كار گرفته نشده به 130 الي 150 نفر مي رسد .

« گردش مواد براي كامل شدن »

توليد

و براي اعزام كالا به محل هاي خود از آزمايش هاي شركت استفاده مي كنند كه افرادي كه اين كار انجام مي دهند فقط در مدت سي دقيقه بايد بار گيري كنند كه فرم عملكرد ماشين هاي شركت تهيه شده كه داراي مشخصات زير است :

گزارشي از عملكرد ماشين هاي شركت
روز راننده ماشين شروع بارگيري اتمام بارگيري زمان تاخير بارگيري مكانهاي اعزامي ملاحضات
 

 

         

 

 

 

 

 

 

 

 

 

 

و اگر تاخير صورت گيرد در قسمت ملاحضات نوشته مي شود

اما شركت آچاچي براي بهبود كيفيت محصولات و بالا بردن سطح كارخانه انتظار حمايت از دولت را دارد زيرا اين شركت از  سمت دولت هيچ تاميني ندارد و بصورت اسمي ثبت شده است و مواردي كه انتظار دارد شامل :

1)وامي تا سقف يك ميليار تومان

2)بهره وام به حداقل خود

3)تسهيلات ويژه براي وارد كردن دستگاههايي كه در ايران موجود نمي باشد يا دستگاه هاي خارج شده از رده .

4)حمايت و سرمايه گزاري باز روي كليه صنايع

5)تسهيلات آسان براي صادر كردن كالا

6)كمك براي استخدام و يا يافتن افراد مجرب و تحصيل‌كرده و متخصص صنايع غذايي و تكنسين دستگاه هاي موجود ماشين آلات وارده ( اعم از داخلي و خارجي )

تعهدات شركت در قبال حمايت دولت :

1)ايجاد اشتغال براي حدود پانصد نفر افراد ( متخصص و غير متخصص )

2)بالا بردن كيفيت در سطح رقابت با محصولات خارجي

3)بالابردن ميزان توليد كه جوابگوي بازار داخلي باشد

4)بالابردن ميزان توليد و كيفيت فوق العاده جهت صدور كالا به كشورهاي همسايه و اروپايي و وارد كردن از خارج به داخل كشور

5)صنعتي شدن تمامي سيستم شركت

مشكلات موجود در شركت :‌

مشكلاتي كه در اين شركت ديده مي شد سنتي بودن سيستم است كه با افزايش جمعيت و با روند فعلي و با توجه به اينكه در حال حاضر شركت جوابگوي نياز مشتريان نيست و اين سيستم بايد در بخش هاي حسابداري و انبار گرداني صورت گيرد چون در حسابداري اگر به صورت دستي صورت گيرد از درصد اشتباه بالايي برخوردار است و خيلي كند پيش مي رود و همچنين در انبار كه به آساني مي توانند در كوتاهترين مدت از موجودي انبار اطلاعات كسب نمايند و نبودن مهندسين صنايع كه مي توانند ضايعات را به حداقل برسانند و زمان كمتري براي توليد استفاده نمايند و نبودن متخصصين ماشين آلات در داخل مثل دستگاه والس كه اگر خراب شود متخصصين بايد از تركيه يا ديگر كشورهاي بيايند تا تعمير شود كه شامل هزينه بسيار بالايي است و يا دستگاه ديپازيتور كه يك متخصص در داخل كشود در مشهد وجود دارد .

تلاش هاي شركت بت وضعيت كنوني :

سفارش ساخت دستگاه ديپازيتور در داخل كه حدود يك هفتم قيمت مشابه خارجي آن مي باشد كه حدود ( پانزده ميليون تومان ) است كه ساخت سردخانه متحرك كه بعضي از شركت ها داراي چنين سرد خانه اي هستند ارتقاء كيفيت بعد از جدا شدن از شركت قافلانكوه و كاهش 10% قيمت كه متقابلا 100% افزايش بيشتري داشته و تلاش مجراي بستن قرار داد و با كشور هاي ( اكراين ، آذربايجان – عربستان ) جهت صدور مستقيم كالا است .

قيمت گذاري محصولات :

براي قيمت گذاري در اين شركت بر روي كالاها به صورتي انجام مي شود كه كليه مبالغي كه براي مواد اوليه پرداخت كرده ايم را حساب مي كنيم و از قيمت تمام شده 15 الي 20 درصد از سود را حساب مي كنيم كه از قيمت تمام شده 2% را به عنوان پرت آسياب در نظر مي گيرد و بر مبناي آن حساب مي كند مثلا براي شكلات كاكائو چنين قيمت گذاري مي شود :

شرك       450    كيلو گرم       90000      تومان

روغن      200    كيلو گرم       200000 تومان

شير       75     كيلو گرم       4000       تومان

كاكائو       100    كيلو گرم       10000      تومان

5/808=2%(پرت)–               825    كيلو گرم       340000 تومان

                                20%

                            68000      سود

كه در پايان قيمت بدست آمده را بر محصول توليد شده تقسيم كرده كه براي هر محصول بدست مي آيد .

پرداخت حقوق كاركنان

اين شركت براي پرداخت حقوق كاركنان از اول ماه شروع مي كنند زيرا كه دستي عمل مي نمايند اين كار را انجام مي دهند تا رمان كافي براي ثبت آنها را داشته باشند كه در فرمهاي حقوقي وارد مي نمايند كه مشابه اين فرم را مي بينيد :

ليست حقوق
رديف حقوق ناخالص كسورات جمع كسورات مبلغ خالص پرداختي رسيد
قانوني اختياري
ماليات 1% بيمه 7% وام بدهي به تعاوني
 

 

 

 

               
جمع              
7% حق كاركنان    
23% سهم كارفرما    
حق بيمه كل    

و شر كت مي تواند با چنين طراحي يك سيستم ساده ثبت اطلاعات پرسنلي و محاسبه حقوق كارمندان شركت را مكانيزه نمايد .

شرح سيستم : اين سيستم شامل دو فايل بانك اطلاعاتي است ساختار آنها  به شرح زير است .

1-فايل  – جهت ذخيرعه اطلاعات پرسنلي كار مندان

رقم هاي اعشاري طول فيلاد نوع فيلد نام فيلد فيلد
  4 كاركتري كد كارمند
  12 كاركتري نام
  20 كاركتري نام خانوادگي
  1 منطقي وضعيت تأهل
0 1 عددي تعداداولادد
0 6 عددي حقوق روزانه

فايل  بايد بر ساس فيلد  ايندكس شده و تحت نام  ذخيره گردد .

2-فايل  – جهت ذخيره اطلاعات حقوقي كارمندان

رقم هاي اعشاري طول فيلاد نوع فيلد نام فيلد فيلد
  4 كاركتري روزهاي كاركرد
0 2 عددي ساعت اضافه كاري
0 3 عددي حقوق ناخالص
0 8 عددي حقوق خالص
0 8 عددي حقوق خالص
0 2 عددي ماه پرداخت حقوق

فايل  بايد بر اساس فيلد  ايندكس شده و تحت نام  ذخيره گردد .

در شروع كار منوي اصلي با گزينه هاي زير روي صفحه نمايش ظاهر مي شود .

1-اطلاعات پرسنلي 2-اطلاعات حقوقي    3-گزارشات 4-خروجي

اطلاعات پرسنلي

با انتخاب اين گزينه از منوي اصلي ، منوي ديگري با 3 گزينه زير ظاهر مي شود .

1-استخدام كارمند : دريافت اطلاعات پرسنلي كارمند جديد و ثبت آن در فايل

2-تغيير اطلاعات : ويرايش پرسنلي يك كارمند خاص

3-حذف يك كارمند :‌ حذف اطلاعات پرسنلي يك كارمند خاص

اطلاعات حقوقي

با انتخاب اين گزينه از منوي اصلي ، منوي ديگري با دو گزينة‌زير ظاهر مي شود .

1-اطلاعات ماهانه : دريافت روزهاي كاركرد و ساعات اضافه كاري كارمند در يك ماه خاص ، محاسبه حقوق كارمند و ثبت آن درفايل

2-تغيير اطلاعات :‌ ويرايش اطلاعات ماهانه يك كارمند خاص ، محاسبه مجدد حقوق كارمند و ثبت آن در فايل

محاسبه حقوق و ماليات كارمند با استفاده از فرمول هاي زير انجام مي گيرد .

حقوق روزانه * روزهاي كاركرد = حقوق ماهانه 

 * حقوق روزانه * ساعات اضافه كاري = اضافه كاري

7% * حقوق ماهانه = ماليات

ماليات – اضافه كاري + حقوق اولاد + حقوق ماهانه = حقوق خالص

گزارشات

با انتخاب اين گزينه از منوي اصلي ، موي ديگري با 5 گزينه ظاهر مي شود .

1-اطلاعات يك كارمند

اين گزينه بعد از دريافت كد كارمندي ، اطلاعات پرسنلي مربوط به كارمند مورد نظر را نشان مي دهد .

اطلاعات كليه كارمند

اين گزينه اطلاعات پرسنلي كليه كارمندان را به ترتيب كد كارمندي آنها درون جدول به شكل زير نشان مي دهد .

رديف كد نام نام خانوادگي وضعيت تاهل تعداد اولاد حقوق روزانه
 

 

 

 

 

 

           

 3-اطلاعات ماهانه كارمندان

اين گزينه بعد از دريافت كد كارمندي ، اطلاعات حقوقي مربوط به كارمند مورد نظر را در يك ماه خاص نشان مي دهد .

اطلاعات سالانه كارمند

اين گزينه بعد از دريافت كل كارمندي ، كليه اطلاعات پرسنلي و حقوقي مربوط به كارمند مورد نظر را در جدولي به شكل زير نمايش مي دهد .

نام كارمند :                               تعداد اولاد :‌                     حقوق روزانه :
رديف كد ماه روزهاي كاركرد ساعات اضافه كاري اضافه كاري حقوق ناخالص دريافتني
 

 

 

 

 

 

 

           

5-اطلاعات ماهانه كارمند

اين گزينه اطلاعات حقوقي كليه كارمندان را در يك ماه خالص در جدولي به شكل زير نمايش مي دهد .

جدول اطلاعات حقوق ماه :
رديف كد نام نام خانوادگي ساعت اضافه كاري ناخالص دريافتني
 

 

 

 

 

 

 

             

خروج

با نتخاب اين گزينه ، اجراي برنامه خاتمه مي يابد .

ليست برنامه :

!EGAF > NUL

SET TSLK OFF

SE T DELETED ON

SET CONFIRM ON

SET BLINK OFF

RESTORE FROM FCHR

DO WHILE .T.

CLOSE ALL

 SET COLOR TO W/BG

 CLEAR

 @1,29 SAY [ مجتمع فني تهران  ] COLOR W + /BR

 SET COLOR TO W+/N

@3,11 CLEAR TO 5,71

 @2,10 TO 4,69 DOUBLE COLOR W + /B

SET COLOR TO W + /W

@3,11 CLEAR TO 3,68

SET COLOR TO W + /B + ,GR + /N +

@2,12 PROMPT , 1- اطلاعات پرسنلي  MESSAGE  استخدام ، تغيير اطلاعات و حذف يك كارمند

@3,29 PROMPET 2-اطلاعات حقوقي MESSAGE  ورود و تغيير اطلاعات ماهانه كارمندان  

@3,46 PROMPET 3-گزارشات  MESSAGE  مشاهده اطلاعات پرسنلي و حقوق كارمندان   

@3,61 PROMPET 4- خروج MESSAGE  پايان و خروج از برنامه   

MENU TO CHOICE

DO CASE

CASE CHOICE = 1

 SET COLOR TO W + /N

@8,14 CLEAR TO 12,32

@7,13 TO 11,30 DOUBLE COLOR W + /B*

 SET COLOR TO W + /B+,GR+/N+

@8,14  PROMPT ا- استخدام كارمند  

@9,14  PROMPT 2- تغيير اطلاعات

 @10,14  PROMPT 3- حذف يك كارمند

MENU TO CH1

IF LASTKEY 0=27

LOOP

ENDIF

DO PROC-SAL WITH CH2

CASE CHOOICE = 3

SET COLOR TO  W+/N

@8,46 CLEAR TO 14,71

@7,44 TO 13,69  DOUBLE COLOR W+/B*

SET COLOR TO  W+/B+,GR+/N+

@8,45  PROMPT 1-اطالاعات كارمند

@9,45  PROMPT   2-اطلاعات كلي كارمندان

@10,45  PROMPT 3-اطلاعات ماهانه كارمند         

@11.45  PROMPT 4-اطلاعات سالانه كارمند

@12,45  PROMPT 5-اطلاعات ماهانه كارمندان

CH3=0

MENU TO CH3

IF LASTKEY0=27

LOOP

ENDIF

CASE CHOICE = 4

SET COLOR TO

CLEAR

CLOSE ALL

SET TALK ON

SET DELETED OFF

SET CONFIRM OFF

SET BLINK ON

EXIT

ENDCASE

ENDDO

***************** START OF PROCEDURE PROC_WORK     ****************

PROCEDURE PROC_WORK

PARAMETERS PAR1

CLEAR

DO CASE

CASE  PAR1=1

 DO WHILE .T.

 SET COLOR TO W/BG

CLEAR

SET COLOR TO W+/N

@3,16 CLEAR TO 15,66

@2,15 TO  14,64 DOUBLE COLOR W+/B*

@2,33 SAY استخدام يك كارمند       

SET COLOR TO W+/W

@3,16 CLEAR TO 13,63

SET COLOR TO W+/B,GR+/N+

@3,37 SAY كد كارمندي :

COD1=FNST (3,45,[           ])

USE WORKER INDEX WORKIND

LOCATE FOR ALLTRIM (CODE) = ALLTRIM (COD1)

IF EOF0=.F.

WAIT  كارمندي بااين كد وجوددارد  WINDOW

ELSE

APPEND BLANK

@5,45 SAY نام كارمند :

@7,45 SAY نام خانوادگي :

@9,45 SAY وضعيت تاهل :

@11,45 SAY تعداد اولاد :

@11,27 SAY حقوق روزانه :

N1=FSTR (5,37,SPACE (12))

F1=FSTR (7,37,SPACE (20))

@9,43 GET MARID PICTURE ”L”

READ

C1=FNUM(11,37,0,1,0)

S1=FNUM(11,55,0,6,0)

REPLACE CODE WITH N1

REPLACE NAME WITH N1

REPLACE  FAMILY WITH F1

REPLACE CHID WITH C1

REPLACE SAL WITH S1

ENDIF

YN=,Y,

@14,25 SAY : (Y/N)  كارمند وجود دارد

@14,23 GET YN PICTURE “Y”

READ

IF YN = ,Y,

LOOP

ELSE

EXIT

ENDIF

ENDDO

CASE PAR 1=2

DO WHILE .T.

SET COLO TO W/BG

CLEAR

SET COLOR TO W+/N

@3,16  CLEAR TO 15,66

@2,15  TO 14,64 DOUBLE COLOR W+/B*

@2,30 SAY  تغيير اطلاعات يك كارمند

SET COLOR TO W+/W

@3,16 CLEAR TO 13,63

SET COLOR TO W+/B+,GR+/N+

@2,37 SAY  كد كارمندي :

COD1=FNST(3,45,[            ])

USE WORKER INDEX WORKIND

LOCATE FOR ALLTRIM(CODE)=ALLTRIM(COD1)

IF EOF0 = .t.

WAIT  كارمندي با اين كد وجود ندارد WINDOW

ELSE

@5,45 SAY  نام كارمند :

@7,45 SAY  نام خانوادگي :

@9,45 SAY  وضعيت تاهل :

@11,45 SAY  تعداد اولاد :

@5,32 SAY  NAME

 @7,24 SAY FAMILY

@9,43 SAY  MARID

@11,43 SAY  FNTS (CHILD.1,0)

@11,18 SAY FNTS (SAL,6,0)

N1=NAME

F1=FAMILY

N1=FSTR(5,37,N1)

F1=FSTR (7,37,F1)

@9,43 GET MARID

READ

C1=FNUM(11,37,0,1,0)

S1=FNUM(11,57,0,6,0)

REPLACE NAME WITH N1

REPLACE FAMILY WITH F1

REPLACE CHILD WITH C1

REPLACE SAL WITH S1

ENDIF

YN=,Y,

@14,25 SAY : (Y/N) آيا كارمند ديگري وج.د دارد

@14,23 GET YN PICTURE “Y”

READ

IF YN=,Y,

LOOP

ELSE

ENDDO

CASE PAR1=3

SET COLOR TO W/BG

CLEAR

SET COLOR TO W+/N

@3,16 CLEAR TO 15,66

@2,15 TO 14,64 DOUBBLE COLOR W+/B*

@2,30 SAY  حذف اطلاعات يك كارمند

SET COLOR TO W+/W

@3,16 CLEAR TO 13,63

SET COLOR TO W+/B+,GR+/N+

@3,37 SAY   : كد كارمندي  

COD1=FNST(3,45,[               ])

 USE WORKER INDEX WORKIND

LOCATE FOR ALLTRIM(CODE)=ALLTRIM(COD1)

IF EOF0= .T.

WAIT  كارمندي با اين كد وجود ندارد WINDOW

ELSE

@5,45 SAY  نام كارمند  :

@7,45 SAY  نام خانوادگي  :

@9,45 SAY  وضعيت تاهل :

@11,45 SAY  تعداد اولاد :

@11,25 SAY  حقوق روزانه :

@5,32 SAY  NAME

@7,24 SAY  FAMILY

@9,43 SAY  MARID

@11,43 SAY  FNTS(CHILD,1,0)

@11,18 SAY  FNTS(SAL,6,0)

YN= ,N,

@4,25 SAY (Y/N)آيا كارمند فوق را حذف مي كنيد

@14,23 GET YN PICTURE “Y”

READ

IF YN=,Y,

DELETED

PACK

ELSE

RETURN

ENDIF

ENDIF

ENDCASE

********************     START OF PROCEDURE PROC_SAL     *********************

PROCEDURE PROC_SAL

PARAMETERS BAR1

DO CASE

CASE BAR1=1

MON1=0

DO MONTH

IF LASTKEY0=27

RETURN

ENDIF

SET COLOR TO W/BG

CLER

SET COLOR TO W+/BG

CLEAR

SET COLOR TO W+/N

@3,16 CLEAR TO 15,66

@2,15 TO 14,64 DOUBLE COLOR W+/B*

@2,27 SAY  ورود اطلاعات ماهانه يك كارمند :

DO WHILE .T.

SET COLOR TO W+/W

@3,16 CLEAR TO 13,63

SET COLOR TO W+/B+,GR+/N+

@3,36 SAY  كد كارمندي :

COD1=FNST(3,46,[         ])

USE WORKER INDEX WORKIND

LOCATE FOR ALLTRIM(CODE)=ALLTRIM(COD1)

IF EOF0= .T.

WAIT  كارمندي با اين كل وجود ندارد  WINDOW

ELSE

SAL1=SAL

CH1=CHILD

USE SALARY INDEX SALIND

LOCATE FOR MONTH=MON1 AND ALLTRIM(CODE)=ALLTRIM(COD1)

IF EOF0= .F.  WAIT  اطلاعات ماهانه اين كارمند قبلا وارد شده است  WINDOW

ELSE

STORE 0 TO DAY1,OVER1

APPEND BLANK

DO PROC_2

ENDIF

ENDIF

YN= ,Y,

@14,25 SAY : (Y/N)  آيا كارمند ديگري وجود دارد

@14,23GET YN PICTURE “Y”

READ

IF YN=’Y’

LOOP

ELSE

 RETURN

ENDIF

ENDDO

CASE BAR1=2

MON1=0

DO MONTH

IF LASTKEY0=27

RETURN

ENDIF

SET COLOR TO W/BG

CLEAR

SET COLOR TO W+/N

@3,16 CLEAR TO 15,66

@2,15 TO 14,64 DOUBLE COLOR W+/B*

@2,27 SAY  تغيير اطلاعات ماهانه يك كارمند

DO WHILE .T.

SET COLOR TO W+/W

@3,16 CLEAR TO 13,63

SET COLOR TO W+/B+,GR+/N+

@3,36 SAY  كد كارمندي :

COD1=FNST(3,46,[            ])

USE WORKER INDEX WORKIND

LOCATE FOR ALLTRIM(CODE)=ALLTRIM(COD1)

IF EOF0= .T.

WAIT  كارمندي با اين كد وجود ندارد  WINDOW

ELSE

SAL1=SAL

CH1=CHILD

USE SALARY INDEX SALIND

LOCATE FOR MONTH=MON1 AND ALLTRIM(CODE)=ALLTRIM(CODE)

   IF EOF0= .T.

WAIT  اطلاعات ماهانه اين كارمند وجود ندارد  WINDOW

ELSE

OVER1=OVER

DAY1=DAYS

DO PROC_2

ENDIF

ENDIF

YN=’Y’

@14,25 SAY : (Y,N)   آيا كارمند ديگري وجود دارد

@14,23 GET YN PICT “Y”

READ

IF YN=’Y’

LOOP

ELSE

RETURN

ENDIF

ENDDO

ENDCASE

*********************      START OF PROCEDURE PROC_2     **********************

PROCEDURE PROC_2

@5,47 SAY روزهاي كاركرد :

@5,22 SAY ساعات اضافه كاري :

DAY1=FNUM(5,35,DAY1,2,0)

OVER1=FNUM(5,60,OVER1,3,0)

DO CASE

CASE CH1=0

H-CHILD=0

CASE CH1=1

H-CHILD=6000

OTHER WISE

H-CHILD=12000

ENDCASE

REPLACE CODE WITH COD1

REPLACE DAYS WITH DAY1

REPLACE OVER WITH OVER1

REPLACE GROSS WITH DAY*SAL1

REPLACE NET WITH GROSS*.93+H-CHILD+OVER1*30/150*SAL1

REPLACE MONTH WITH MON1

@7,45 SAY حقوق ماهانه :

@7,36 SAY FNTS(GROSS,8,0)

@9,45 SAY حقوق اضافه كاري  :

@9,36 SAY FNTS(OVER*30/150*SAL1,8,0)

@11,45 SAY حقوق دريافتني :

@11,36 SAY FENTS(NET,8.0)

*********************      START OF PROCEDURE MONTH   

PROCEDURE MONTH

SET COLOR TO W/BG

CLEAR

SET COLOR TO W+/N

@3,36 CLEAR TO 16,70

@2,54 TO 15,68 DOUBLE COLOR W+/B*

@2,55 SAY  انتخاب ماه

SET COLOR TO W+/W

@3,55 CLEAR TO 14,67

SET COLOR TO W+/B+,GR+/N+

@3,55 PROMPT  1-فروردين  

@4,55 PROMPT  2-ارديبهشت

@5,55 PROMPT  3-خرداد

@6,55 PROMPT  4-تير

@7,55 PROMPT  5-مرداد

@8,55 PROMPT  6-شهريور

@9,55 PROMPT  7-مهر

@10,55 PROMPT  8-آبان

@11,55 PROMPT  9-آذر

@12,55 PROMPT  10-دي

@13,55 PROMPT  11-بهمن

@14,55 PROMPT  12-اسفند

MENU TO MON1

START OF PROCEDURE REPORT    

PROCEDURE REPORT

PARAMETERS BAR1

DO CASE

CASE BAR1=1

SET COLOR TO W/BG

CLEAR

SET COLOR TO W+/N

@3,16 CLEAR TO 15,66

@2,15 TO 14,64 DOUBLE COLOR W+/B*

@2,32 SAY اطلاعات يك كارمند

DO WHILE .T.

SET COLOR TO W+/W

@3,16 CLEAR TO 13,63

SET COLOR TO W+/B+,GR+/N+

@3,38 SAY كد كارمندي :

COD1=FNST(3,44,[            ])

USE WORKER INDEX WORKIND

LOACATE FOR ALLTRIM(CODE)=ALLTRIM(COD1)

IF SEOF0= .T.

WAIT  كارمندي با اين كد وجود ندارد WINDOW

ELSE

@5,45 SAY  نام :

@7,45 SAY  نام خانوداگي :

@9,45 وضعيت تاهل  :

@11,45 SAY  تعداد اولاد :

@11,25 SAY  حقوق روزانه :

@5,32 SAY  NAME

@7,24 SAY  FAMILY

@9,43 SAY  MARID

@11,43 SAY  FNTS(CHILD,1,10)

@11,18 SAY  FNTS(SAI,6,0)

ENDIF

YN=’Y’

@14,28 SAY :(Y/N) آيا ادامه مي دهيد  

@14,26 GET YN PICT “Y”

READ

IF YN=’Y’

LOOP   

ELES

EXIT

ENDIF

ENDDO

CASE BAR1=2

CLEAR

@0,2 SAY 

@1,2 SAY ||حقوق  ||    تعداد   ||      وضعيت ||  نام و نام خانوادگي  || كد || رديف   ||

@2,2 SAY ||  روزانه||  اولاد       ||       تاهل     

@3,2 SAY 

USE WORKER INDEX WORKIND

K=4

I=0

SCAN

I=I+1

@K,2 SAY 

@K,3 SAY SAY FNNTS(SAL,6,0)

@K,14 SAY FNTS(CHILD,1,0)

@K,23 SAY MARID

@K,28 SAY FAMILY

@K,46 SAY NAME

@K,64 SAY CODE

@K,70 SAY FNTS(I,6,0)

K=K+1

IF K=22

@K,2 SAY 

@24,26 SAY براي ادامه يك كليد را بزنيد   COLOR W+/G

WAIT

IF LASTKEY0=27

RETURN

ENDIF

K=3

@3,0 CLEAR

ENDIF

ENDSCAN

@K,2 SAY 

@24,26 SAY  براي بازگشت يك كليد را بزنيد   COLOR W+/G

WAIT

CASE BAR1=3

MON1=0

DO MONTH

IF LASTKEY0=27

RETURN

ENCIF

SET COLOR TO W/BG

CLEAR

SET COLOR TO W+/N

@3,16 CLEAR TO 15,66

@2,15 TO 14,64 DOUBLE COLOR W+/B*

@2,27 SAY نمايش اطلاعات ماهانه يك كارمند

DO WHILE .T.

SET COLOR TO W+/W

@3,16 CLEAR TO 13,63

SET COLOR TO W+/B+,GR+/N+

@3,39 SAY كد كارمندي :

COD1=FNST(3,43,[  ])

USE WORKER INDEX WORKIND

LOCATE FOR ALLTRIM(CODE)=ALLTRIM(COD1)

IF EOF0= .T.

WAIT  كارمندي با اين كد وجود ندارد   WINDOW

ELSE

SAL1=SAL

USE SALARY INDEX SALIND

LOCATE FOR MONTH=MON1 AND ALLTRIM(CODE)=ALLTRIM(COD1)

IF EOE0= .T.

WAIT  اطلاعات ماهانه اين كارمند وجودندارد  WINDOW

ELSE

@5,47 SAY روزهاي كاركرد :

@5,22 SAY  ساعات اضافه كاري :

@7,45 SAY  حقوق ماهانه

@5,44 SAY FNTS(DAYS,2,0)

@5,18 SAY FNTS (OVER,3,0)

@7,36 SAY FNTS(GROSS,8,0)

@9,45 SAY حقوق اضافه كاري :

@9,36 SAY FNTS((OVER*30/150*SAL1),8,0)

@11,45 SAY  حقوق دريافتني :

@11,36 SAY FNTS(NET,8,0)

ENDIF

ENDIF

@14,25 SAY ‘ESC و بازكشت كليد  ENTER ادامه كليد

W=INKEY(0)

IF W=27

RETURN

ENDIF

ENDDO

CASE BAR1=4

SET COLOR TO W+/N

@11,21 CLEAR TO 13,39

@10,20 TO 12,37 DOUBLE COLOR W+/B*

SET COLOR TO W+/B

@11,25 SAY  كد كارمندي :

COD1=FNST(11,56,[            ])

USE WORKER INDEX WORKIND

LOCATE FOR ALLTRIM(CODE)=ALLTRIM(COD1)

IF EOF0= .T.

WAIT كارمندي با اين كد وجود ندارد  WINDOW

ELSE

SET COLOR TO W+/BG

CLEAR

SET COLOR TO

N1=NAME

F1=FAMILY

SAL1=SAL

CH1=CHILD

USE SALARY INDEX SALIND

@4,0 SAY 

@5,0 SAY ||             : حقوق روزانه        تعداد اولاد :  نام كارمند :                ||  

@6,0 SAY 

@7,0 SAY ||  دريافتني||  حقوق ناخالص || اضافه كاري  ||  ساعات اضافه كار || روزهاي كاركرد  || كدماه || رديف ||

@8,0 SAY

@5,21 FNST(SAL1,6,0)

@5,25 SAY FNTS(CH1,2,0)

@5,34 SAY F1+N1

I=1

K=9

SCAN FOR ALLTRIM(CODE)=ALLTRIM(COD1)

@K,0 SAY ||              

@K,1 SAY FNTS(NET,8,0)

@K,13 SAY FNTS(GROSS,8,0)

@K,24 SAY FNTS(OVER*SAL1*30/150,10,0)

@K,39 SAY FNTS(OVER,3,0)

@K,55 SAY FNTS(DAYS,2,0)

@K,66 SAY FNTS(MONTH,2,0)

@K,72 SAY FNTS(1,3,0)

I=I+1

K=K+1

END SCAN

@K,0 SAY  

WAIT  براي بازگشت يك كليد را بزنيد WINDOW

ENDIF

CASE BAR1=5

MON1=0

NO MONTH

SET COLOR TO W+/BG

CLEAR

SET COLOR TO

@4,0 SAY 

@5,0 SAY ||                                                       جدول اطلاعات حقوقي ماه                    

@6,0 SAY 

@7,0 SAY || دريافتني || ناخالص  || اضافه كاري || ساعات  || نلم خانوادگي  ||  نام || كد  ||  رديف               

@8,0SAY 

@5,28 SAY FNTS(MON1,2,0)

I=1

K=9

SELECT A

USE SALARY INDEX SALIND

SET FILTER TO MOONTH=MON1

SELE B

USE WORKER INDEX WORKIND 

SET RELATION TO CODE INTO A

SCAN

@K,0 SAY ||   

@K,1 SAY FNTS(A.NET,8,0)

@K,10 SAY FNTS(A.GROSS,8,0)

@K,19 SAY FNTS(A.OVER*SAL*30/150,8,0)

@K,28 SAY FNTS(A.OVER,3,0)

@K,34 SAY FAMILY

@K,55 SAY NAME

@K,68 SAY CODE

@K,74 SAY FNTS(1,4,0)

I=I+1

K=K+1

WAIT  براي ادامه يك كليد را بزنيد   WINDOW

IF LASTKEY0=27

RETURN

ENDIF

K=9

@9,0 CLEAR

ENDIF

END SCAN

@K,0 AY 

SELECT A

WAIT  براي بازگشت يك كليد رابزنيد  WINDOW

ENDCASE           ديسكت برنامه فوق در مجتمع فني تهران توزيع مي گردد .

 ‌طراحي سيسستم انبار داري كالا

نرم افزار :  

شرح سيستم : در اين يسيتم برنامه نويس بايد امكانات لازم جهت ورود و استخراج اطلاعات را فراهم نموده و به شكل آسان در اختيار كاربر رار دهد.

به طور كلي طراحي سيستم در 4 مرحله خلاصه مي گردد .

مرحله 1 : ساختار 3 فايل  . به صورت جداگانه تعريف مي گردد .

مرحله 2 : طراحي منوي اصلي

مرحله 3 : طراحي زير منوها

مرحله 4 : نوشتن برنامه

ساختار فايل
فيلد نام فيلد نوع فيلد طول فيلد رقمهاي اعشاري
شماره كالا كاراكتري 8  
نام كالا كاراكتري 20  
تاريخ اخرين خريد كالا تاريخي 8  
قيمت آخرين خريد واحد عددي 6 0
تاريخ آخرين فروش كالا تاريخي 8  
قيمت آخرين فروش واحد عددي 6 0
موجودي فعلي كالا عددي 6 0
حداقل موجودي عددي 4 0
توضيحات كاركتري 40  

محتوا فايل در 3 فرم ورود اطلاعات ( كالي جديد – خريد و فروش ) تكمميل مي گردد و هنگام خريد يا فروش يك قطعه اين فايل بايد بروز رسانيده شود . هر قطعه در انبار يك ركورد از اين اين فايل را تشكيل مي دهد .

ساختار فايل

فليد

نام فليد نوع فليد طول فليد رقم هاي اعشاري
شماره كالا كاركتري 4  
تاريخ خريد تاريخي 8  
تعداد خريد عددي 6 0
قيمت خريد عددي 6 0
كد وضعيت منطقي 1  

فايل  فقط هنگام خريد يك قطعه مشروط بر اينكه قطعة مذبور سابقه اي در فايل  داشته باشد ، تكميل مي گردد و تعداد خريداري شده به موجودي انبار  اضافه مي گردد و همچنين فيلدهاي   و  در فايل  تغيير داده و پس از انجام اين عمل فيلد  علامت مي خورد ( اين فيلد  مي گردد ) بدين معني كه فايل  با خريد اين قطعه بروز رسانيده شده است .

ساختار فايل

فيلد
نام فيلد نوع فيلد طول فيلد رقمهاي اعشاري
شماره كالا كاركتري 4  
تاريخ فروش تاريخي 8  
تعداد فروش عددي 6 0
قيمت فروش عددي 6 0
كد وضعيت منطقي 1  

فايل    فقط هنگام فروش يك قطعه مشروط بر اينكه اولا قطعه در انبار موجود باشد . ثانيا تعدادي كه فروخته مي شود از حداقل موجودي بيشتر نباشد ، تكميل مي گردد . پس از فروش يك قطعه فقط اگر موجودي قطعه در انبار از حداقل تعداد مجاز كمتر شد ، لازم است تا پيامي به كاربر داده شود . تعداد قطعه فروش رفته بايد از تعداد موجودي قطعه در انبار  كسر گردد و فيلدهاي  و  به ترتيب فيلدهاي و  را در فايل  تغيير دهند . پس از انجام اين عمل فيلد  علامت مي خورد ( اين فيلد  مي گردد ) بدين معني كه فايل  با فروش اين قطعه بروز رسانيده شده است .

توضيحا ورود اطلاعات در فايل هاي  و  حتما در فايل  تاثير مي گزارند .

توضيحاتي پيرامون گزينه هاي منوي برنامه

 براي افزودن مشخصات يك قطعه جديد به انبار ( فقط به منظور ايجاد سابقه براي قطعه اي كه در انبار موجود نيست ) از اين گزينه استفاده مي شود و اطلاعات قطعه مورد نظر بايد در فرمي به شكل زير از كاربر دريافت گردد . لازم به ذكر است كه شماره‌قطعه جديد به صورا اتوماتيك توسط برنامه توليد مي گردد و كاربر در تغيير آن دخالت ندارد .

فقط نمايش ( توسط برنامه ايجاد مي شود )                  

ورود توسط كاربر                                                   

ورود توسط كاربر                                                

ورود توسط كاربر                                   

 اين گزينه به منظور اصلاح فيلدهاي نام قطعه ،‌حداقل موجودي قابل فروش و توضيحات طبق فرم زير به كار مي رود و بقيه فيلدها فقط به منظور دادن اطلاعات به كاربر نمايش داده مي شوند . ضمنا جهت اصلاح اطلاعات يك قطعه ابتدا ،‌ شمارة آن قطعه از كاربر سوال و آماده‌اصلاح مي گردد . چنانچه قطعه موجود نبود ،پيامي مناسب ظاهر مي شود .

فقط نمايش                                                          

ورود توسط كاربر                                                    

فقط نمايش  :  فقط نمايش

فقط نمايش  فقط نمايش              

فقط نمايش                                                            

ورود توسط كاربر                                                   

ورود توسط كاربر                                                                 

 اين گزينه طبق فرم زير جهت خريد قطعه اي كه سابقة آن در انبار موجود مي باشد مورد استفاده قرا رمي گيرد . در صورا عدم وجود سابقة قطعه در انبار پيامي ظاهر مي گردد . در فرم زير اطلاعات بعضي از فيلدها از كاربر دريافت مي شود و بقيه فقط نمايش داده مي شوند . لازم به ذكر است اطلاعاتي كه در اين فرم وارد مي شود به عنولن يك ركورد به فايل  اضافه مي گردد و همچنين فيلدهايي از ركورد مربوط به اين قطعه را در فايل  تغيير مي دهند .

فقط نمايش  فقط نمايش                   

فقط نمايش  فقط نمايش                               

                             ورود توسط كابر                                   

                            ورود توسط كابر                                           

                            ورود توسط كابر                                                 

 اين گزينه طبق فرم زير جهت فروش قطعه اي كه سابقة آن در انبار موجود است به كار مي رود . نكاتي كه براي فروش يك قطعه بايد رعايت شود قبلا در قسمت تعريف فايل  توضيح داده شده است . در فرم زير نيز تعدادي از فيلدها جهت اطلاع كاربر فقط نمايش داده مي شوند و قابل تغيير نيستند . لازم به ذكر است اطلاعاتي كه در اين فرم وارد مي شوند ، به عنوان يك ركورد به فايل  اضافه مي گردد و همچنين فيلدهايي از ركوردمربوط به اين قطعه را در فايل  تغيير مي دهند .

فقط نمايش  فقط نمايش                  

فقط نمايش  فقط نمايش                               

                             ورود توسط كابر                                   

                            ورود توسط كابر                                           

                            ورود توسط كابر                                                 

 با انتخاب اين گزينه منوي ديگري با گزينه هاي زير ظاهر مي شود.

 با انتخاب اين گزينه ، ابتدايك شماره قطعه سوال مي شود سپس اطلاعاتي از قبيل نام قطعه ، تارخ و قيمت آخرين خريد ، تاريخ و قيمت آخرين فروش ، موجودي فعلي انبار ، حداقل تعداد وجاز و توضيحات مربوط به قطعة مورد نظر ظاهر مي گردد . چنانچه قطعة مزبور نداشت ، پيام مناسبي به كاربر داده مي شود .

 با انتخاب اين گزينه از كليه قطعات موجود در انبار ليست تهيه مي شود . اين ليست شامل اطلاعات از قبيل :  نام قطعه ، تاريخ و قيمت آخرين خريد ، تاريخ و قيمت آخرين فروش ، موجودي فعلي انبار و حداقل تعداد مجاز قطعه در انبار است .

 با انتخاب اين گزينه ، گزارشي از ارزش تمامي قطعات موجود در انبار تهيه مي شود . بدين ترتيب كه مثلا در مورد قطعه  ، موجوديآن قطعه در انبار ضربدر قيمت آخرين خريد آن يك ستون گزارش و موجودي آن قطعه ضربدر قيمت آخرين فروش آن ستون ديگري از گزارش را تشكيل مي دهد . در انتهاي گزارش ارزش كل قطعات انبار محاسبه و نمايش داده مي شود .

 با انتخاب اين گزينه ابتدا دو تاريخ ( از چه تاريخي تا چه تاريخي ) و نيز شمارة يك قطعه از كاربر سوال مي گردد . سپس كليه معاملات انجام گرفته به تفكيك خريد و فروش در محدوده تاريخ هاي تعيين شده از فايل هاي  و  استخراج شده و گزارش مي شود .

 با انتخاب اين گزينه از كلية قطعاتي كه موجودي آن كمتر از حد مجاز است طبق فرم زير گزارش تهيه مي شود اين گزارش بيد شامل اطلاعاتي از قبيل : شماره قطعه ، نام قطعه ، موجودي فعلي انبار و حداقل تعداد مجاز قطعه در انبار باشد .

كليه گزارشات سيستم را بايد بتوان به صفحة نمايش يا به چاپگر فرستاد كه اين امر با انتخاب يكي از گزينه هاي  يا  در منوي سوم انجام مي گيرد .

 با انتخاب اين گزينه اجراي برنامه خاتمه مي يابد .

طراحي سيستم پرداخت حقوق  

نرم افزار :

مقدمه : مشكلي كه امروزه بسياري از مؤسسات و ادارات با آن مواجه هستند . حجم زياد اطلاعات و دسترسي به پرونده ها و محاسبات روزمره مي باشد ، كه يكي از آنها تهيه‌ ليستهاي حقوق و پرداخت حقوق ماهانه كارمند مربوطه است . در حل اينگونه مسائل كامپيوتر نقش بسيار مهمي ايفا مي كند .

شرح سيستم : در اين سيتم ، كارمند داراي دو نوع اطلاعات است كه ما آنها را به اطلاعات اصلي (ثابت) و اطلاعات ماهانه (متغير) نامگزاري مي كنيم . كليه عمل هاي سيستم بايد از طريق منوها انجام گيرد و خروجي كليه برنامه ها به زبان فارسي باشد . جهت راهنمايي هر چه بيشتر دانشجويان ، اطلاعاتي شامل موارد زير به پيوست تقديم مي گردد .

الف) اطلاعات اصلي (ثابت) هركارمند مطابق جدول زير در فايلي به نام  ذخيره شود .

DEC WIDTH TYPE FIELD NAME FIELD
  4 C EMPCODE 1
  20 C FAMILY 2
  15 C NAME 3
  8 C ACCNO 4
0 6 N FIXSALARY 5
  1 C EMPTYPE 6
  1 L MARRIED 7
0 1 N BABYNO 8
0 8 N LOAN 9
0 6 N INSTALMENT 10
  66 C ADDRESS 11
  7 C TELEPHONE 12
  65 C REMARKS 13

1-  شماره پرسنلي كارمند

2-  نام خانوادگي

3-  نام

4- شماره حساب

5- حقوق ثابت

6-   نوع حكم ( 1-رسمي و 2-قراردادي )

7-   وضعيت تاهل

8-  تعداد فرزندان

9- مبلغ وام

10- قسط ماهانه كه بايد از حقوق وام كسر شود

11- آدرس كارمند

12-  شمارة تلفن

13- ملاحظات

ب) اطلاعات ماهانه ( متغير ) هر كارمند مطابق جدول زير در فيلي به نام  ذخيره شود .

DEC WIDTH TYPE FIELD NAME FIELD
0 4 C EMPCODE 1
0 3 N OVER 2
0 3 N ABSENT 3
0 6 N ENCOUMONEY 4
0 7 N NOTPAID 5
0 8 C MISCMONEY 6
0 6 N ABSENMONEY 7
0 6 N OVERALLOW 8
0 7 N GAMOUNT 9
2 8 N INCTAX 10
2 8 N TODEDUC 11
2 8 N WORKINSU 12
2 7 N NETAMOUNT 13

1- EMPCODE          شماره پرسنلي كارمند

2- OVER               تعداد ساعات اضافه كاري

3- ABSENT               تعداد ساعات غيبت

4- ENCOUMONEY        مبلغ تشويقي

5- NOTPAID          معوقه حقوقي

6- MISCMONEY         بدهي متفرقه

7- ABSENMONEY           مبلغ غيبت

8- OVERALLOW        مبلغ اضافه كاري

9- GAMOUNT         جمع كل ناخالص

10- INCTAX         مبلغ ماليات

11- TODEDUC        مبلغ كسورات

12- WORKINSU        مبلغ بيمه

13- NETAMOUNT          مبلغ قابل پرداخت

فايل ماهانه بعد از انجام محاسبات حقوق ( محاسبات بعدا شرح داده خواهد شد ) بايد در به نام  باساختار زير جهت نگهداري سابقه كارمندان و ليست گيري پايان سال ذخيره شود .

DEC WIDTH TYPE FIELD NAME FIELD
  4 C EMPCODE 1
0 6 N ABSENMONEY 2
0 7 N NOTPAID 3
0 8 N ENCOUMONEY 4
  6 D DATE 5
0 8 N OVERALLOW 6
0 7 N GAMOUNT 7
2 8 N INCTAX 8
2 8 N TODEDUC 9
0 8 N MISCMONEY 10
2 7 N NETAMOUNT 11
2 8 N WORKINSU 12

همانطور كه ملاحظه مي شود فايل سالانه شامل فيلدهاي مشابه با فايل ماهانه است به جز فيلد  كه براي نگهداري تاريخ انتقال اطلاعات از فايل ماهانه به فايل سالانه در نظر گرفته شده است .

بعد از انتقال اطلاعات از فايل ماهانه به فايل سالانه ، بايد فايل ماهانه براي ماه بعدي خالي شود . شكل ظاهري سيستم : اين برنامه مانند ساير برنامه هاي حساس نياز به رمز عبور دارد . بعد از اينكه رمز عبور صحيح وارد شد ، منوي اصلي نمايش داده شود .

محاسبة حقوق : در محاسبة حقوق ، مواد زير بايد در نظر گرفته شوند .

  مجرد متاهل بدون فرزند متاهل با يك فرزند متاهل با بيش از يك فرزند
خواربار 400 800 800 800
حق مسكن 3000 4000 4000 4000
حق اولاد

حقوق ساعتي = (8×30)/

مبلغ اضافه كاري = ساعات اضافه كاري = (حقوق ساعتي + 40%*حقوق ساعتي )

مبلغ غيبت = ساعات غيبت 3حقوق ساعتي

جمع كل ناخالص =  +حق مسكن + حق اولاد + خواربار + مبلغ اضافه كاري + معوقه حقوقي + تشويقي – مبلغ غيبت

مبلغ بيمه : ( حق اولد – جمع كل ناخالص ) * 7%

جمع كسورات = ماليات + بيمه + قسط + بدهي متفرقه

مبلغ پرداخت = جمع كسورات – جمع كل ناخالص

 روش محاسبه ماليات :

حقوق تا سقف 150000 ريال از ماليات معاف مي باشد .

حقوق از سقف 150000 ريال تا 239999 ريال 12% ماليات كسر مي شود .

حقوق از سقف 240000 ريال تا 399999 ريال 18% ماليات كسر مي شود .

حقوق از سقف 400000 ريال تا 499999 ريال 25% ماليات كسر مي شود .  

حقوق از سقف 500000 ريال تا 999999 ريال 35% ماليات كسر مي شود .

حقوق از سقف 1000000 ريال تا 1500000 ريال 40% ماليات كسر مي شود .

مبلغ ماليات-(حداقل با نرخ تصاعدي ماليات-جمع ناخالص)*نرخ تصاعدي مالات +ماليات حداقل

گزارشها :

الف ) ليست كنترلي : ليستي است كه كاربر از آن براي كنترل اطلاعات قبل از تهيه گزارش نهايي استفاده مي كند .

ب) ليست كلي : بعد از كنترل و اشكال زدايي اطلاعات با توجه به ليست كنترلي ، ليست كلي به صورت جدول زير براي كارفرما چاپ مي شود .

رديف نام و نام خانوادگي حقوق ساعت اضافه كاري مبلغ غيبت ساعات غيبت مبلغ غيبت مبلغ قابل پرداخت
 

 

 

 

 

 

             

جمع

             

پس از انتخاب ليست كنترلي ، ليستي از مشخصات كارمندان به صورت جدول فوق روي صفحة نمايش ظاهر مي گردد . بدين ترتيب كاربر مي تواند با مشاهده اعداد موجوددر ليست از هرگونه اشتباه احتمالب هنگام ورود اطلعات كه نهايتا منجر به نتايج غلط خواهد شد ،‌اطلاع حاصل نمايد . در صورت مشاهدة هرگونه اشتباهي ، كاربر مي تواند به قسمت اصلاح اطلاعات بازگشته و اطلاعات صحيح را وارد نمايد كه پس از آن ، انجام مجدد محاسبة حقوق اجباري خواهد بود .

پس از انتخاب ليست كلي ، فرم فوق ولي اين بار به صورت تصحيح شده (در صورت وجود اشتباه) روي چاپگر چاپ مي گردد . چنين ليستي مي تواند براي كارفرما جهت مشاهدة بيلان كلي كار هر كارمند مفيد واقع شود .

بعد از محاسبة حقوق ، فيش حقوق هر كارمند مي بايست مطابق فرم زير چاپ شود .

بسمه تعالي

شركت آچاچي

فيش حقوق ماه 3 سال 1374

شماره پرستلي : 1001     نام : رضا      نام خانودگي : اكبري

حقوق و مزيا حقوق ثابت

حق اولاد

حق مسكن

خواربار

اضافه كاري

پاداش

1500000

0

3000

400

0

10000

كسورات بيمه

ماليات

مساعده

قسط وام

غيبت

11438

0

20000

0

2500

جمع كل ناخالص 163400 جمع كسورات 33938

اطلاعات ماهانه‌هر كارمند درفرمي به شكل زير از كاربردريافت ششده و در فايل ماهانه ثبت گردد .

ورود اطلاعات ماهانه كارمندان

كد كارمند :                                                        1001

ساعت اضافه كاري :                                           20

غيبت :                                                                  4

تشويقي :                                                              10000

معوقه حقوقي :                                                     15000     

بدهي متفرقه :                                                       0

اطلاعات اصلي هر كارمند  در فرمي به شكل زير از كاربر دريافت شده و در فايل اصلي ثبت گردد .

ورود اطلاعات اصلي كارمند

كد كارمند : 1008

نام خانوادگي :                                  نام :

شماره حساب بانكي :      حقوق ثابت :      وضعيت بيمه :         نوع حكم : 

وضعيت تاهل :                  تعداد عائله :

وام تعاون :               قسط تعاون :                پرداخت قسط تعاون :

آدرس :

تلفن منزل :

ملاحظات : 

 

تاریخچهشركت آچاچي
Comments (0)
Add Comment