ABSPOSQG ; IHS/FCS/DRS - form transmission packets ;
Source file <ABSPOSQG.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PACKET() | ;EP - ABSPOSQ2
; packetize one prescription (and possibly more prescriptions ; for the same patient, if they're ready now.) ; Called from ABSPOSQ2, ; which gave us RXILIST(IEN59) array of claims to packetize. |
|
| DIALOUT() | ||
| PACKERR | ; error trap comes here
|
|
| POINTM | ; Reversals are joining again here
|
|
| LOCK |
| Name | Field # of Occurrence |
|---|---|
| $$ZE^ABSPOS | PACKERR+2 |
| EN^ABSPOSCA | LOCK+4 |
| RELSLOT^ABSPOSL | PACKET+9, POINTM+22 |
| LOG2CLM^ABSPOSQ | POINTM+20 |
| LOG2LIST^ABSPOSQ | PACKET+21, PACKET+25, PACKET+26, LOCK+2, LOCK+6 |
| KSCRATCH^ABSPOSQ2 | POINTM+1 |
| TASK^ABSPOSQ2 | POINTM+21 |
| PASCII^ABSPOSQH | POINTM+2 |
| $$IMPOSS^ABSPOSUE | LOCK+1, POINTM+15 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("ERRTN" | PACKERR+1 |
| ^%ZOSF("TRAP" | PACKET+6 |
| ^ABSP(9002313.55 - [#9002313.55] | POINTM+19, DIALOUT+10, DIALOUT+11 |
| ^ABSP(9002313.99 - [#9002313.99] | DIALOUT+9 |
| ^ABSPC - [#9002313.02] | LOCK, LOCK+8, POINTM+18 |
| ^ABSPECX("POS" | POINTM+15, POINTM+16*, POINTM+17 |
| ^ABSPECX($J | POINTM+14, POINTM+16 |
| ^ABSPEI - [#9002313.4] | DIALOUT+6, DIALOUT+7 |
| ^ABSPT - [#9002313.59] | PACKET+15, PACKET+17, PACKET+30, PACKET+31, DIALOUT+4 |
| Name | Line Occurrences |
|---|---|
| $$DIALOUT | PACKET+8 |
| @( | PACKERR+1 |
| LOCK | LOCK+1 |
| POINTM | PACKET+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABSBVISI | PACKET+31~* |
| CLAIMIEN | PACKET+7~, PACKET+17*, PACKET+18, LOCK+9 |
| CLAIMIEN( | PACKET+18* |
| DIALOUT | PACKET+7~, PACKET+8*, PACKET+9, LOCK+4, POINTM+2, POINTM+15, POINTM+16, POINTM+17, POINTM+19 |
| ERROR | PACKET+7~, LOCK+6, LOCK+9 |
| FIRST | POINTM+13~*, POINTM+21* |
| FIRST59 | PACKET+14~*, PACKET+15, PACKET+17, PACKET+30, PACKET+31 |
| I | PACKET+22~, PACKET+23*, PACKET+24, PACKET+25 |
| IEN59 | DIALOUT+2~*, DIALOUT+3, DIALOUT+4 |
| MSG | POINTM+18~*, POINTM+19*, POINTM+20 |
| PATDFN | PACKET+30~* |
| >> RXILIST( | PACKET+20, PACKET+23 |
| >> RXILIST("" | PACKET+20 |
| >> RXILIST(0 | PACKET+14, DIALOUT+2 |
| U | PACKET+17, PACKET+30, PACKET+31, POINTM+18, POINTM+19, DIALOUT+4, DIALOUT+7, DIALOUT+9 |
| X | PACKET+6~*, PACKET+22~*, PACKET+23*, PACKET+24, POINTM+14~*, POINTM+15, POINTM+16, POINTM+17, POINTM+18, POINTM+20 , DIALOUT+4~*, DIALOUT+6, DIALOUT+7*, DIALOUT+9*, DIALOUT+10*, DIALOUT+11*, DIALOUT+12 |
| Y | PACKET+22~*, PACKET+24*, PACKET+25*, PACKET+26 |
| Name | Field # of Occurrence |
|---|---|
| $T( | PACKET+6, LOCK+1, LOCK+2, LOCK+6, POINTM+15 |