YSGAFOBX ;ALB/SCK-GAF score event handler ;7/11/98
Source file <YSGAFOBX.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(YSDA) | ;
; Entry point for handling the GAF score entry to the ; DIAGNOSTICS RESULTS -MENTAL HEALTH file (#627.8) ; This entry point will trigger the GAF A08 HL7 update message transmission ; Input - IEN of the entry in file #627.8 |
|
| START | ;; Check input
|
|
| RESPONSE(YSIEN,TXT,DFN) | ; Send error message for problem with GAF HL7 transmission
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | RESPONSE+12, RESPONSE+19 |
| ^VA(200 - [#200] | RESPONSE+18 |
| ^YSD(627.8 - [#627.8] | START+5, START+11, START+16, START+21, START+27, START+29, RESPONSE+13, RESPONSE+20, RESPONSE+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | START+7~, START+11*, START+12, START+13, START+18, START+23, START+34, START+35, RESPONSE~, RESPONSE+12 , RESPONSE+19 |
| DUZ | RESPONSE+18 |
| MSGTXT | RESPONSE+2~ |
| MSGTXT(1 | RESPONSE+12*, RESPONSE+16* |
| MSGTXT(2 | RESPONSE+13*, RESPONSE+17* |
| MSGTXT(3 | RESPONSE+14*, RESPONSE+18* |
| MSGTXT(4 | RESPONSE+19* |
| MSGTXT(5 | RESPONSE+20* |
| MSGTXT(6 | RESPONSE+21* |
| RETURN | START+7~, START+34*, START+35 |
| TXT | RESPONSE~, RESPONSE+5, RESPONSE+11, RESPONSE+14, RESPONSE+17 |
| XMCHAN | RESPONSE+2~, RESPONSE+8* |
| XMDUZ | RESPONSE+2~, RESPONSE+6* |
| XMSUB | RESPONSE+2~, RESPONSE+5* |
| XMTEXT | RESPONSE+2~, RESPONSE+23* |
| XMY | RESPONSE+2~ |
| XMY("G.YS GAF | TRANSMISSION ACK" , RESPONSE+7* |
| YSDA | EN~, START+4*, START+5, START+11, START+13, START+16, START+18, START+21, START+23, START+27 , START+29, START+35 |
| YSDXDT | START+7~ |
| YSEVDT | START+7~, START+32*, START+34 |
| YSIEN | RESPONSE~, RESPONSE+13, RESPONSE+20, RESPONSE+21 |
| YSINFO | START+7~ |
| YSINFO("SERVE | R PROTOCOL" , START+33* |
| YSOBX | START+7~ |
| YSOBX(11 | START+25* |
| YSOBX(14 | START+21*, START+22 |
| YSOBX(16 | START+29* |
| YSOBX(2 | START+28* |
| YSOBX(3 | START+26* |
| YSOBX(4 | START+27* |
| YSOBX(5 | START+16*, START+17 |
