Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: SCMSVUT0

Package: Scheduling

Routine: SCMSVUT0


Information

SCMSVUT0 ;ALB/ESD HL7 Segment Validation Utilities ; 7/8/04 5:06pm

Source Information

Source file <SCMSVUT0.m>

Entry Points

Name Comments DBIA/ICR reference
CONVERT(SEG,HLFS,HLQ) ; Convert HLQ ("") to null in segment
; Input: SEG = HL7 segment
; HLFS = HL7 field separator
; HLQ = HL7 "" character
SETID(SDOE,SDDELOE) ; Set PCE Unique Visit Number in field #.2 of #409.68
; Input: SDOE = IEN of Outpatient Encounter (#409.68) file
; SDDELOE = IEN of Deleted Outpatient Encounter (#409.74) file
GETID ;Get unique visit ID
SETPRTY(SDOE) ;Set outpatient provider type in field #.06 of V PROVIDER
; Input: SDOE = IEN of Outpatient Encounter (#409.68) file
SETMAR(PIDSEG,HLQ,HLFS,HLECH) ; Set marital status prior to PID segment validation
SETPOW(DFN,ZPDSEG,HLQ,HLFS)
SETPOWQ
SETVSI(DFN,ZSPSEG,HLQ,HLFS) ;Set Vietnam Service Indicated field prior to ZSP segment validation
SETVSIQ
HL7SEGNM(SEG,DATA) ;checks the validity of the HL7 segment name passed in.
EVTTYP(SEG,DATA) ;checks the event type of the segment passed in.
EVTDTTM(DATA) ;Checks the date and time to ensure it is correct.
VALIDATE(SEG,DATA,ERRCOD,VALERR,CTR) ;
DFN(DATA) ;
PATNM(DATA) ;
DOB(DATA,ENCDT) ;
SEX(DATA) ;
RACE(DATA) ;
STR1(DATA) ;
STR2(DATA) ;
CITY(DATA) ;
STATE(DATA) ;
ZIP(DATA) ;
COUNTY(DATA,STATE) ;
MARITAL(DATA) ;
REL(DATA) ;
SSN(DATA,NOPCHK,NULLOK) ; SD*5.3*345 added optional parameter NULLOK
INCR ;increases the counter
REMOVE(SEG,ERR,VALERR,CNT) ;
DECR(CNT) ;
Info |  Source |  Entry Points