import script για εισαγωγή παραστατικών εισπράξεων με επιταγές

403 views
Skip to first unread message

Άκης

unread,
Jul 9, 2021, 3:57:55 AM7/9/21
to Softone Developers Network
Mήπως υπάρχει κάποιο παράδειγμα για εισαγωγή παραστατικών εισπράξεων με επιταγές.

Έκανα μια προσπάθεια με το script που ακολουθεί  αλλά βγάζει το εξής σφάλμα:

Module CFNCUSDOC : Ole Error: 80040E2F. Cannot insert the value NULL into column 'SERIES', table 'tzanes.dbo.CHEQUE'; column does not allow nulls. INSERT fails

--------------------------------------------------------------------------------------------------------------------------------------

Import ImpCusCfn( findoc1 , cCashLines, cChequeLines) into 'CFNCUSDOC,IMPORT:1,WARNINGS:OFF' 
{
  FinDoc findoc1 {       
        SERIES = findoc1.SERIES;
        FINCODE = findoc1.FINCODE;
        BRANCH = :x.sys.branch;
       NUM01 = findoc1.FINDOC;
       TRNDATE = findoc1.TRNDATE;
TRDR = ConvTrdr(:X.SYS.COMPANY,findoc1.CUSCODE);   
   TRDBRANCH = ConvTrdrBranch(:X.SYS.COMPANY,FinDoc.TRDR,Trim(findoc1.CUSBRANCH));
       SOCURRENCY = :x.sys.SOCURRENCY;
       COMMENTS = findoc1.COMMENTS;  
 }

  CashLines cCashLines {
      LINEVAL = cCashLines.LINEVAL;
}

 ChequeLines cChequeLines {
   CSERIES = 3311;
 TPRMS = 3312;
 X_CRTDATE = cChequeLines.trndate;
          X_BANK =ConvBank(cChequeLines.bank); 
          X_DATEOFS = cChequeLines.CFINALDATE;
          LINEVAL = cChequeLines.LINEVAL;
          CCHEQUENUMBER = cChequeLines.CHEQUENUMBER;
          CFINALDATE = cChequeLines.CFINALDATE;
          COMMENTS = Trim(cChequeLines.comments); 
}
}
---------------------------------------------------------------------------------------------

AgroSoft Info

unread,
Jul 9, 2021, 7:43:33 AM7/9/21
to so...@googlegroups.com

Βαλε το SQL monitor, για να δεις το select τι επιστρέφει. Έχει κάποια τιμή το findoc1.SERIES ?

 

 

Ίωνας Χατζηϊωνάς

 

AgroSoft LTD

ΙΩΑΝΝΗ ΚΛΗΡΙΔΗ 11

1070 ΛΕΥΚΩΣΙΑ - ΚΥΠΡΟΣ

Τηλ. 0035722263151, Κινητό 6974042525

EmailSignature 

 

www.agrosoft.io

--
Softone Developers Network group.
To post to this group, send email to so...@googlegroups.com
---
Λάβατε αυτό το μήνυμα επειδή έχετε εγγραφεί στην ομάδα "Softone Developers Network" των Ομάδων Google.
Για να απεγγραφείτε απ' αυτή την ομάδα και να σταματήσετε να λαμβάνετε μηνύματα ηλεκτρονικού ταχυδρομείου απ' αυτή, στείλτε ένα μήνυμα ηλεκτρονικού ταχυδρομείου στη διεύθυνση soft1+un...@googlegroups.com.
Για να κάνετε προβολή αυτής της συζήτησης στον ιστό, επισκεφτείτε τη διεύθυνση https://groups.google.com/d/msgid/soft1/c9f63406-2b3c-4dad-8044-f4fa455b8991n%40googlegroups.com.

image001.gif
Message has been deleted
Message has been deleted
Message has been deleted
Message has been deleted

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:46:52 AM7/9/21
to so...@googlegroups.com
Από 9/7/2021 έως 10/7/2020 θα είμαι εκτός γραφείου και η πρόσβαση μου στα email θα είναι περιορισμένη. Τηλ. γραφείου: 2311504515.

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:47:31 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:48:12 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:48:51 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:49:32 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:50:12 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:50:52 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:51:32 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:52:12 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:52:52 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:53:32 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:54:12 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:54:52 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:55:32 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:56:12 AM7/9/21
to so...@googlegroups.com

Nikos Trampoulis

unread,
Jul 9, 2021, 7:56:48 AM7/9/21
to so...@googlegroups.com

κ. «siakis», υπάρχει περίπτωση να τελειώσει κάποια στιγμή αυτό το μαρτύριο;

 

Έχουμε πάρει 40 email σας και ακόμα έρχονται….

 

 

 

Με εκτίμηση,

 

 

 

Τραμπούλης Θ. Νικόλαος

Υπηρεσίες Πληροφορικής

Σχεδίαση & Ανάπτυξη Λογισμικού

Δοϊράνης 130-132, Καλλιθέα - Αθήνα, Τ.Κ. 17673

Τηλ. +302112165936

Κιν. +306948263480

niktram@red-pill.gr

www.red-pill.gr

--

Softone Developers Network group.
To post to this group, send email to so...@googlegroups.com
---
Λάβατε αυτό το μήνυμα επειδή έχετε εγγραφεί στην ομάδα "Softone Developers Network" των Ομάδων Google.
Για να απεγγραφείτε απ' αυτή την ομάδα και να σταματήσετε να λαμβάνετε μηνύματα ηλεκτρονικού ταχυδρομείου απ' αυτή, στείλτε ένα μήνυμα ηλεκτρονικού ταχυδρομείου στη διεύθυνση soft1+un...@googlegroups.com.

Για να κάνετε προβολή αυτής της συζήτησης στον ιστό, επισκεφτείτε τη διεύθυνση https://groups.google.com/d/msgid/soft1/B0F85E0DF6104BF288646E5E727091A4.MAI%40ns600.superweb.gr.

image001.png

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:56:52 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:57:32 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:57:32 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:58:12 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:58:12 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:58:52 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 7:59:33 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:00:13 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:00:52 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:01:33 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:02:13 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:02:52 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:03:33 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:04:13 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:04:53 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:05:33 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:06:13 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:06:53 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:07:33 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:08:13 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:08:53 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:09:33 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:10:13 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:10:54 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:11:34 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:12:13 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:12:54 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:13:34 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:14:14 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:14:54 AM7/9/21
to so...@googlegroups.com

sia...@adp-software.gr

unread,
Jul 9, 2021, 8:15:33 AM7/9/21
to so...@googlegroups.com

Άκης

unread,
Jul 10, 2021, 6:34:43 AM7/10/21
to Softone Developers Network
Το βρήκα. Το πρόβλημα ήταν στην σειρά  των πεδίων.  Χρειάζεται πρώτα το tprms και μετά το cseries. Δηλαδή:
TPRMS = 3312;
CSERIES = 3311;

Επισυνάπτω όλο τον κομάτι του κώδικα που δούλεψε.
Ευχαριτώ πολύ.


Import ImpCusCfn( findoc1 , cCashLines, cChequeLines) into 'CFNCUSDOC,IMPORT:1,WARNINGS:OFF' 
{
  FinDoc findoc1 {       
        SERIES = findoc1.SERIES;
        FINCODE = findoc1.FINCODE;
        BRANCH = :x.sys.branch;
NUM01 = findoc1.FINDOC;
       TRNDATE = findoc1.TRNDATE;
       TRDR = ConvTrdr(:X.SYS.COMPANY,findoc1.CUSCODE);   
  TRDBRANCH = ConvTrdrBranch(:X.SYS.COMPANY,FinDoc.TRDR,Trim(findoc1.CUSBRANCH));
       SOCURRENCY = :x.sys.SOCURRENCY;
       //TRDRRATE = findoc.TRDRRATE;
       COMMENTS = findoc1.COMMENTS;
 }

  CashLines cCashLines {
      LINEVAL = cCashLines.LINEVAL;
}

 ChequeLines cChequeLines {
TPRMS = 3312;
       CSERIES = 3311;
X_CRTDATE = cChequeLines.trndate;
          X_BANK =ConvBank(cChequeLines.bank); 
          X_DATEOFS = cChequeLines.CFINALDATE;
          LINEVAL = cChequeLines.LINEVAL;
          CCHEQUENUMBER = cChequeLines.CHEQUENUMBER;
          CFINALDATE = cChequeLines.CFINALDATE;
          COMMENTS = Trim(cChequeLines.comments);
}
}


Στις Παρασκευή, 9 Ιουλίου 2021 στις 2:43:33 μ.μ. UTC+3, ο χρήστης in...@agrosoft.gr έγραψε:

Βαλε το SQL monitor, για να δεις το select τι επιστρέφει. Έχει κάποια τιμή το findoc1.SERIES ?

 

 

Ίωνας Χατζηϊωνάς

 

AgroSoft LTD

ΙΩΑΝΝΗ ΚΛΗΡΙΔΗ 11

1070 ΛΕΥΚΩΣΙΑ - ΚΥΠΡΟΣ

Τηλ. 0035722263151, Κινητό 6974042525

EmailSignature 

 

www.agrosoft.io

 

 

 

From: so...@googlegroups.com [mailto:so...@googlegroups.com] On Behalf Of Άκης
Sent: Friday, July 9, 2021 10:58 AM
To: Softone Developers Network
Subject: import script για εισαγωγή παραστατικών εισπράξεων με επιταγές

 

Mήπως υπάρχει κάποιο παράδειγμα για εισαγωγή παραστατικών εισπράξεων με επιταγές.

 

Έκανα μια προσπάθεια με το script που ακολουθεί  αλλά βγάζει το εξής σφάλμα:

Module CFNCUSDOC : Ole Error: 80040E2F. Cannot insert the value NULL into column 'SERIES', table 'tzanes.dbo.CHEQUE'; column does not allow nulls. INSERT fails

--------------------------------------------------------------------------------------------------------------------------------------

Import ImpCusCfn( findoc1 , cCashLines, cChequeLines) into 'CFNCUSDOC,IMPORT:1,WARNINGS:OFF' 

{

  FinDoc findoc1 {       

        SERIES = findoc1.SERIES;

        FINCODE = findoc1.FINCODE;

        BRANCH = :x.sys.branch;

       NUM01 = findoc1.FINDOC;

       TRNDATE = findoc1.TRNDATE;

            TRDR = ConvTrdr(:X.SYS.COMPANY,findoc1.CUSCODE);   

               TRDBRANCH = ConvTrdrBranch(:X.SYS.COMPANY,FinDoc.TRDR,Trim(findoc1.CUSBRANCH));

       SOCURRENCY = :x.sys.SOCURRENCY;

       COMMENTS = findoc1.COMMENTS;                          

 }

 

  CashLines cCashLines {

      LINEVAL = cCashLines.LINEVAL;

}

 

 ChequeLines cChequeLines {

             CSERIES = 3311;

             TPRMS = 3312;

             X_CRTDATE = cChequeLines.trndate;

          X_BANK =ConvBank(cChequeLines.bank); 

          X_DATEOFS = cChequeLines.CFINALDATE;

          LINEVAL = cChequeLines.LINEVAL;

          CCHEQUENUMBER = cChequeLines.CHEQUENUMBER;

          CFINALDATE = cChequeLines.CFINALDATE;

          COMMENTS = Trim(cChequeLines.comments); 

}

}

---------------------------------------------------------------------------------------------

 

--
Softone Developers Network group.
To post to this group, send email to so...@googlegroups.com
---
Λάβατε αυτό το μήνυμα επειδή έχετε εγγραφεί στην ομάδα "Softone Developers Network" των Ομάδων Google.
Για να απεγγραφείτε απ' αυτή την ομάδα και να σταματήσετε να λαμβάνετε μηνύματα ηλεκτρονικού ταχυδρομείου απ' αυτή, στείλτε ένα μήνυμα ηλεκτρονικού ταχυδρομείου στη διεύθυνση soft1+un...@googlegroups.com.
Για να κάνετε προβολή αυτής της συζήτησης στον ιστό, επισκεφτείτε τη διεύθυνση https://groups.google.com/d/msgid/soft1/c9f63406-2b3c-4dad-8044-f4fa455b8991n%40googlegroups.com.

Reply all
Reply to author
Forward
0 new messages