Εκτύπωση QR Code από το myDATA

Σκοπός: Εκτύπωση QR Code myDATA στα παραστατικά που εκτυπώνονται από το Pegasus ERP με χρήση ΕΑΦΔΣΣ Τύπου Β, καθώς στη νέα έκδοση του myDATA θα επιστρέφει ένα QR Code μαζί με το MARK.

Εργαλεία:
1. Θα πρέπει οπωσδήποτε να έχετε πάρει όλες τις διαθέσιμες Αναβαθμίσεις στην εφαρμογή Pegasus.
2. Η Ενημέρωση του qrCode ισχύει από την έκδοση του myDATA API 1.0.7 και μετά.

Ρυθμίσεις:

Βήμα 1.

Μέσα από την επιλογή [ToolBox-> Εργαλεία Παραμετροποίησης -> Παραμετροποίηση Εφαρμογής -> Κεντρικοί Πίνακες Παραμετροποίησης -> Συναλλαγών και Συναλλασσομένων -> Ορισμός Παραστατικών Πελατών] ανοίγετε τον τύπο Παραστατικού πχ ΤΠ-ΔΑ Τιμολόγιο Πώλησης (Αξία και ποσότητα)->
διαχείριση φόρμας

Bήμα 2.

Πατάτε το Tab "Αρχική Μέθοδος"

Βήμα 3.

Πατάτε στο κάτω μέρος της Οθόνης Αρχικής Μεθόδου ένα click και στη συνέχεια το κουμπί "Enter" από το πληκτρολόγιό σας.
Στη συνέχεια πληκτρολογείτε τα παρακάτω:

**Ευρεση qrCode (από ΕΑΦΔΣΣ ή από myDATA)
##VAR my_qrcode=''

**έχει από ΕΑΦΔΣΣ?
my_qrcode:=retarray(34, peg_fhmarr, '')
**Αν δεν έχει από ΕΑΦΔΣΣ
##IF empty(my_qrcode)
**για παραστατικό πελάτη
my_qrcode:=odbcprintfld('mydt10', 'qrurl', "=tbl='a55' && tbl_nr01={nnr01}")
**για παραστατικό προμηθευτή
**my_qrcode:=odbcprintfld('mydt10', 'qrurl', "=tbl='a56' && tbl_nr01={nnr01}")
##ENDIF

*Σημείωση: Στην επιλογή [Toolbox-> Κεντρικοί Πίνακες Παραμετροποίησης -> Παραμετροποίηση myDATA -> Βασικές Παράμετροι myDATA] μπορείτε να τσεκάρετε το πεδίο [on-line Ενημέρωση με Αναμονή] ώστε η εκτύπωση του παραστατικού να περιμένει την ενημέρωση από το myDATA. Με αυτόν τον τρόπο θα βρίσκει πάντα την πληροφορία αν ενημερωθεί σωστά το myDATA.

Bημα 4.

Πατάτε το Tab Φόρμα.
α.Βρίσκετε την εικόνα του QR (Βρίσκεται στο κάτω μέρος της φόρμας σας και σηματοδοτείται από ενα @)->Πατάτε διπλό click

β.Σε περίπτωση που δεν υπάρχει το Αντικείμενο (@) στη φόρμα σας θα πρέπει να προσθέσετε ένα νέο αντικείμενο [Εικόνα] με τα εξής Στοιχεία:
Συνθήκη= !empty(my_qrcode)
Εικόνα= ==callfpeg('?query?funpim03', {my_qrcode })
Πλάτος και Υψος (pixel)= 600. Θα πρέπει να κάνετε δοκιμές, ανάλογα με τον εκτυπωτή και την φόρμα σας, ώστε να τυπώνεται καθαρά και να έχει τις ελάχιστες διαστάσεις που ορίζει η ΠΟΛ Α1024 (18 Χ 18 χιλιοστά).
Εκτυπώνεται= [Υποσέλιδο] για polpa_roll.frp θα πρέπει να ορίσετε [Νεα γραμμή ανά εγγραφή]

Βήμα 5.

Στο πεδίο Συνθήκη πληκτρολογείτε το :
!empty(my_qrcode)

Στην polpa_roll.frp η συνθήκη θα πρέπει να είναι :
!empty(my_qrcode) .and. recno()=lastrec()

Στο πεδίο Εικόνα πληκτρολογείτε το :
=callfpeg('?query?funpim03', { my_qrcode })

Πατάτε Καταχώρηση.