YSCLHLAD ;DSS/PO-CLOZAPINE DATA TRANSMISSION-Messaging-ADT ;19 May 2020 14:13:48
Source file <YSCLHLAD.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 |
|---|---|---|
| ADTA28(YSCLARR,YSILENT) | ; Build and send registration message
; input: YSCLARR data array to build HL7 segments |
|
| COMTRESP | ; process COMMIT ACCEPT ACK RESPONSE
|
|
| APPRESP | ; process ACCEPT ACK RESPONSE
|
| Name | Field # of Occurrence |
|---|---|
| APPERROR^%ZTER | ADTA28+132 |
| DT^DICRW | COMTRESP+2 |
| $$GET1^DIQ | ADTA28+99 |
| $$ADDSEG^HLOAPI | ADTA28+24, ADTA28+27, ADTA28+45, ADTA28+50, ADTA28+53, ADTA28+63, ADTA28+74, ADTA28+85, ADTA28+97, ADTA28+107 |
| $$NEWMSG^HLOAPI | ADTA28+19 |
| SET^HLOAPI | ADTA28+22, ADTA28+23, ADTA28+30, ADTA28+31, ADTA28+32, ADTA28+33, ADTA28+34, ADTA28+36, ADTA28+37, ADTA28+38 , ADTA28+39, ADTA28+41, ADTA28+42, ADTA28+43, ADTA28+44, ADTA28+48, ADTA28+49, ADTA28+55, ADTA28+56, ADTA28+57 , ADTA28+58, ADTA28+59, ADTA28+60, ADTA28+65, ADTA28+66, ADTA28+67, ADTA28+68, ADTA28+69, ADTA28+70, ADTA28+76 , ADTA28+77, ADTA28+78, ADTA28+79, ADTA28+80, ADTA28+81, ADTA28+83, ADTA28+87, ADTA28+88, ADTA28+89, ADTA28+90 , ADTA28+91, ADTA28+92, ADTA28+94, ADTA28+100, ADTA28+101, ADTA28+102, ADTA28+103, ADTA28+104, ADTA28+105, ADTA28+109 , ADTA28+110, ADTA28+111, ADTA28+112, ADTA28+113, ADTA28+114, ADTA28+115, ADTA28+116, ADTA28+117, ADTA28+118, ADTA28+119 , ADTA28+120, ADTA28+121 |
| $$SENDONE^HLOAPI1 | ADTA28+131 |
| $$STARTMSG^HLOPRS | COMTRESP+4 |
| $$FMTHL7^XLFDT | ADTA28+23 |
| $$HTFM^XLFDT | COMTRESP+11, APPRESP+8 |
| $$NOW^XLFDT | ADTA28+23, COMTRESP+5, APPRESP+4 |
| PID^YSCLHLPD | ADTA28+26 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APPARMS | ADTA28+12~, ADTA28+19, ADTA28+131 |
| APPARMS("ACCE | PT ACK RESPONSE" , ADTA28+126*, PT ACK TYPE" , ADTA28+124* |
| APPARMS("APP | ACK RESPONSE" , ADTA28+127*, ACK TYPE" , ADTA28+125* |
| APPARMS("EVENT" | ADTA28+16* |
| APPARMS("MESS | AGE STRUCTURE" , ADTA28+17*, AGE TYPE" , ADTA28+15* |
| APPARMS("SEND | ING APPLICATION" , ADTA28+123* |
| APPARMS("VERSION" | ADTA28+18* |
| DT | COMTRESP+3, COMTRESP+11, APPRESP+3, APPRESP+8 |
| HDR | COMTRESP+2~, COMTRESP+4, COMTRESP+9 |
| HL | ADTA28+12~ |
| HL7RES | ADTA28+12~, ADTA28+131*, ADTA28+132, ADTA28+138 |
| >> HLMSGIEN | COMTRESP+4, COMTRESP+6, APPRESP+4 |
| HLMSTATE | ADTA28+12~, ADTA28+19, ADTA28+24, ADTA28+27, ADTA28+45, ADTA28+50, ADTA28+53, ADTA28+63, ADTA28+74, ADTA28+85 , ADTA28+97, ADTA28+107, ADTA28+131 |
| IO | ADTA28+19 |
| MSG | COMTRESP+2~, COMTRESP+4, COMTRESP+8 |
| MSGIEN | APPRESP+2~, APPRESP+4*, APPRESP+5, APPRESP+6 |
| RES | COMTRESP+2~, COMTRESP+4*, COMTRESP+7 |
| RTNOW | COMTRESP+2~, COMTRESP+5*, COMTRESP+6, COMTRESP+7, COMTRESP+8, COMTRESP+9, APPRESP+2~, APPRESP+4*, APPRESP+5, APPRESP+6 |
| SEG | ADTA28+12~, ADTA28+22, ADTA28+23, ADTA28+24, ADTA28+26, ADTA28+27, ADTA28+30, ADTA28+31, ADTA28+32, ADTA28+33 , ADTA28+34, ADTA28+36, ADTA28+37, ADTA28+38, ADTA28+39, ADTA28+41, ADTA28+42, ADTA28+43, ADTA28+44, ADTA28+45 , ADTA28+48, ADTA28+49, ADTA28+50, ADTA28+53, ADTA28+55, ADTA28+56, ADTA28+57, ADTA28+58, ADTA28+59, ADTA28+60 , ADTA28+63, ADTA28+65, ADTA28+66, ADTA28+67, ADTA28+68, ADTA28+69, ADTA28+70, ADTA28+74, ADTA28+76, ADTA28+77 , ADTA28+78, ADTA28+79, ADTA28+80, ADTA28+81, ADTA28+83, ADTA28+85, ADTA28+87, ADTA28+88, ADTA28+89, ADTA28+90 , ADTA28+91, ADTA28+92, ADTA28+94, ADTA28+97, ADTA28+100, ADTA28+101, ADTA28+102, ADTA28+103, ADTA28+104, ADTA28+105 , ADTA28+107, ADTA28+109, ADTA28+110, ADTA28+111, ADTA28+112, ADTA28+113, ADTA28+114, ADTA28+115, ADTA28+116, ADTA28+117 , ADTA28+118, ADTA28+119, ADTA28+120, ADTA28+121 |
| SEGSEQ | ADTA28+54~*, ADTA28+56, ADTA28+64~*, ADTA28+66, ADTA28+75~*, ADTA28+77, ADTA28+86~*, ADTA28+88, ADTA28+98~*, ADTA28+101 , ADTA28+108~*, ADTA28+110 |
| SITEDEA | ADTA28+99~* |
| U | COMTRESP+11, APPRESP+8 |
| VAR | APPRESP+2~, APPRESP+6* |
| YSCLARR | ADTA28~, ADTA28+26 |
| YSCLARR("LAB_ | ANC VAL" , ADTA28+91, ADTA28+94, COLLECTION DATE" , ADTA28+83, ADTA28+94, WBC VAL" , ADTA28+80, ADTA28+83 |
| YSCLARR("LAB_FREQ" | ADTA28+69 |
| YSCLARR("PATI | ENT_CLOZ STATUS" , ADTA28+59 |
| YSCLARR("PATIENT_INPAT/OUTPAT" | ADTA28+49 |
| YSCLARR("PROV | IDER_DEFAULT DIV." , ADTA28+99, IDER_FIRST NAME" , ADTA28+38, ADTA28+43, IDER_LAST NAME" , ADTA28+37, ADTA28+42 |
| YSCLARR("PROVIDER_DEA" | ADTA28+36 |
| YSCLARR("PROVIDER_NPI" | ADTA28+41 |
| YSCLARR("SITE | _SITE DEA" , ADTA28+104, _SITE NAME" , ADTA28+115, _STREET ADDR 1" , ADTA28+117, _STREET ADDR 2" , ADTA28+118 |
| YSCLARR("SITE_CITY" | ADTA28+119 |
| YSCLARR("SITE_ID" | ADTA28+113 |
| YSCLARR("SITE_STATE" | ADTA28+120 |
| YSCLARR("SITE_STATION" | ADTA28+116 |
| YSCLARR("SITE_ZIP" | ADTA28+121 |
| YSCLDEST | ADTA28+12~, ADTA28+128*, ADTA28+129 |
| YSHLERR | ADTA28+12~, ADTA28+19, ADTA28+131 |
| YSILENT | ADTA28~ |
| YSWHTO | ADTA28+12~, ADTA28+131 |
| YSWHTO("FACIL | ITY LINK NAME" , ADTA28+130* |
| YSWHTO("RECEI | VING APPLICATION" , ADTA28+129* |
| YSXTMP | COMTRESP+2~, APPRESP+2~ |
| YSXTMP("1stNode" | COMTRESP+3*, COMTRESP+6, COMTRESP+7, COMTRESP+8, COMTRESP+9, COMTRESP+11, APPRESP+3*, APPRESP+5, APPRESP+6, APPRESP+8 |
