BL.Sys.FOP.Common 1 BL.Flow.Docs.Basis,%RegisteredObject right offerte_01.01 KyoceraFS4000 Offerte A 1 lbOfferte:%Integer %String 1 OFFNr:%String,KLNr:%String %Status 1 Offerte:%RegisteredObject,KLNr:%String %Status 1 lbOffertes:%List,KlantID:DOM.VKP.VanHoeckeKlantID BL.Flow.Docs.TBXMaatwerkDocOptions 1 lbOffertes:%List,KlantID:DOM.VKP.VanHoeckeKlantID BL.Flow.Docs.KADMaatwerkDocOptions 1 OfferteID:%String 0 %Boolean 1 OfferteID:%String 1 %Boolean FileURL : als .local doorgeven enkel de FileName doorgeven indien gewenst, anders wordt deze ge-default. het volledige pad (server+dir+filename) wordt in URL-vorm teruggegeven 1 %Status 1 1 %Status 1 %Status Oproepen via : s sc=##class(BL.Flow.Offerte.Doc).RenderAndPrintDoc("O-560390","BrotherBoekH",1) w sc,! 1 OFFNr:%String,PrinterName:%String,pWithLogo:%Boolean=1 %Status 0) NumCopies=1 Set:($$$ISOK(sc)) sc=Task.AddActionPrint(PrinterName,NumCopies,,) Quit:($$$ISERR(sc)) sc Set sc=##class(BL.Sys.FOP.CommonTasks).RunFopTask(Task,$$$rmBatch,$$$qpvLow) ; $$$rmBatch ; $$$rmSync Quit sc ]]> 1 OFFNr:%String,MailTo:%String,Subject:%String,Body:%String,FileName:%String,MailFrom:%String %Status Oproepen via : s sc=##class(BL.Flow.Offerte.Doc).RenderAndFtpDoc(171251,"vhisiedownload.vanhoecke.be",,"TestWimV002.pdf") w sc,! 1 OFFNr:%String,FtpServer:%String,DestDir:%String,DestFName:%String %Status Genereert de XML voor de offerte in lbDocs en geeft deze terug via DataStream. DataStream als .local doorgeven. 1 %Status initiator ;Set sc=pxDoc.XMLExportToStream(.DataStream,"DOCS","literal,indent") Quit sc ]]> Debug Tool Genereert de XML voor het order in lbDocs en bewaart deze in de opgegeven file (path/dir moet reeds bestaan) Oproepen via : s FP="\\Cache02\c$\Temp\Offerte_" s sc=##class(BL.Flow.Offerte.Doc).FopXMLToFile(FP_$P($H,",",2)_".xml", $LB(132995,"KOF")) w sc,! s sc=##class(BL.Flow.Offerte.Doc).FopXMLToFile(FP_$P($H,",",2)_".xml", $LB(7419,"WS")) w sc,! !!! Op Cache02 !!! 1 FileName:%String,lbDocs:%List %Status Aanmaken van het proxy-object dat het proxy-order bevat. lbOffertes is een $LB() van de vorm $LB(OFFNr,BronType). BronType="KOF": offerte van ^KOFKL - BronType="WS" : offerte van WebShop 1 BL.Flow.Proxy.pxFlowDocs 1 lbOffertes:%List,KLNr:%String %Status Geeft de standaard Keywords terug op basis van de opgegeven AnalyseRoutine 1 DocType:%String,AnalyseRoutine:%String %String XSLT-parameters voor RenderDoc berekenen. Geeft een $LB() terug. Bvb: $LB("pWithLogo=0","pWithBgColors=1") 1 lbXsltParams:%List,pWithLogo:%Boolean=0,pWithBgColors:%Boolean="",pImageColVisible:%String="" %List Create Task-object AnalyseRoutine is een verplichte parameter Keywords is optioneel. Bij voorkeur ";"-gescheiden UserID is optioneel. Keywords en UserID worden berekend indien niet gedefinieerd. 1 AnalyseRoutine:%String,Keywords:%String,UserID:%String Sys.FOP.Task De render-data toevoegen aan het Doc. 1 Doc:Sys.FOP.emDoc,DataInVia:%String,DataIn:%CacheString,Template:%String,TransformType:%String="PDF",lbPPODKeywords:%List,lbXsltParams:%List %Status De render-data ophalen, i.e. invullen in de parameters (als .local doorgeven). 1 %Status De render-data toevoegen aan het Doc. Alleen gebruiken wanneer de data van het document gedefinieerd is via lbDocs, i.e. xml wordt pas later gegenereerd via method GetFopXML() 1 Doc:Sys.FOP.emDoc,lbDocs:%List,Template:%String,TransformType:%String="PDF",lbPPODKeywords:%List,pWithLogo:%Boolean %Status 1 OFFNr:%String,BronType:%String="F",Extension:%String="pdf" %String DocRef kan ofwel OFFNr zijn, ofwel lbDocs (list) Target: File, FileWWW, FileWWWUrl, TempFTP, Mail, TempMail 1 Create Task-object [Previously private] 1 lbOffertes:%List,TransformType:%String,pWithLogo:%Boolean=0 Sys.FOP.Task