Εκτύπωση περισσότερων τιμών από την καρτέλα του πελάτη στο παραστατικό με την βοήθεια της συνάρτησης odbcprintfld()

Σκοπός : Εκτύπωση περισσότερων τιμών από την καρτέλα του πελάτη στο παραστατικό με την βοήθεια της συνάρτησης odbcprintfld().

Εργαλεία

1) Pegasus ERP

Βήματα

Βήμα 1

Εγκατάσταση του Pegasus ERP

Βήμα 2

Πηγαίνουμε και ανοίγουμε με το διαχειριστικό περιβάλλον του Pegasus ERP την φόρμα με την οποία εκτυπώνουμε το παραστατικό μας.

Αυτό γίνεται από :

Toolbox -> Εργαλεία παραμετροποίησης -> Παραμετροποίηση εφαρμογής -> Κεντρικοί πίνακες παραμετροποίησης -> Παραμετροποίησης Συναλλασομένων και Συναλλαγών και στην συνέχεια επιλέγουμε ένα από τα παραστατικά που χρησιμοποιούμε με διπλό κλικ επάνω του.

Στην φόρμα που μας εμφανίζεται «Ορισμός Παραστατικού πελατών» εκεί που αναφέρεται η «Φόρμα Εκτύπωσης» κάνουμε κλικ στο μπλέ εικονίδιο και μας ανοίγει το διαχειριστικό περιβάλλον της φόρμας. Για περισσότερες πληροφορίες σχετικά με τα παραπάνω και την δημιουργία μιας νέας φόρμας μπορείται να ανατρέξετε στην μελέτη : http://tesae.gr/articles/ΠρότυπεςΜελέτεςήΕφαρμογές/PegasusκαιΠαραστατικά/ΔιαμόρφωσηΠαραστατικούΠελατώνστοPegasusERP3.12.html

Βήμα 3

Για να μπορέσουμε να εκτυπώσουμε περισότερα στοιχεία του πελάτη από την καρτέλα του πρέπει να χρησιμοποιήσουμε την συνάρτηση odbcprintfld()

Η επεξήγηση της συνάρτησης και τα ορίσματα που δέχεται είναι :

Syntax : odbcPrintFld(_table, _field, _where)

Purpose : filds the value of a field.

See Also : odbcgetfld(), printfld()

Version : B

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

Description : Return the value of a filed for specific record. It is similar to printfld() for xBase dataclass.

It is same as odbcgetfld, but not needed the whole "SELECT" query

Parameters

_table (c) : tabel to search in

_field (c) : The field name. It's value will be returned.

_where (c) : condition of record to search for (use sql operators)

If the first character of _where is = (the equal symbol) Pegasus executes an odbctrans(_where)

Returns : the appropriate value

Examples

odbcgetfld("SELECT * FROM 'etf' WHERE nr01=10;", "p21")

it is similar to

odbcprintfld('etf', 'p21', 'nr01=10')

Σύμφωνα με τα παραπάνω και την εφαρμογή που χρησιμοποιούμε για να πάρουμε δεδομένα από την καρτέλα του πελάτη χρησιμοποιούμε την συνάστηση ως εξής:

odbcprintfld('a01','p23',"=nr01='{np03}'")

Η τιμη που πέρνουμε από τον πελάτη είναι η τιμή της μεταβλητής p23, έτσι με την παραπάνω συνάρτηση και αλλάζοντας την μεταβλητή μπορούμε να πάρουμε όποια τιμή θέλουμε από την καρτέλα του πελάτη. Το a01 είναι ο πίνακας των πελατών στον οποίο αναζητούμε την τιμή και το np03 είναι ο κωδικός του πελάτη με τον οποίο κάνουμε αναζήτηση στο πίνακα πελατών a01.

Για να δούμε σε ποιές μεταβλητές αποθηκεύονται οι τιμές από την καρτελα του πελάτη και ποιος είναι ο πίνακας των πελατών, πηγαίνουμε στην καρτέλα του πελάτη και κάνουμε δεξί κλικ πάνω στην φόρμα που μας εμφανίζεται και επιλέγουμε «εκύπωση των πεδίων της οθόνης».