15 lines
583 B
Plaintext
15 lines
583 B
Plaintext
|
Prestige24i
|
||
|
|
|
||
|
|
S9 ="Header_record_from_WST".
|
||
|
|
MESSAGE_I =STX,SP,1,"H|\^&|||WST^P1|||||Prestige24i^System1||P|1|",{SPEC7},CR,ETX,SP,2,CR,LF.
|
||
|
|
|
||
|
|
S9 ="Patient_record_from_WST".
|
||
|
|
MESSAGE_D =STX,SP,1,"P|",{SPEC1},"|",{PATNUM},"|||",
|
||
|
|
{LSTNAME},"^",{FSTNAME},"||",{BIRYEAR},{BIRMONT},{BIRDAY},"|",{SEX},"|||||",{DOCTOR},"|",CR,ETX,SP,2,CR,LF.
|
||
|
|
|
||
|
|
S9 ="Order_record_from_WST".
|
||
|
|
MESSAGE_Y =STX,SP,1,"O|1|",{IDEE},"||", 30("^^^",{CHEMNUM},"\"),{URGENT},
|
||
|
|
"||||||",{SPEC4},"||||",{TUBTYPE},"||||||||||O|",CR,ETX,SP,2,CR,LF.
|
||
|
|
|
||
|
|
S9 ="Terminator_record_from_WST".
|
||
|
|
MESSAGE_F =STX,SP,1,"L|1|N",CR,ETX,SP,2,CR,LF.
|