NAMEMCFPNONENDO
DESCRIPTIONPrints the GI Non-Endoscopic report.
CREATORUSER,ONE
E ACTION PRESENTYES
ENTRY ACTIONS MCPRO="NONENDO",MCICDSS="GI",DIC="^MCAR(699,",MCARZ="NON-ENDOSCOPIC REPORT",MCARGRTN=$S($G(MCBP)=1:"NONENDOB",1:"NONENDO")
EXIT ACTIOND ^MCDIEDIE
MENU TEXTNon-Endoscopic Report
ROUTINELOOK^MCARP
TIMESTAMP55600,51970
TYPErun routine
UPPERCASE MENU TEXTNON-ENDOSCOPIC REPORT
X ACTION PRESENTYES