תחומים - פורום חרדי מקצועי

יש כמה תוכנות לניהול בתי כנסת
נראה שניהול בית חכם עדיף

פורסם במקור בפורום CODE613 ב22/01/2014 17:38 (+02:00)

@shraga תודה רבה
בדיוק מה שחיפשתי

https://www.prog.co.il/threads/קובץ-אקסס-למס-ב.614810/

התשלום הוא לפי שער הדולר (בתוספת עמלה של חברת האשראי..) אבל בסכומים נמוכים זה לא משמעותי.
אין תוספת מע"מ, זה לא עסק ישראלי.

@איש-ימיני
קבל 2 הארות קטנות.

1. בחישוב השקל אין צורך להכפיל ב 1, זה נותן את אותה תוצאה של הערך ללא ההכפלה.
2. הפונקציה Round עושה עיגול לפי כלל שנקרא עיגול בנקאי וזה לא העיגול המצוי שאנחנו רגילים להשתמש בו.
   מומלץ להשתמש בפונקציה מותאמת אישית מכאן

' This function overcomes the bankers Rounding that occurs in the
' built-in VBA Round function to provide true (symmetric) numeric Rounding
' Created by TechOnTheNet.com
Public Function StandardRound(pValue As Double, pDecimalPlaces As Integer) As Variant
    Dim LValue As String
    Dim LPos As Integer
    Dim LNumDecimals As Long
    Dim LDecimalSymbol As String
    Dim QValue As Double
    ' Return an error if the decimal places provided is negative
    If pDecimalPlaces < 0 Then
       StandardRound = CVErr(2001)
          Exit Function
    End If

    ' If your country uses a different symbol than the "." to denote a decimal
    ' then change the following LDecimalSymbol variable to that character
    LDecimalSymbol = "."

    ' Determine the number of decimal places in the value provided using
    ' the length of the value and the position of the decimal symbol
    LValue = CStr(pValue)
    LPos = InStr(LValue, LDecimalSymbol)
    LNumDecimals = Len(LValue) - LPos

    ' Round if the value provided has decimals and the number of decimals
    ' is greater than the number of decimal places we are rounding to
    If (LPos > 0) And (LNumDecimals > 0) And (LNumDecimals > pDecimalPlaces) Then

        ' Calculate the factor to add
        QValue = (1 / (10 ^ (LNumDecimals + 1)))
        ' Symmetric rounding is commonly desired so if the value is
        ' negative, make the factor negative
        ' (Remove the following 3 lines if you require "Round Up" rounding)
        If (pValue < 0) Then
            QValue = -QValue
        End If

        ' Add a 1 to the end of the value (For example, if pValue is 12.65
        ' then we will use 12.651 when rounding)
        StandardRound = Round(pValue + QValue, pDecimalPlaces)

    ' Otherwise return the original value
    Else
        StandardRound = pValue
    End If
End Function

לשימוש בפונקציה, אתה פשוט מדביק את הקוד לעיל במודול כלשהו
ומחליף את המילה Round ל StandardRound

בהצלחה

@שלומ
אם לא עשו חוזה נשארת ברירת המחדל על כללי הסטטוס קוו שבדוגמא שלך אוסר לגנוב, ובדוגמת הפלאפון משאיר את החוק של ביטול קנסות היציאה מחברות התקשורת.
אפשר להחתים את הלקוח שבמידה והוא מבטל את הניוד יתחייב לשלם על השירות שקיבל, אבל זה לא יכול להיות 'קנס יציאה' שאסור על פי חוק, ובכל מקרה זה לא יכול להיות על בסיס מודעה בחנות ללא חתימה של הלקוח.

@שלומ
תכל'ס, הקנס הזה הוא רק איום?

@margalit
לאחר מעשה.
מה עושים עכשיו עם הקנס הזה?

תודה

בכל דפדפן יש איפשהו מקום להגדיר את זה.
בכרום למשל, הגדרות >> מתקדם >> הורדות >> מיקום

@בערל
אתה בטוח שזה מהודעות בגי'מייל ולא מקבצים בדרייב או תמונות?
יש אפשרות לראות את החלוקה בלחיצה על "נהל" בתחתית רשימת האימיילים

@כוספים-למשיח אמר בנוהל דיווח על פירצה באתר:

@אבי
הסתדרת?

התחלתי.
שלחתי כמה הודעות, בינתיים לשווא.
צריך לזה גם זמן...

בתקופה האחרונה יש לי ניתוקים קצרים מידי כמה דקות בקו האינטנרט
מישהו יודע למה זה יכול להיות קשור?

תודה

שמעתי שיש איזשהו מספר טלפון שבו ניתן לבדוק אם צ'ק הופקד כבר באפליקציה
האם מישהו שמע על שירות כזה בטלפון או באמצעות האינטרנט?