نظام إجازات الكتروني

[عبدالله المجرب]

السلام عليكم 

اخواني الكرام 

طُلب مني في العمل أن يكون نظام طلب الإجازة الكتروني أي أن يتقدم الموظف بطلب إجازة لدى الموظف المختص بعد ذلك يظهر تنبيه للمسئول المختص بأن هناك طلب بإنتظار الموافقة أو التأجيل أو الرفض

بعد إعتماد المسئول بإحدى الحالات الثلاث يظهر تنبيه لموظف المختص بالإجازات لدى قسم الإجازات لإتخاذ الإجراءات بخصوصها.

الهدف من ذلك تقليل إستخدام الورق وثانياً إستخدام الشبكة الداخلية للتبادل بين الإقسام بدل المراسلات بين الأقسام.

=====

في الوقت الحالي لدي برنامج مرتبط به جميع الموظفين والمسئولين ولكن طريقة الطلب عادية 

يقدم الموظف الطلب لدى الموظف ثم يطبع الطلب ويتم أخذه الى المسئول المختص وبعدها يتم أخذه الى قسم الإجازات لإتخاذ اللازم.

 

=======

المطلوب

المميزات والعيوب لهذه الطريقة.

كيف الضمان بعدم التلاعب في الطلبات 

التوقيع هل له من حل

وأي مقترحات أخرى 

وشكراً 

[ابوخليل]

حياك الله ابا احمد

لدي تعليق بسيط لعل فيه فائدة

نحن بحاجة لاثنين فقط موظف مختص ومسؤول 

لا بد من مستند يطبع ويحفظ في قسم الاجازات ، يأخذ الموظف المجاز نسخة منه

الطباعة تتم عند الموظف المسؤول الذي عنده صلاحية التوقيع والختم ( هذا حل التوقيع وعدم التلاعب)

مدخل البيانات المختص لا بد ان تكون له صلاحية خاصة في حركة الاجازات

اوعلى الاقل تكون له صلاحية الاضافة فقط

كذا نقضي على 80% من الروتين القديم

 

 

[عبدالله المجرب]

شكراً لك استاذ ابو خليل على المداخلة 

الطباعة ستتم في حالة الموافقة فقط لكي يتم حفظ نسخة من الإجازة 

لدينا لا يستلم المجاز نسخة من اجازته (المقترح حالياً إرسال رسالة قصيرة اليه بالموافقة أو التأجيل أو الرفض) 

اقصد بالتوقيع (توقيع مقدم الطلب)

 

مدخل البيانات المختص لا بد ان تكون له صلاحية خاصة في حركة الاجازات

اوعلى الاقل تكون له صلاحية الاضافة فقط

 

ارجو التوضيح وما نوع الصلاحيات وما المقصود بالإضافة

 

[yms12]

السلام عليكم ورحمة الله وبركاتة

الاخوة الكرام الاستاذ عبدالله والاستاذ الكبير ابو خليل تحية من القلب اليكم

لى مداخلة متواضعة وهي

1- اذا كنت تريد عمل نظام الكتروني ولا بد من التخلص من النظام الورقي بالكامل

2- تتم الموافقات عن طريق البرنامج ولكل شخص له صلاحيات فالمسئول له صلاحية والمدير  له صلاحية

وتكون الحركة المستندية الالكترونية كتالي

1- يتقدم الموظف بطلب اجازة عن طريق تعبأة نموذج (شاشة)

2- يتم اشعار المسئول بالطلب ويسمح له فقط بالموافقة والرفض ولا يسمح بالتعديل

3-عند موافقة السئول ينم اشعار المدير بالطلب و يسمح له فقط ايظا بالموافقة او الرفض ولا يسمح له بالتعديل

عند ذلك ينتقل الطلب الى الموارد البشرية لبتم تنفيذه ويتم خصم الاجازة من رصيد الموظف بشكل الى

اارجو ان تكون مداخلتي مفيده وان يكون هذا هو المطلوب

اما التفيذ يحتاج الى وقت والى اقتراحات كثيرة

مع تحياتي

[ابوخليل]

شكرا للاستاذ العزيز yms12  على المداخلة المفيدة  ويبدو انك تتكلم عن تجربة

الاستاذ عبدالله : 

نقلت لك تجربة عملية من ارض الواقع  وغفلت عن اختلاف طبيعة الاجراءات

ما ذكرته في مشاركتي الاولى يصلح مثلا لكتابة العدل واستخراج الوكالات الشرعية

لانها هي التي تحتاج الى توقيع وختم  وايضا يكفي فيها موظف واحد ومسؤول

[عبدالله المجرب]

ماذا عن التوقيع الألكتروني (جهاز وقلم الكتروني) هل هناك إمكانية لربطه بالاكسس

[yms12]

نعم اخي الفاضل ابو خليل بالفعل قمت بعمل برنامج لاحد الشركات مماثل لهذا البرنامج ولكن منذ مده

وليس عندي اي مانع من المساعدة الأخونا الكريم عبدالله وسوف استفيد منكما الكثير بأذن الله

[عبدالله المجرب]

نعم اخي الفاضل ابو خليل بالفعل قمت بعمل برنامج لاحد الشركات مماثل لهذا البرنامج ولكن منذ مده

وليس عندي اي مانع من المساعدة الأخونا الكريم عبدالله وسوف استفيد منكما الكثير بأذن الله

 

اتمنى المساعدة واكون شاكراً لك اخي 

وارجو ان تفيدنا بالايجابيات والسلبيات 

وعن 

 التوقيع الألكتروني (جهاز وقلم الكتروني) هل هناك إمكانية لربطه بالاكسس

 

 

[yms12]

اخي عبدالله حياك الله

لماذا التوقيع ولماذا التعقيد الامر اسهل من ذلك

كل ما هنالك رز موافقة ورز رفض

اذا ضغط على الموافقة يتم التسجيل في قاعدة البيانات بالموافقة وتاريخ الموافقة ويتم تحديد الصلاحية التالية

واذا تم الرفض بتم تسجيل تاريخ الرفض

وفي كلا الحالتين يتم تحديث حالة الطلب ليعلم الموظف اين وصل الطلب والموافقات التي تمت علية

 

[عبدالله المجرب]

السلام  عليكم 

كيف نحل إشكال وجود ما يثبت أن الموظف تقدم بطلب الإجازة (الموضع به اكثر من 150 موظف).

===========

برنامج الاكسس الحالي يتم تسجيل مختلف الطلبات بما في ذلك الإجازات ويتم الطباعة على نموذج جاهز (تقرير) فهل يعني اني بحاجة الى فصل الاجازات ام يمكن ان تضل ضمن الطلبات 

====

اخي الفاضل (yms12)

هل هناك من مرفق مبسط يوضح الفكرة 

[yms12]

اخي الفاضل عبدالله

لابد من انشاء جدول للنماذج وياخذ كل نموذج عندك كود وبذلك سوف نفرق بين نموذج الاجازات والنماذج الاخرى

هل هذا اجابة لسؤالك ام السؤال غير الذي فهمتة

انا حاليا للاسف لا يوجد لدي مثال وسوف احاول العثور على نسخة من برنامجي القديم للتطوير وافضل ان تبدء يانشاء الجداول ونكمل معا

اذا كان لديك قاعدة بيانات ارفقها ونعدل عليها

بالتوفيق

[عبدالله المجرب]

اذا كان لديك قاعدة بيانات ارفقها ونعدل عليها

لاسباب تتعلق بالعمل لا استطيع إرفاق القاعدة 

=================

توجد جداول ونماذ خاصة بالاجازات لكن قصدي كان يتعلق بالطلبات وكنت اتمنى ان تضع تصورك في ملف اكسس لكي يتضح الأمر

وشكراً على المشاركة والتعاون

[yms12]

ان شاء الله سوف احاول ايجاد وقت لعمل ما تريد

[kaser906]

صباح الخير 

اسمح لي ان اشارك بهذا المقترح

كما قال لك اﻻخوان ﻻحاجة للتوقيع

انت تحتاج نموذج شاشة  طلب اجازة 

يكون لدى الموظف يوزر وباسوورد

وتكون لديه صﻻحية لتقديم طلب اجازة الكتروني له فقط

وسيكون اليوزر والباسورد بمثابة التوقيع

حيث من المتوقع ان الموظف لن يفشي الباسورد لبقية الموظفين

تحياتي

[عبدالله المجرب]

ان شاء الله سوف احاول ايجاد وقت لعمل ما تريد

شكراً وبإنتظارك

=====================

 

وسيكون اليوزر والباسورد بمثابة التوقيع

حيث من المتوقع ان الموظف لن يفشي الباسورد لبقية الموظفين

فكرة جميلة وسهلة لو كان كل الموظفين متعلمين ولكن بعض الموظفين (عمال - حرس امن) لا يعرف كيف يتعامل مع الحاسوب

للعلم فقد وردت فكرة في العمل بأن يتم فتح موقع الكتروني للموظفين لطلب الإجازات (والطلبات الأخرى) حتى من منازلهم  لكن لسبب صعوبة تعامل بعض الموظفين تأجلت الفكرة

====

شكراً على الماخلة والفكرة وبإنتظار أفكار وتجارب أخرى

[ابوخليل]

جدول الاجازات اللموجود في برنامجك يكفي للعملية

فقط تحتاج لزيادة بعض الحقول

اما مسألة التوقيع او ارقام سرية فغير ضرورية ( لا داعي لها )

لان الموظف هو المسؤول الاول عن هذه العمليات

ومسألة حفظ حق مقدم الطلب فيمكن علاجة  بأن يتم طباعة مذكرة صغيرة عند تقديم الطلب يكون فيها اسمه ورقم الطلب وتاريخه واسم الموظف

استاذ عبدالله :

انزع جدول الاسماء وجدول الاجازات من برنامجك وارفقهما في مثال للتطبيق

[yms12]

اخي عبدالله انت تريد برنامج اجازات الكتروني كيف والموظفين لا يعلموا شيء عن الحاسب حسب كلامك او غير متوفر لهم جهاز حاسب

[القعر]

عندنا في العمل برنامج الكتروني نعمل عليه كموظفين عند أحالة الطلب للمسؤول عند الموافقة على الطلب يضغط زر موافق يتم ادراج توقيعه بأسفل الطلب ، حيث تم مسبقاً ادخال توقيعه بواسطة الماسح الضوئي ، ، ولديه يوزر نيم وباسوورد  ،يصعب أي واحد يوقع بديل عنه ، أما بالنسبة للموظفين الذين لديهم أجهزة حاسوب يتم تقديم طلبهم الكتروني عبر أحقياتهم على البرنامج وهذا اثبات لتقديم الاجازة ، والذين ليس لديهم أحقيات أو اجهزة كمبيوتر يتم التوقيع على نموذج ورقي للإجازة وإرفاقه بعد نسخه بواسطة الماسح الضوئي وعرضه الكتروني على المسؤول,

.

[jjafferr]

السلام عليكم أخي أبواحمد  

 

النت عندي تعبان ، فاسمح لي بسرعة اشارك  

 

انت محتاج جدول واحد فقط مثل ما قال أخوي ابوخليل :

 

المسأئلة لها علاقة بالاستعلام الصحيح فقط ، وبتحديث النموذج (للمسئول Manager والموظف المسئول Clerk).

 

الموظف:

 

المسئول:

 

الموظف المسئول:

 

رجاء اعمل توقيت لتحديث نموذج (للمسئول Manager والموظف المسئول Clerk) ، كل خمس دقائق مثلا ، وسوف ترى النتائج :)

 

 

جعفر

201.1.Electronic_Leaves.mdb.zip

تم تعديل أغسطس 7, 2015 بواسطه jjafferr

[jjafferr]

عفوا مشاركتي محتاجه توضيح :-)

 

بالنسبة للموظف ، فعند طلب إجازة ، يجب أن يعمل علامة صح في نموذج frm_Employee_see في الحقل Leave_Needs_Decission.

 

عند وضع علامة الصح ، فطلب اجازته سيظهر للمسئول في النموذج frm_Management_See.

عندها ، يجب على المسؤول أن يضع علامة صح في الحقل Management_Gave_Decission ،

 

وعندما يضع علامة الصح ، فتظهر الاجازة للموظف المسؤول عن إنهاء إجراءات الاجازة ، في النموذج frm_Clark_See .

وعندما تتم الاجراءات ، يجب عليه أن يضع علامة صح في الحقل Done حتى لا تظهر الاجازة في النموذج.

 

و السبب الذي قلت يجب عمل حدث توقيت على On_Timer كل 5 دقائق مثلا لتحديث النموذج ، حتى لا يحتاج المسؤول وموظف الإجازات إلى إغلاق نماذجهم وفتحها لرؤية الطلبات الجديدة ، فالتحديث سيظهر على طول في النموذج المفتوح :-)

 

جعفر

[عبدالله المجرب]

السلام عليكم 

شكراً استاذ جعفر على المشاركة القيمة 

بدات الصورة في الوضوح بالنسبة لخط سير الإجازة 

===

كان حل ان يتم ارسال رسالة SMS  الى مقدم الطلب فور الانتهاء من كتابة الطلب هو الحل الأمثل لمشكلة التوقيع ولكن واجهتني مشكلة في ذلك فمن لديه الحل فليمدنا به 

نستخدم نظام Bulk SMS والمزود هي شركة اتصالات 

هذا هو الموقع من هنا

 

وقد تواصلت معهم لكي يزودوني بكود للاستخدام في الاكسس ولكن ابلغني الموظف بانه ليس لديهم حل برمجي كامل واعطاني هذا الرابط 

 

http://www.batelcosms.com.bh/bms/Soap/Messenger.asmx?page=proxy&lang=vb

 

اتمنى ممن يستطيع المساعدة ان لا يبخل علي في سبيل الحصول على كود برمجي استخدمه في الاكسس لارسال الرساالة مباشرة بعد كتابة الطلب وشكراً 

تم تعديل أغسطس 8, 2015 بواسطه عبدالله المجرب

[أ / محمد صالح]

السلام عليكم 

شكراً استاذ جعفر على المشاركة القيمة 

بدات الصورة في الوضوح بالنسبة لخط سير الإجازة 

===

كان حل ان يتم ارسال رسالة SMS  الى مقدم الطلب فور الانتهاء من كتابة الطلب هو الحل الأمثل لمشكلة التوقيع ولكن واجهتني مشكلة في ذلك فمن لديه الحل فليمدنا به 

نستخدم نظام Bulk SMS والمزود هي شركة اتصالات 

هذا هو الموقع من هنا

 

وقد تواصلت معهم لكي يزودوني بكود للاستخدام في الاكسس ولكن ابلغني الموظف بانه ليس لديهم حل برمجي كامل واعطاني هذا الرابط 

 

http://www.batelcosms.com.bh/bms/Soap/Messenger.asmx?page=proxy&lang=vb

 

اتمنى ممن يستطيع المساعدة ان لا يبخل علي في سبيل الحصول على كود برمجي استخدمه في الاكسس لارسال الرساالة مباشرة بعد كتابة الطلب وشكراً 

جاري التواصل مع الحبيب عبد الله (أبو أحمد) بخصوص إرسال رسائل sms من خلال الأكسس
وسيتم وضع الكود بعد تجربته ونجاح التجربة بإذن الله

[عبدالله المجرب]

السلام عليكم 

بعد فضل الله تعالى ثم بمساعدة كاملة متكاملة من الاستاذ محمد (الماسة منتدانا) 

تم تجربة الكود الذي ارسله لي وقد عمل بنجاح منقطع النظير بفضل الله 

كل الشكر للاستاذ محمد وننتظر منه رفع الكود الى المشاركة لتعم الفائدة للجميع

اشكر استاذ محمد مرة أخرى على جهوده

[أ / محمد صالح]

بسم الله

السلام عليكم ورحمة الله وبركاته أحبابي في الله

بفضل الله انتهت التجربة بنجاح في استعمال موقع http://www.batelcosms.com.bh/ لإرسال رسائل sms في دولة البحرين الشقيقة

وهي خدمة مدفوعة الأجر

تم التوصل لكود يقوم بفتح موقع الشركة وإرسال الرسالة منه باستعمال بيانات المستخدم المزودة من الشركة ووضعها في الكود

الكود يحتوي على إجراس الإرسال

ودالة لتحويل نص الرسالة للترميز العالمي الموحد utf8

هذا هو الكود لمن يريد إرسال رسائل باستخدام نفس الشركة في الأكسس أو الإكسل

Sub sndSMS()
customerID = ""
UserName = ""
userPassword = ""
originator = ""
MessageType = "ArabicWithArabicNumbers" 'Latin,   ArabicWithArabicNumbers,    ArabicWithLatinNumbers
recipientPhone = ""
smsText = ""
sURL = "http://www.batelcosms.com.bh/bms/Soap/Messenger.asmx/HTTP_SendSms?customerID=" & customerID & "&userName=" & UserName & "&userPassword=" & userPassword & "&originator=" & originator & "&smsText=" & UTF8Encode(smsText) & "&recipientPhone=" & recipientPhone & "&messageType=" & MessageType & "&defDate=" & Format(Now() - TimeValue("04:00"), "yyyymmddhhnnss") & "&blink=0&flash=0&Private=0"
Set oh = CreateObject("Microsoft.XMLHTTP")
oh.Open "get", sURL, False
oh.send
If InStr(oh.responseText, "OK") > 0 Then
MsgBox "Message sent."
Else
MsgBox "Error."
End If
Set oh = Nothing
End Sub
Function UTF8Encode(ByVal sStr As String) As String
Dim i As Integer
Dim thisChar As String
Dim sUtf8 As String
For i = 1 To Len(sStr)
thisChar = AscW(Mid(sStr, i, 1))
If thisChar < 128 Then
sUtf8 = sUtf8 + Mid(sStr, i, 1)
ElseIf ((thisChar > 127) And (thisChar < 2048)) Then
sUtf8 = sUtf8 + Chr(((thisChar \ 64) Or 192))
sUtf8 = sUtf8 + Chr(((thisChar And 63) Or 128))
Else
sUtf8 = sUtf8 + Chr(((thisChar \ 144) Or 234))
sUtf8 = sUtf8 + Chr((((thisChar \ 64) And 63) Or 128))
sUtf8 = sUtf8 + Chr(((thisChar And 63) Or 128))
End If
Next i
UTF8Encode = sUtf8
End Function

 

ومرفق الكود في ملف إكسل

وفقنا الله وإياكم لكل ما يحب ويرضى

Mas_Send SMS.rar

[aymanayman1980]

السلام عليكم انا ابحث عن برنامج الكتروانى لطلابات الاجازات ولكن اريد ان يكون الارسال للاشعارات مثلاا عبر الاميل للموظفين مع العلم ان جميع الموظفين مطيين باللاب توب الشركة فهل يستطيع احد مساعدتى ببرنامج يقول بهذا العمل مع العلم انى بمصر واتبع قوانين الاجازات المصرىوالسلام عليكم