Olá parceiros,
Nas impressoras térmicas Daruma existe a opção de programar o operador que está utilizando o ECF para que saia no cupom fiscal.
Sim! É aquele nome que sai ao final dos cupons fiscais emitidos.
Hoje conheceremos as funções na DarumaFramework.DLL, para configuração e verificação do operador de caixa atual.
Configuração
Para configurar o nome do operador no cupom fiscal utilizaremos a função: confProgramarOperador_ECF_Daruma.
Parâmetros
String Tam Descrição
pszValor : 20 Identificação do Operador
Na prática
Delphi
function confProgramarOperador_ECF_Daruma(pszValor:string): Integer; StdCall; External 'DarumaFramework.dll';
procedure TFR_FISCAL_confProgramarOperador_ECF_Daruma.BT_ENVIARClick(
Sender: TObject);
begin
Int_Retorno:= confProgramarOperador_ECF_Daruma('Caixa – Ana Clara');
end;
C(Sharp)
[DllImport("DarumaFrameWork.dll")]
public static extern int confProgramarOperador_ECF_Daruma(string pszValor);
private void BT_Enviar_Click(object sender, EventArgs e)
{
string Str_Operador;
Str_Operador = TB_Operador.Text.Trim();
Declaracoes.iRetorno = Declaracoes.confProgramarOperador_ECF_Daruma(Str_Operador);
Declaracoes.TrataRetorno(Declaracoes.iRetorno);
}
}
Verificando o operador atual
Para verificarmos o operador atual gravado na impressora utilizaremos a função: rRetornarInformacao_ECF_Daruma.
Parâmetros:
Índice: Código da informação a ser obtida da impressora.
Tamanho: Variável por referência com o tamanho de espaços alocados para o retorno da informação.
Conforme a tabela de consulta a retornos, utilizaremos o índice 130 e uma variável por referência com tamanho 20.
Na prática:
C (Sharp)
[DllImport("DarumaFrameWork.dll")]
public static extern int rRetornarInformacao_ECF_Daruma(string pszIndice, [MarshalAs(UnmanagedType.VBByRefStr)] ref string pszRetornar);
private void button1_Click(object sender, EventArgs e)
{
StringBuilder Str_Informacao = new StringBuilder(20);
Declaracoes.iRetorno = Declaracoes.rRetornarInformacao_ECF_Daruma("130", Str_Informacao);
}
Delphi
function rRetornarInformacao_ECF_Daruma(pszIndice:string;pszRetornar:string): Integer; StdCall; External 'DarumaFramework.dll';
Int_Retorno := rRetornarInformacao_ECF_Daruma('130',Str_Informacao);
Viu só como é fácil!
Duvidas estamos à disposição...