| DESCRIPTION |
Files the new exam template modal data (OHA,PAR,OCC,TMJ) into a record in
DATA("PROV")= Provider IEN
DATA("DATE")= Date of transaction
DATA("OHA")=CI PLAQUE INDEX^CARIES RISK^ORAL HYGIENE^XEROSTOMIA
DATA("OCC")=MANDIBULAR^OPEN BITE^CROSS BITE^LEFT MOLAR RELAT^RIGHT MOLAR
RELAT^LEFT CUSPID RELAT^RIGHT CUSPID RELAT^OVERBITE^OVERJET
DATA("PAR")=BRUXING^CLENCHING^HISTORY^
DATA("PARWP",N)=PARAFUNCTIONAL HABIT NOTES (WORD PROCESSING)
DATA("PARC")=ATTRITION^ABRASION^EROSION^HYPERTROPHY^OBSERVED^FACETED^ABFR
ACTION
DATA("PARCWP",N)=PARAFUNCTIONAL HABITS CLINICAL FINDINGS NOTES (WORD
228.2 of type 5:EXAM
PROCESSING)
DATA("TMJ")=TRAUMA^SPONT PAIN^POPPING^CLICKING^PAIN OPENING^PAIN
CHEWING^LIMITED OPENING^
DATA("TMJWP",N)=TMJ OTHER NOTES (WORD PROCESSING)
DATA("TMJC")=MAX INCISAL OPENING^LEFT LATERAL^RIGHT LATERAL^CF
POPPING^CF CLICKING^CF PAIN^DEVIATION^
DATA("TMJCWP",N)=TMJ CF NOTES (WORD PROCESSING)
DATA("SOCH")=PAT REP SOCH^SH CIGARETTES^CIGARETTE QUANTITY^CIGARETTE
FREQUENCY^CIGARETTE YEARS^SH PIPE/CIGAR^PIPE QUANTITY^PIPE FREQUENCY^PIPE
YEARS^SH SMOKELESS^SMOKELESS QUANTITY^SMOKELESS FREQUENCY^SMOKELESS
YEARS^SH
ALCOHOL^ALCOHOL QUANTITY^ALOCHOL FREQUENCY^ALCOHOL YEARS^
DATA("SHDA")=SH DRUG ABUSE^SH DRUG ABUSE DESCRIPTION^
DATA("SHWP",N)=SH NOTES (WORD PROCESSING)
Return variables:
1^Successful message
-1^Error Message
Input variables:
SAVE DATA IN (FILED/UNFILED)
**************************************
DATA("FLAG")= ACTION FLAG, A OR BLANK FOR ADD, M FOR MODIFY
DATA("DPAT")= Patient IEN
|
