    //supply defaults for parameters if not given
    #setifnotgiven CERTNAME = " "

    #proc getdata
    file: quant.dat

    #proc areadef
    title: Quantitative Analysis Chart @CERTNAME

    //titledetails: align=C size=14 adjust=0,.3
    titledetails: size=18 align=C color=black style=R adjust=0,0.3
    xscaletype: date yymmdd
    rectangle: 1 1 7 4
    yrange: 0 100
    xautorange: datafield=1
    #saveas A

    #proc bars
    locfield: 1
    lenfield: 5
    color: skyblue
    outline: no
    barwidth: 0.1
    hidezerobars: yes
    legendlabel: Caution Area

    #proc lineplot
    xfield: 1
    yfield: 3
    linedetails: color=green width=1
    legendlabel: Quantitative Analysis Line

    #proc lineplot
    xfield: 1
    yfield: 4
    linedetails: color=orange width=1
    legendlabel: Closing Price Line

    #proc areadef
    #clone A
    // need to use nearest=exact to eliminate suppress margins at max and min..
    yautorange: datafields=2 nearest=exact
    #endproc

    // now find the nearest round multiple of 2 so we can begin placing Y axis tics there
    #set YMIN = $numgroup( @YMIN, 2, high )

    #proc yaxis
    stubs: inc
    stubrange: @YMIN
    label: Market Prices
    labeldetails: adjust=-0.2,0

    #proc xaxis
    stubs: inc 1 month
    //stubformat: Mmm <use for Jan Feb Mar ...
    //stubformat: M