Εκτύπωση από SBSL

[George Kirkmalis]

Καλησπέρα κύριοι,

Έχω ένα θέμα με ένα SBSL script που παλεύω.

Σε δύο περιπτώσεις διαφορετικές χρειάζεται να εκτυπώσω παραστατικό έιτε σε χαρτί έιτε σε pdf

Το πρόβλημα μου είναι ότι το Pdf το φτιάχνω κανονικά ενώ η εντολή που αφορά εκτύπωση σε εκτυπωτή δεν παίζει.

Οι εντολές που χρησιμοποιώ είναι

Για το Pdf
x = CallPublished('SysRequest.PrintForm', VarArray(vSalModule1, '2199','PDF file', vFile,4)); //Αυτό παίζει

για

εκτύπωση σε εκτυπωτή

x = CallPublished('SysRequest.PrintForm', VarArray(vSalModule1,'2200','Samsung','',4)); //Αυτό όχι

Τί μπορεί να φταίει

Σας ευχαριστώ πολύ

[George Kirkmalis]

Καλησπέρα και πάλι,

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

Σας ευχαριστώ πολύ!!!

[Νίκος Μάλιακκας]

Δοκίμασες να στείλεις το αποτέλεσμα (x) σε κάποιο πεδίο με την sendresponse για να δεις τι σου στέλνει το softone.

Στην javascript που την χρησιμοποιώ σου επιστρέφει ΟΚ, αν τα στείλει στον spooler (αν ο spooler το εκτυπώσει είναι άλλη ιστορία) των windows.

Αν δεν τα καταφέρει σου επιστρέφει το μήνυμα σφάλματος.

Αυτό που αρκετές φορές είχε θέματα ήταν όταν από λειτουργικό server με remote desktop προσπαθούσαμε να εκτυπώσουμε. Αν στο remote desktop ήταν ενεργοποιημένο το printer sharing χαλούσε η σειρά των εκτυπωτών στον σερβερ, και οι εκτυπώσεις πήγαιναν σε άλλον εκτυπωτη...

On Friday, January 8, 2016 at 3:30:39 PM UTC+2, George Kirkmalis wrote:

[George Kirkmalis]

Νίκο σε ευχαριστώ για την απάντηση,

αλλά επειδή βιαζόμουν να το λύσω το θέμα έκανα το εξής και το παραθέτω για αρχάριους σαν κι εμένα. Χρησιμοποίησα JavaScript που είχα δοκιμασμένο μέσα σε String το κάλεσα με την εντολή ExecuteXScript και δούλεψε.


    vScript =     ' var ObjSalDoc;' +
                                                        ' ObjSalDoc = X.CreateObj(' +#39+ vSalObj + #39+ '); ' +
                                                        ' ObjSalDoc.DBLocate('+ VarToStr(vNewEntoliDoc) +'); ' +
                                                        ' ObjSalDoc.PRINTFORM(' +#39+ VarToStr(vSeries) +#39+ ',' +#39+ VarToStr(vPrinter) +#39+ ', ' +#39+ VarToStr(ThirdParam) +#39 +' ); ' +
                                                        ' ObjSalDoc.Destroy' ;
                                x=CallPublished('SysRequest.ExecuteXScript',VarArray(vSalModule1,1,'function PrintDoc(){'+ VarToStr(vScript) +';}','PrintDoc',4));


Και πάλι σε ευχαριστώ!!!