IBDFC4.m

IBDFC4 ;ALB/CJM - ENCOUNTER FORM - print scanning form definition ;MAR 3, 1995

 ;;3.0;AUTOMATED INFO COLLECTION SYS;;APR 24, 1997

 ;

FORMDEF ;

 W !,"THIS IS NOT YET IMPLEMENTED!"

 D PAUSE^IBDFU5

 S VALMBCK="R"

 Q

IBDFC4    ;ALB/CJM - ENCOUNTER FORM - print scanning form definition ;MAR 3, 1995

 +1       ;;3.0;AUTOMATED INFO COLLECTION SYS;;APR 24, 1997

 +2       ;

FORMDEF   ;

 +1        WRITE !,"THIS IS NOT YET IMPLEMENTED!"

 +2        DO PAUSE^IBDFU5

 +3        SET VALMBCK="R"

 +4        QUIT