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 |