VAFCADT2 ;ALB/RJS - HL7 ADT MESSAGE BUILDING ROUTINE ; 3/6/06 8:24am
Source file <VAFCADT2.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 16 | ALL^DGMTU21 KVAR^VADPT $$COMMANUM^VAFCADT2 $$EN^VAFCPID BLDROL^VAFCROL $$EN^VAFHLPD1 ($$IN,KVAR)^VAFHLPV1 $$EN^VAFHLPV2 $$EN^VAFHLZCT $$EN^VAFHLZEL $$EN^VAFHLZEM $$EN^VAFHLZEN $$EN^VAFHLZIR $$EN^VAFHLZPD $$EN^VAFHLZSP $$HLQ^VAFHUTL |
| Health Level Seven | 3 | $$HLDATE^HLFNC INIT^HLFNC2 GENERATE^HLMA |
| Toolkit | 1 | $$GET^XPAR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| COMMANUM(FROM,TO) | ;Build comma separated list of numbers
|
|
| BLDMSG(DFN,EVENT,VAFHDT,EVCODE,IEN,PIVOT,PV1) | ;
|
|
| NEXT | ;
|
|
| EXIT | ;
|
|
| ADD(LINE,COUNTER) | ;Increments Line = Line + Counter
|
|
| LOOP | ;
|
| Name | Field # of Occurrence |
|---|---|
| ALL^DGMTU21 | NEXT+29 |
| $$HLDATE^HLFNC | NEXT+2 |
| INIT^HLFNC2 | BLDMSG+46, BLDMSG+47 |
| GENERATE^HLMA | EXIT+6, EXIT+7 |
| KVAR^VADPT | EXIT+9 |
| $$COMMANUM^VAFCADT2 | BLDMSG+50 |
| $$EN^VAFCPID | BLDMSG+51 |
| BLDROL^VAFCROL | NEXT+10 |
| $$EN^VAFHLPD1 | BLDMSG+58 |
| $$IN^VAFHLPV1 | BLDMSG+67, BLDMSG+70 |
| KVAR^VAFHLPV1 | EXIT+9 |
| $$EN^VAFHLPV2 | NEXT+7 |
| $$EN^VAFHLZCT | NEXT+26 |
| $$EN^VAFHLZEL | NEXT+24 |
| $$EN^VAFHLZEM | NEXT+28 |
| $$EN^VAFHLZEN | NEXT+33 |
| $$EN^VAFHLZIR | NEXT+31 |
| $$EN^VAFHLZPD | BLDMSG+60 |
| $$EN^VAFHLZSP | NEXT+22 |
| $$HLQ^VAFHUTL | NEXT+20 |
| $$GET^XPAR | NEXT+6 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences |
|---|---|
| $$ADD | BLDMSG+51, BLDMSG+58, BLDMSG+60, BLDMSG+63, BLDMSG+67, BLDMSG+70, NEXT+7, NEXT+20, NEXT+22, NEXT+24 , NEXT+26, NEXT+28, NEXT+31, NEXT+33 |
| $$COMMANUM | BLDMSG+57, BLDMSG+59, BLDMSG+66, BLDMSG+69, NEXT+8, NEXT+21, NEXT+23, NEXT+25, NEXT+27, NEXT+30 , NEXT+32 |
| EXIT | BLDMSG+48, BLDMSG+52, BLDMSG+71 |
| LOOP | NEXT+34 |
| NEXT | BLDMSG+62, BLDMSG+65, BLDMSG+68 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COUNTER | NEXT+36*, NEXT+37*, NEXT+39, ADD~, ADD+5*, ADD+6 |
| DFN | BLDMSG~, BLDMSG+51, BLDMSG+58, BLDMSG+60, BLDMSG+67, BLDMSG+70, NEXT+7, NEXT+10, NEXT+22, NEXT+24 , NEXT+26, NEXT+28, NEXT+29, NEXT+33 |
| DGDEP | BLDMSG+42~ |
| DGINC | BLDMSG+42~ |
| DGINR | BLDMSG+42~ |
| DGINR("V" | NEXT+31 |
| DGREL | BLDMSG+42~ |
| EVCODE | BLDMSG~, NEXT+3 |
| EVENT | BLDMSG~, BLDMSG+46, BLDMSG+47, BLDMSG+62, BLDMSG+65, BLDMSG+68, NEXT+2, NEXT+19, EXIT+5, EXIT+7 |
| FROM | COMMANUM~, COMMANUM+7*, COMMANUM+8, COMMANUM+10, COMMANUM+11 |
| HL | BLDMSG+45!, BLDMSG+46, BLDMSG+47, BLDMSG+48, NEXT+39*, EXIT+4 |
| HL("FS" | NEXT+33 |
| HL("Q" | NEXT+33 |
| HLA | BLDMSG+42!, EXIT+9! |
| HLA("HLS" | BLDMSG+51*, BLDMSG+52!, BLDMSG+55*, BLDMSG+56*, BLDMSG+58*, BLDMSG+60*, BLDMSG+61*, BLDMSG+63*, BLDMSG+64*, BLDMSG+67* , BLDMSG+70*, NEXT+1*, NEXT+2*, NEXT+3*, NEXT+7*, NEXT+16*, NEXT+17*, NEXT+20*, NEXT+22*, NEXT+24* , NEXT+26*, NEXT+28*, NEXT+31*, NEXT+33*, NEXT+37, NEXT+39, EXIT+4, LOOP+5 |
| HLAROL | NEXT+9~ |
| HLAROL( | NEXT+13, NEXT+15, NEXT+16, NEXT+17 |
| HLERR | EXIT+9! |
| >> HLFS | BLDMSG+56, BLDMSG+61, BLDMSG+64, NEXT+1, NEXT+2, NEXT+3, NEXT+20 |
| >> HLRST | EXIT+6, EXIT+7 |
| I | NEXT+11~, NEXT+12*, NEXT+13*, NEXT+15, NEXT+16, NEXT+17 |
| IEN | BLDMSG~, BLDMSG+67, BLDMSG+70, NEXT+7, NEXT+10 |
| J | NEXT+11~, NEXT+14*, NEXT+15*, NEXT+16, NEXT+17 |
| K | NEXT+11~, NEXT+13*, NEXT+16, NEXT+17, NEXT+18 |
| LIN | BLDMSG+42~, BLDMSG+49*, BLDMSG+51, BLDMSG+52, BLDMSG+55, BLDMSG+56, BLDMSG+58, BLDMSG+60, BLDMSG+61, BLDMSG+63 , BLDMSG+64, BLDMSG+67, BLDMSG+70, NEXT+1, NEXT+7, NEXT+16, NEXT+17, NEXT+18*, NEXT+20, NEXT+22 , NEXT+24, NEXT+26, NEXT+28, NEXT+31, NEXT+33 |
| LINE | ADD~, ADD+5*, ADD+6*, ADD+7 |
| OUTPUT | COMMANUM+9~, COMMANUM+10*, COMMANUM+11*, COMMANUM+12 |
| PIVOT | BLDMSG~, BLDMSG+64, BLDMSG+67, BLDMSG+70, NEXT+10 |
| PV1 | BLDMSG~, BLDMSG+63 |
| TO | COMMANUM~, COMMANUM+8*, COMMANUM+11 |
| VAFCCON | NEXT+5~, NEXT+6*, NEXT+7 |
| VAFDIAG | BLDMSG+42~, BLDMSG+67, BLDMSG+70, NEXT+20 |
| VAFHDT | BLDMSG~, BLDMSG+67, BLDMSG+70, NEXT+2, NEXT+10, NEXT+29 |
| VAFPID | BLDMSG+55! |
| VAFSTR | BLDMSG+42~, BLDMSG+50*, BLDMSG+51, BLDMSG+57*, BLDMSG+58, BLDMSG+59*, BLDMSG+60, BLDMSG+66*, BLDMSG+67, BLDMSG+69* , BLDMSG+70, NEXT+8*, NEXT+10, NEXT+21*, NEXT+23*, NEXT+24, NEXT+25*, NEXT+26, NEXT+27*, NEXT+28 , NEXT+30*, NEXT+31, NEXT+32*, NEXT+33 |
| VAFZEL | BLDMSG+42~ |
| >> VATRACE | NEXT+34 |
| X | COMMANUM+9~, COMMANUM+11* |
| XX | LOOP+4~*, LOOP+5* |