Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: PXAIXAMV

PXAIXAMV.m

Go to the documentation of this file.
  1. PXAIXAMV ;ISL/PKR - VALIDATE EXAMINATION DATA ;7/24/96 13:59
  1. ;;1.0;PCE PATIENT CARE ENCOUNTER;;Aug 12, 1996
  1. ;
  1. VAL ;Make sure the required field is present.
  1. I '$D(PXAA("EXAM")) D
  1. . S STOP=1
  1. . S PXAERRF=1
  1. . S PXADI("DIALOG")=8390001.001
  1. . S PXAERR(9)="EXAM"
  1. . S PXAERR(10)="AFTER"
  1. . S PXAERR(11)=$G(PXAA("EXAM"))
  1. . S PXAERR(12)="You are missing the name of the exam"
  1. Q