ABSPOSS4.m

ABSPOSS4 ; IHS/FCS/DRS - file 9002313.54 Modem Types ;

 ;;1.0;PHARMACY POINT OF SALE;;JUN 21, 2001

 G ABSPOSS1

 Q

ABSPOSS1 ;EP - ABSPOSS1

 D TEMPLATE^ABSPOSS2("ABSP MODEM TYPES",9002313.54,"CAPTIONED")

 Q

INDEX W !,"Index: which modem types are used by which dial outs",!

 ; incomplete ; ^ABSP(9002313.55,"AModemType",modem type,dial out)

 Q

ABSPOSS4  ; IHS/FCS/DRS - file 9002313.54 Modem Types ;

 +1       ;;1.0;PHARMACY POINT OF SALE;;JUN 21, 2001

 +2        GOTO ABSPOSS1

 +3        QUIT 

ABSPOSS1  ;EP - ABSPOSS1

 +1        DO TEMPLATE^ABSPOSS2("ABSP MODEM TYPES",9002313.54,"CAPTIONED")

 +2        QUIT 

INDEX      WRITE !,"Index: which modem types are used by which dial outs",!

 +1       ; incomplete ; ^ABSP(9002313.55,"AModemType",modem type,dial out)

 +2        QUIT