Solved

How to reprint "Additional Invoice With QR Code" for a customer invoice?

  • 13 July 2022
  • 5 replies
  • 148 views

Userlevel 5
Badge +10

We need to reprint the “Additional Invoice With QR Code”.

With Order Report, no parameter is showing up.

Reprint from customer invoice only proposes the Invoice layout, not the QR.

Thank you for any feedback!

IFS10 Update 11

Regards Martina

icon

Best answer by ALHAGMO 24 February 2023, 16:55

View original

5 replies

Userlevel 5
Badge +10

Finally we are opening this report from report archive.

Looks like there is no other solution now (Apps 10 Upd 11)

Userlevel 5
Badge +10

Now after getting UPD19 the QR invoice is not created automatically.

Before we were able to find the QR invoice ADDITIONAL_INV_Q_R_CODE_REP in the Report Archive but now, we cannot find any entry in the report archive.

Has anyone a solution for this?

Userlevel 5
Badge +10

Found the reason… Of course Masterdata missing: 

Without the PAYMENT_WAY_PER_IDENTITY no QR Invoice is created.

 

Userlevel 5
Badge +10

This would be one option for a reprint (which works only in case of having Ncf_Reference filled in the invoice):

 

CREATE OR REPLACE PROCEDURE C_Silent_Print_QR_Invoice (
   INVOICE_NO_ IN VARCHAR2
   ,COMPANY_ IN VARCHAR2
   ,SERIES_ID_  IN VARCHAR2)
IS
   layout_name_        VARCHAR2(2000):= 'AdditionalInvQRCodeRep.rdl';
   report_id_          VARCHAR2(2000):= 'ADDITIONAL_INV_Q_R_CODE_REP';
   report_attr_        VARCHAR2(2000):= '';
   parameter_attr_     VARCHAR2(2000):= '';
   instance_attr_      VARCHAR2(2000):= '';
   print_attr_         VARCHAR2(2000):= '';
   attr_               VARCHAR2(2000):= '';
   distribution_list_  VARCHAR2(2000):= '';
   print_job_id_       VARCHAR2(2000):= '';
   printer_id_         VARCHAR2(2000):= 'No Printout,SERVER,NO_PRINTOUT';
   result_key_         VARCHAR2(2000):= '';
BEGIN
   Client_SYS.Clear_Attr(report_attr_);
   Client_SYS.Add_To_Attr('REPORT_ID',   report_id_,   report_attr_);
   Client_SYS.Add_To_Attr('LAYOUT_NAME', layout_name_, report_attr_);

   Client_SYS.Clear_Attr(parameter_attr_);
   Client_SYS.Add_To_Attr('INVOICE_NO', INVOICE_NO_, parameter_attr_);
   Client_SYS.Add_To_Attr('SERIES_ID', SERIES_ID_, parameter_attr_);
   Client_SYS.Add_To_Attr('COMPANY', COMPANY_, parameter_attr_);

   Client_SYS.Clear_Attr(print_attr_);
   Archive_API.New_Client_Report(result_key_, report_attr_, parameter_attr_, distribution_list_, 
   print_attr_); 

   Archive_API.Get_Info(instance_attr_,parameter_attr_,result_key_);

   Client_SYS.Clear_Attr(attr_);
   Client_SYS.Add_To_Attr('PRINTER_ID', printer_id_, attr_);

   Print_Job_API.New(print_job_id_,attr_);
   Client_SYS.Add_To_Attr('PRINT_JOB_ID', print_job_id_, instance_attr_);
   client_SYS.Add_To_Attr('RESULT_KEY',   result_key_,   instance_attr_);

   Print_Job_Contents_API.New_Instance(instance_attr_);
   Print_Job_API.Print(print_job_id_);
END C_Silent_Print_QR_Invoice;
 

Badge +4

Hi Martina,

 

We can create a custom RMB from the invoice and pass the parameters. We have already solved this once.

 

Raphael

Reply