Claudio
Donde veas thisform.epson
Hace relación a la ocx insertada en el form de facturación.
Es como para que tengas una idea
IF
thisform.epson.OpenInvoice(cTipoComp,cVac,cLD,cVac,cVac,"10","I",cIC,m.razonsoc,cVac,cTDC,cNDC,"N",m.domicilio,m.cinom,cVac,cRemito,cVac,"C")
*!* IF
thisform.epson.OpenInvoice(cTipoComp,"C",cLD,"1","P","10","I",cIC,m.razonsoc,".",cTDC,cNDC,"N",m.domicilio,m.cinom,".",cRemito,".","C")
*** ESTAS PRUEBAS SE USARON CON UN SAMSUNG
*!* IF
thisform.epson.OpenInvoice("F","C",cLD,"1","P","10","I",cIC,m.razonsoc,"-",cTDC,cNDC,"N",m.domicilio,m.cinom,"001","001","001","C")
*!* IF thisform.epson.openInvoice('T','C', 'B', '1', 'P',
'12','I', 'M', 'Nombre1', 'Nombre2', 'CUIT', '20206233185','N',
'DomComprador1', 'DomComprador2', 'DomComprador3', '001', '001', 'C')
*!* IF thisform.epson.openInvoice("T","C","B", "1", "P",
"10", "I", "F", "CONS. FINAL", " ", "C.F.", " ", "N", " ", "MAR DEL PLATA", "
", "Visa", "9999-9999-9999-9999", "C" )
SELECT detavalftmp
SCAN
m.nomred = nomart
nC = alltrim( str( int( ABS(cantidad) * 1000 )
) )
* nP = alltrim( str( int( preunit * 100 ) ) )
IF cLD = "A"
nP = alltrim( str( int( ( impgravaa +
impgravab ) * 100 ) ) )
ELSE
nP = alltrim( str( int( ( impgravaa +
impgravab + impimpint + impiva ) * 100 ) ) )
** nP = alltrim( str( int( ( impgravaa +
impgravab + impiva ) * 100 ) ) )
endif
nI = alltrim( str( int( detaiva * 100 ) ) )
nImpInternosFijos = alltrim( str( int(
impimpint * 100000000 ) ) )
nCL = "M"
**
thisform.epson.sendInvoiceItem(cc,cc,precio,iva,cualif,bundle,porce,x1,x2,x3,incre,impint)
if thisform.epson.SendInvoiceItem( m.nomred ,
nC, nP, nI, "M" , nBultos,nTasaAjusteV,cVac,cVac,cVac, nTasaAcre,
nImpInternosFijos)
else
lTodoOk = .f.
WAIT clear
MESSAGEBOX("No se puede Facturar un
Articulo..."+ CHR(13)+ALLTRIM(M.NOMRED)+ CHR(13)+ thisform.epSON.AnswerField_3 )
ENDIF
ENDSCAN
* desasteriscar lo que sigue si queremos que no se cierre el ticket
* lTodoOk = .f.
IF lTodoOk
*!*
thisform.epson.getInvoiceSubtotal("N","ss")
*!* nIFTOTAL = thisform.epson.answerField_5
*!* nIFIVA21 = thisform.epson.answerField_6
*!* nIFNOGRA = thisform.epson.answerField_9
*!* nIFNETOSINIVA =
thisform.epson.answerField_10
**
thisform.epson.sendInvoicePayment("text1","00000000100","T")
thisform.epson.CloseInvoice(cTipoComp,cLD,cVac)
Saludos
César Luque.
De: Claudio Villarreal
