آچاچي نام روستايي در نزديكي شهرستان ميانه از توابع آذربايجان شرقي است و اين كارخانه در سال 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 نام خانوادگي : نام : شماره حساب بانكي : حقوق ثابت : وضعيت بيمه : نوع حكم : وضعيت تاهل : تعداد عائله : وام تعاون : قسط تعاون : پرداخت قسط تعاون : آدرس : تلفن منزل : ملاحظات : |