N:=20;
 PDI:="DMI.PDI#DAY"(N,6)LINETHICK2,COLORYELLOW;
 PDII:= "DMI.PDI#DAY"(5,6),COLORYELLOW;
 DDI:="DMI.PDI#DAY"(7,6),COLOR118811;
 DRAWBAND(PDII,RGB(90, 20, 50 ),DDI,RGB( 20,30,90)) ;
 STICKLINE (PDI>=20,PDI,20,2,1),COLOR0011FF;
 STICKLINE (PDI>20 AND PDI<REF(PDI,1),PDI,20,2,0),COLOR0011FF;
 STICKLINE (PDI<20,PDI,20,2,0),COLORFF8811;
 STICKLINE (PDI<20 AND PDI>REF(PDI,1),PDI,20,2,1),COLORFF8811;
 PDI1:PDII,COLORYELLOW;
 PDI2:DDI,COLOREEEEEE;