Programando o operador na DarumaFramework.DLL

ASP.NET

Monday, April 23, 2012

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...