Artsoft - List Label - Documento para certificar com observações do artigo, vários CDUs,

External$("~MA"+DocLan.Div.Descric)+

if(StkFch.Div.Obs<>"",chr$(10)+StkFch.Div.Obs,"")+
if(DocLan.CDULan.01<>"",chr$(10)+DocLan.CDULanNm.01 +": " +DocLan.CDULan.01,"") +
if(DocLan.CDULan.02<>"",chr$(10)+DocLan.CDULanNm.02 +": "+DocLan.CDULan.02,"") +
if(DocLan.CDULan.03<>"",chr$(10)+DocLan.CDULanNm.03 +": "+DocLan.CDULan.03,"") +
if(DocLan.CDULan.04<>"",chr$(10)+DocLan.CDULanNm.04 +": "+DocLan.CDULan.04,"") +
if(DocLan.CDULan.05<>"",chr$(10)+DocLan.CDULanNm.05 +": "+DocLan.CDULan.05,"") +
if(DocLan.Div.Obs<>"",chr$(10)+DocLan.Div.Obs,"")+

if(DocLan.Div.Detalhe>"" and strpos(DocLan.Flg.LancB,"1")=17, chr$(10)+"- "+strsubst$ ((DocLan.Div.Detalhe),";",chr$(10)+"- "),
if(DocLan.Div.Detalhe>"",chr$(10)+"- "+strsubst$ ((DocLan.Div.Detalhe),"; ",chr$(10)+"- ")))+
if (DocLan.Qtd.Med0<>0," ("+
if (StkFch.Div.NrForm=4,"2x["+External$("~Z"+str$(DocLan.Qtd.Med1,0,4)+"+"+str$(DocLan.Qtd.Med2,0,4))+"]",
external$("~Z"+
str$(DocLan.Qtd.Med1,0,4)+
if (DocLan.Qtd.Med2<>0," x "+str$(DocLan.Qtd.Med2,0,4))+
if (DocLan.Qtd.Med3<>0," x "+str$(DocLan.Qtd.Med3,0,4))+
if (DocLan.Qtd.Med2<>0," = "+str$(DocLan.Qtd.Real/DocLan.Qtd.Med0,0,4)))
)+" "+ if (StkFch.Div.NrForm=4,"m",if (DocLan.Qtd.Med3<>0,"m3",if (DocLan.Qtd.Med2<>0,"m2",StkFch.Logis.Uni)))+", "+str$(DocLan.Qtd.Med0)+" unid)")+
if (DocLan.Div.TerRelAI>0," ("+External$("~MT"+
if (@TerRelMsg>"",@TerRelMsg+" ")+DocLan.Div.TerRelNome+
if (DocLan.Div.TerRelMorad>""," / "+DocLan.Div.TerRelMorad)+
if (DocLan.Div.TerRelLocal>""," / "+DocLan.Div.TerRelLocal)+
if (DocLan.Div.TerRelCodP>""," / "+DocLan.Div.TerRelCodP))+")")

Achou este artigo útil?