Descobrimos então os Relatórios Gerenciais existentes na impressora.
Cadastrando Relatórios Gerenciais na ECF
Para realizar estas impressões é necessário primeiramente cadastrar o nome do Relatório Gerencial desejado.
Para esta tarefa utilizaremos a função: confCadastrar_ECF_Daruma.
Parâmetros: |
|
pszCadastrar |
Tipo: ALIQUOTA,
TNF,
RG,
FPGTO, |
pszValor |
Descrição a ser cadastrada |
pszSeparador |
Separador utilizado para separar a descrição |
Na prática
C(Sharp)
[DllImport("DarumaFrameWork.dll")]
public static extern int confCadastrar_ECF_Daruma(string pszCadastrar, string pszValor, string pszSeparador);
private void BT_Enviar_Click(object sender, EventArgs e)
{
DarumaFramework_Declaracoes_CSharp.iRetorno = DarumaFramework_Declaracoes_CSharp.confCadastrar_ECF_Daruma("RG", "Id. do PAF-ECF", "|");
}
Delphi
function confCadastrar_ECF_Daruma(pszCadastrar:string;pszValor:string;pszSeparador:string): Integer; StdCall; External 'DarumaFramework.dll';
Int_Retorno:= confCadastrar_ECF_Daruma(‘RG’, ‘Ind. do PAF-ECF’, ‘|’);
VB6
Public Declare Function confCadastrar_ECF_Daruma Lib "DarumaFrameWork.dll" (ByVal pszCadastrar As string, ByVal pszValor As string, ByVal pszSeparador As string) As Integer
Private Sub TB_Numero_Item_Click()
iRetorno = confCadastrar_ECF_Daruma("RG", "Id. do PAF-ECF", "|")
End Sub
Pronto! Nomeamos um relatório para impressão do respectivo documento!
Agora o próximo passo é abrir o RG, enviar o texto que será impresso e fechá-lo.
Emissão do Relatório Gerencial
Para isto utilizaremos as funções:
- iRGAbrir_ECF_Daruma - Abre o Relatório Gerencial
- iRGImprimirTexto_ECF_Daruma - Recebe o texto a ser impresso
- iRGFechar_ECF_Daruma - Fecha o Relatório Gerencial
iRGAbrir_ECF_Daruma
Parâmetros: |
|
pszNomeRG |
Nome do Relatório Gerencial |
iRGImprimirTexto_ECF_Daruma
Parâmetros: |
|
pszTexto |
Texto do Relatório Gerencial |
iRGFechar_ECF_Daruma
C(Sharp)
[DllImport("DarumaFrameWork.dll")]
public static extern int iRGAbrir_ECF_Daruma(string pszNomeRG);
[DllImport("DarumaFrameWork.dll")]
public static extern int iRGImprimirTexto_ECF_Daruma(string pszTexto);
[DllImport("DarumaFrameWork.dll")]
public static extern int iRGFechar_ECF_Daruma();
private void BT_Enviar_Click(object sender, EventArgs e)
{
DarumaFramework_DLL.DarumaFramework_Declaracoes_CSharp.iRetorno = DarumaFramework_DLL.DarumaFramework_Declaracoes_CSharp.iRGAbrir_ECF_Daruma("Ind. do PAF-ECF");
DarumaFramework_DLL.DarumaFramework_Declaracoes_CSharp.iRetorno = DarumaFramework_DLL.DarumaFramework_Declaracoes_CSharp.iRGImprimirTexto_ECF_Daruma("N° do Laudo \nIdentificação da empresa desenvolvedora\nCNPJ\nRazão Social\nEndereço\nTelefone\nContato\nIdentificação do PAF-ECF\nNome comercial\nVersão\nPrincipal arquivo executável\nCódigo de autenticação do principal arquivo executável (MD-5)\nOutros arquivos utilizados e respectivos códigos MD-5\n");
DarumaFramework_DLL.DarumaFramework_Declaracoes_CSharp.iRetorno = DarumaFramework_DLL.DarumaFramework_Declaracoes_CSharp.iRGFechar_ECF_Daruma(); }
Veja como ficou a impressão do Relatório Gerencial:
|