ClearAll[csF]
csF[opts : OptionsPattern[]][angle_: {0, Pi/2}, radii_: {0, 1},
minmaxheight_: {0, 1}, style_: {EdgeForm[], Opacity[1], Orange}] :=
Graphics3D[{## & @@ style,
ChartElementData["CylindricalSector3D"][{angle, radii, minmaxheight}, 0]}, opts]
csF[][{0, 3 Pi/4}]
csF[Boxed -> False, ImageSize -> 400][{0, 3 Pi/4}, {.5, 1}]
Panel@Row[csF[ Boxed -> False, ImageSize -> 200][{0, #}, {0, 1}, {0, 1},
{EdgeForm[]}] & /@ (Pi {1/3, 3/2, 4/3})]
Panel@Row[csF[ Boxed -> False, ImageSize -> 200][{0, Pi/4}, {#, 1}, {0, 1},
{EdgeForm[]}] & /@ ({0, 1/3, 2/3})]
Panel@Row[csF[ Boxed -> False, ImageSize -> 200, PlotRange -> {0, 1}][{0,
Pi/4}, {0, 1}, {#, 1}, {EdgeForm[]}] & /@ ({0, 1/3, 2/3})]
