Pessoal, eu tenho um formulário controle que ao inserir um serial ele busca no banco se o serial existe, existindo ele busca um padrão de impressão cadastrado numa tabela e associa a uma variável pra poder imprimir.
Codigo no onValidadeSucess:
[var_y] = {eixo_y};
[var_x] = {eixo_x};
[var_impressora] = {impressora};
$check_sql = "SELECT SN_IM
FROM SMART_TV_PROCESSO
WHERE SN_IM = '{mac}'";
sc_lookup(res, $check_sql);
if (isset({res[0][0]}))
{
[var_sn_ia] = {res[0][0]};
[var_sn_ia_a] = substr({res[0][0]}, 0, 12);
[var_sn_ia_b] = substr({res[0][0]}, 12, 21);
$arquivo = fopen(“serial_ia.prn”, “w”) or die(“Unable to open file!”);
$check_string = "SELECT TIPO, STRING
FROM SMART_TV_STRINGS
WHERE TIPO = 'serial_ia'";
sc_lookup(string, $check_string);
if (isset({string[0][0]})){
[conteudo] = {string[0][1]}; }
else{ sc_error_message("STRING NÃO ENCONTRADA");
sc_error_exit();
}
fwrite($arquivo, [conteudo]);
fclose($arquivo);
$arquivo_origem = "serial_ia.prn";
$arquivo_destino = "C:\Users\Particular\Desktop\serial_ia.prn";
copy($arquivo_origem, $arquivo_destino);
}
else
{
sc_error_message("SERIAL NÃO ENCONTRADO");
sc_error_exit();
}
O Padrão no Banco:
CT~~CD,~CC^~CT~
^XA~TA000~JSN^LT[var_y]^MNW^MTT^PON^PMN^LH[var_x],0^JMA^PR2,2~SD26^JUS^LRN^CI0^XZ
^XA
^MMT
^PW591
^LL0150
^LS0
^BY90,90^FT42,108^BXN,5,200,0,0,1,~
^FH^FD[var_sn_ia]^FS
^FT137,51^A0N,21,21^FH^FD[var_sn_ia_a]^FS
^FT137,77^A0N,21,21^FH^FD[var_sn_ia_b]^FS
^PQ1,0,1,Y^XZ
O problema que o arquivo gerado não mostra a valor associado a variável global, mas sim as variável global como no cadastro(acima).
Como deveria sair:
CT~~CD,~CC^~CT~
^XA~TA000~JSN^LT0^MNW^MTT^PON^PMN^LH0,0^JMA^PR2,2~SD26^JUS^LRN^CI0^XZ
^XA
^MMT
^PW591
^LL0150
^LS0
^BY90,90^FT42,108^BXN,5,200,0,0,1,~
^FH^FD515E66830M01112000001^FS
^FT137,51^A0N,21,21^FH^FD515E66830M01^FS
^FT137,77^A0N,21,21^FH^FD112000001^FS
^PQ1,0,1,Y^XZ