TECH.RegisteredObject TECH.FileReader 1 d ##class(APPS.Halux.Planning.Capaciteit.impl.ImportFromXLS).%New().ImportXLS() 1 1 %Status 1 BatchID:TECH.String Datum:%Date,TijdstipVan:%Integer,TijdstipTot:%Integer,Resource:%String,BaseFactor:%Decimal,CorrectieFactor:%Decimal 0 { Set ^Halux.GeplandeCapaciteit(1,$zcvt(Resource,"U"),Datum,TijdstipVan)=$LB(TijdstipTot,(BaseFactor+CorrectieFactor)) Set ^Halux.GeplandeCapaciteit(-1,$zcvt(Resource,"U"),Datum,TijdstipTot)=$LB(TijdstipVan,(BaseFactor+CorrectieFactor)) } ]]> GeplandeCapaciteit:APPS.Halux.Planning.Capaciteit.dto.GeplandeCapaciteit