report

[exarhos]

Αρχική Δημοσίευση από pctechdr

Gia na katalavo epeidi eimai kai ligo kathysterimenos.

Exeis ena pedio ora_diekp1 pou theleis na pernei timi otan to pedio epivivasi_ploigou einai adeio sosta??

Poia timi tha pernei to pedio ora_diekp1 otan to pedio epivivasi_ploigou einai adeio? Ksekatharise to mou auto na sou apantiso

φίλε μου δεν είσαι εσυ ο καθυστερημένος, εγώ εχω πρόβλημα επικοινωνιας. δεν το εξηγω σωστά και εχεις δίκιο να μην καταλαβαίνεις.
λοιπον. έχω τα πεδία "epivivasi_ploiogu", "ora_diekp1" kai "pedio2"
οταν το πεδιο "epivivasi_ploigou" δεν εχει τιμη τοτε το πεδιο "ora_die θέλω να τιμή του "πεδιο2"
το πεδιο 2 δεν ειναι ποτέ null. έχει πάντα μια τιμη και ειναι κρυφό. δλδ δεν φαινεται στην αναφορά.
και πάλι ευχαριστώ πολύ

[pctechdr]

Mporeis na grapseis px sto report current to eksis.

If IsBlank([epivivasi_ploigou]) then [ora_die]=[πεδιο2]

[exarhos]

Αρχική Δημοσίευση από pctechdr

Mporeis na grapseis px sto report current to eksis.

If IsBlank([epivivasi_ploigou]) then [ora_die]=[πεδιο2]

το έκανα If IsBlank([epivivasi_ploigou]) Then [ora_diekp1] = [pedio2]
αλλα δεν παιζει.
το πεδιο [ora_diekp1] παιιρνει την τιμη του "pedio2" ειτε το "epivivasi_ploiogu" ειναι blank ειτε δεν ειναι

[exarhos]

Αρχική Δημοσίευση από pctechdr

Mporeis na grapseis px sto report current to eksis.

If IsBlank([epivivasi_ploigou]) then [ora_die]=[πεδιο2]

το module δεν εχω δοκιμασει ακομα αλλα δεν το καταλαβα καλα. πως και πότε να το καλώ
σ ευχαριστω πολύ παντως για το χρόνο που διαθετεις.
με εκτιμηση

[pctechdr]

Aderfe xoris to module auto pou egrapses DEN paizei. Xreiazesai tin synartisi pou sou edosa oposdipote.

Bima 1: Dimiourgeis neo module i antigrafeis ton kodika poy soy edosa se ena yparxon.
Public Function IsBlank(arg As Variant) As Boolean
Select Case VarType(arg)
Case vbEmpty
IsBlank = True
Case vbNull
IsBlank = True
Case vbString
IsBlank = (LenB(arg) = 0)
Case vbObject
IsBlank = (arg Is Nothing)
Case Else
IsBlank = IsMissing(arg)
End Select
End Function
Bima 2: Stis idiotites tou report - Events - OnCurrent grafeis auto If IsBlank([epivivasi_ploigou]) Then [ora_diekp1] = [pedio2]
Telos

[exarhos]

Αρχική Δημοσίευση από pctechdr

Aderfe xoris to module auto pou egrapses DEN paizei. Xreiazesai tin synartisi pou sou edosa oposdipote.

Bima 1: Dimiourgeis neo module i antigrafeis ton kodika poy soy edosa se ena yparxon.
Public Function IsBlank(arg As Variant) As Boolean
Select Case VarType(arg)
Case vbEmpty
IsBlank = True
Case vbNull
IsBlank = True
Case vbString
IsBlank = (LenB(arg) = 0)
Case vbObject
IsBlank = (arg Is Nothing)
Case Else
IsBlank = IsMissing(arg)
End Select
End Function
Bima 2: Stis idiotites tou report - Events - OnCurrent grafeis auto If IsBlank([epivivasi_ploigou]) Then [ora_diekp1] = [pedio2]
Telos

φίλε μου σ ευχαριστώ πάρα πολύ για τη βοήθεια και συγνώμη που δεν τα πίανω με τη μία
loipo;n έκανα ότι ακριβως περιέγραψες αλλα μολισ κανω κλικ στη report βγαζει bug "expected variable or procedure,not module"

[pctechdr]

Αναμενόμενη μεταβλητή ή διαδικασία, όχι λειτουργική μονάδα
06/08/2017
2 λεπτά για ανάγνωση

Δεν υπάρχει μεταβλητή ή διαδικασία με αυτό το όνομα στο τρέχονπεδίο ,αλλά υπάρχει μια λειτουργική μονάδα με αυτό το όνομα. Αυτό το σφάλμα έχει την ακόλουθη αιτία και λύση:

Το όνομα μιας λειτουργικής μονάδας χρησιμοποιείται ως μεταβλητή ή διαδικασία. Ελέγξτε την ορθογραφία της μεταβλητής ή του ονόματος της διαδικασίας και βεβαιωθείτε ότι το όνομα στο οποίο θέλετε να αναφερθείτε δεν είναι ιδιωτικό σε άλλη λειτουργική μονάδα. Ένα όνομα λειτουργικής μονάδας μπορεί να είναι προσδιοριστικό, αλλά δεν μπορεί να σταθεί μόνο του.

[pctechdr]

Ti onoma exeis dosei to Module poy ekanes epikollisi ton kodika?? Elpizo OXI IsBlank :)

[exarhos]

Αρχική Δημοσίευση από pctechdr

Ti onoma exeis dosei to Module poy ekanes epikollisi ton kodika?? Elpizo OXI IsBlank :)

module 1 αυτο ειναι το ονομα

[pctechdr]

H Synartisi doyleuei 100 ta 100. Kati allo kaneis lathos.
Gia dokimase na kaneis epikolisi ton kodika mesa sto report kai svise to module 1 pou exeis na deis douleuei?