jamazevedo escreveu:B120,0,0,2,2,5,50,B,"02048001"
B480,0,0,2,2,5,50,B,"02048002"
boa noite!
sei q o tópico é muito antigo, mas, preciso da ajuda, e, preferi não abrir outro desnessariamente.
Vejo q no resultado tem as linhas acima, mas, nas linhas de programação elas não existem.
O meu código já funciona na conversão para o harbour.
mas, ao tentar fazer uma migração para HMG 3.4.4 usando o FORM_WIN as minhas linhas abaixo:
@ prow()+1,0 say 'A0,10,0,2,1,1,N,"&mDS_PRODL1"'
@ prow()+1,0 say 'A280,10,0,2,1,1,N,"&mDS_PRODL1"'
@ prow()+1,0 say 'A562,10,0,2,1,1,N,"&mDS_PRODL1"'
@ prow()+1,0 say 'A0,31,0,2,1,1,N,"&mDS_PRODL2"'
@ prow()+1,0 say 'A280,31,0,2,1,1,N,"&mDS_PRODL2"'
@ prow()+1,0 say 'A562,31,0,2,1,1,N,"&mDS_PRODL2"'
@ prow()+1,0 say 'A0,51,0,2,1,1,N,"&mDS_PRODL3"'
@ prow()+1,0 say 'A280,51,0,2,1,1,N,"&mDS_PRODL3"'
@ prow()+1,0 say 'A562,51,0,2,1,1,N,"&mDS_PRODL3"'
@ prow()+1,0 say 'B1,66,0,E30,2,2,50,B,"&mCD_PRODUT"'
@ prow()+1,0 say 'B280,66,0,E30,2,2,50,B,"&mCD_PRODUT"'
@ prow()+1,0 say 'B562,66,0,E30,2,2,50,B,"&mCD_PRODUT"'
@ prow()+1,0 say 'A0,131,0,2,1,1,N,"&mVR_PREVEN"'
@ prow()+1,0 say 'A280,131,0,2,1,1,N,"&mVR_PREVEN"'
@ prow()+1,0 say 'A562,131,0,2,1,1,N,"&mVR_PREVEN"'
@ prow()+1,0 say 'P' + mQT_LINHAS
apresentaram erro de macro substituição. Alguém sabe dizer o que houve?
Já a última linha de código acima (mqt_linhas) apresentou o erro:
Error BASE/1081 Argument Error: +Tudo bem que entendo que está se somando erroneamente:
P (C) + mQT_LINHAS (N) - realmente há incompatibilidade de String + numérico. Mas, por que na conversão de CLIPPER para HARBOUR seco funciona e de HARBOUR para HMG (modo gráfico) apresentou esse erro?
E, apresentou o erro das MACRO também?
grato