| Name | Value | 
|---|---|
| NAME | AMCH/F/IMM/PR/DELINQ>3MO | 
| MENU TEXT | THREE Months Delinquent List | 
| UPPERCASE MENU TEXT | THREE MONTHS DELINQUENT LIST | 
| E ACTION PRESENT | YES | 
| ENTRY ACTION | D DEL3MO^AMCHCTRL | 
| DESCRIPTION | This option will print a list of all children who are more than three months overdue for an immunization. | 
| CREATOR | POSTMASTER | 
| TYPE | action | 
| DIS(0) | S DPL=$O(^DIBT("B","DELINQ >3 MONTHS FOR IMMUN",0)),(II,JJ)="",DIS(0)="I 1" F III=1:1 S II=$O(^DIBT(DPL,"DIS",II)) Q:II="" S:$D(^(II))#2 DIS(II)=^(II) F JJJ=1:1 S JJ=$O(^DIBT(DPL,"DIS",II,JJ)) Q:JJ="" S DIS(II,JJ)=^(JJ) |