©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ABSP5B1C ; IHS/OIT/CASSevern/Pieran ran 1/19/2011 - Handling of outgoing NCPDP Billing "B1" Claims for 5.1 (COB and WORKERS COMP Segments)
Source file <ABSP5B1C.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Point of Sale | 1 | ($$ANFF,$$NFF)^ABSPECFM |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 338SET | ;Not Yet Implemented **
|
|
| 338FMT | ||
| 431SET | ;Not Yet Implemented **
|
|
| 431FMT | ||
| 337SET | ;Not Yet Implemented **
|
|
| 431GET | ||
| 327GET | ||
| 316FMT | ||
| 434FMT | ||
| 472GET | ||
| 435FMT | ||
| 434GET | ||
| 471GET | ||
| COB | ;EP CALLED FROM ABSP5B1 to set up PRICING SEGMENT -- Segment not yet implemented We'll probably have to do something very similar to DURR and CLINIC segments
|
|
| 316GET | ||
| 434SET | ;Not Yet Implemented
|
|
| 339SET | ;Not Yet Implemented **
|
|
| 315FMT | ||
| 315SET | ;Not Yet Implemented
|
|
| 111GET | ||
| 111FMT | ||
| 337GET | ||
| 318GET | ||
| 317GET | ||
| 318SET | ;Not Yet Implemented
|
|
| 340SET | ;Not Yet Implemented **
|
|
| 443SET | ;Not Yet Implemented **
|
|
| 341GET | ||
| 341FMT | ||
| 342GET | ||
| 321SET | ;Not Yet Implemented
|
|
| 338GET | ||
| 435GET | ||
| WORKCOMP | ;EP CALLED FROM ABSP5B1 to set up WORKERS COMP SEGMENT -- Entire segment not implemented yet
|
|
| 471FMT | ||
| 341SET | ;Not Yet Implemented **
|
|
| 342SET | ;Not Yet Implemented **
|
|
| 472SET | ;Not Yet Implemented **
|
|
| 320FMT | ||
| 993GET | ||
| 111SET | ;This isn't used for the 111 Field
|
|
| 319GET | ||
| 317FMT | ||
| 339GET | ||
| 319SET | ;Not Yet Implemented
|
|
| 339FMT | ||
| 318FMT | ||
| 993FMT | ||
| 327FMT | ||
| 321GET | ||
| 319FMT | ||
| 435SET | ;Not Yet Implemented
|
|
| 111ASET | ;This isn't used for the 111 Field
|
|
| 337FMT | ||
| 320SET | ;Not Yet Implemented
|
|
| 342FMT | ||
| 993SET | ;Not Yet Implemented **
|
|
| 472FMT | ||
| 316SET | ;Not Yet Implemented
|
|
| 111AFMT | ||
| 315GET | ||
| 327SET | ;Not Yet Implemented
|
|
| 471SET | ;Not Yet Implemented **
|
|
| 443GET | ||
| APPEND(FIELD) | ;This is where outgoing record is built field by field
|
|
| 320GET | ||
| 443FMT | ||
| 340GET | ||
| 317SET | ;Not Yet Implemented
|
|
| 111AGET | ||
| 340FMT | ||
| 321FMT |
| Name | Line Occurrences |
|---|---|
| @( | COB+7, COB+8, COB+9, WORKCOMP+7, WORKCOMP+8, WORKCOMP+9, APPEND+2, APPEND+3, APPEND+9 |
| APPEND | COB+10, WORKCOMP+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ABSP( | APPEND+6 |
| >> ABSP("X" | 111GET*, 111FMT*, 337GET*, 337FMT*, 338GET*, 338FMT*, 339GET*, 339FMT*, 340GET*, 340FMT* , 443GET*, 443FMT*, 993GET*, 993FMT*, 341GET*, 341FMT*, 342GET*, 342FMT*, 431GET*, 431FMT* , 471GET*, 471FMT*, 472GET*, 472FMT*, 111AGET*, 111AFMT*, 434GET*, 434FMT*, 315GET*, 315FMT* , 316GET*, 316FMT*, 317GET*, 317FMT*, 318GET*, 318FMT*, 319GET*, 319FMT*, 320GET*, 320FMT* , 321GET*, 321FMT*, 327GET*, 327FMT*, 435GET*, 435FMT*, APPEND+4, APPEND+10 |
| >> ACTION | COB+6, WORKCOMP+6 |
| FIELD | COB+2~, COB+4*, COB+5, COB+6, COB+7, COB+8, COB+9, COB+10, WORKCOMP+2~, WORKCOMP+4* , WORKCOMP+5, WORKCOMP+6, WORKCOMP+7, WORKCOMP+8, WORKCOMP+9, WORKCOMP+10, APPEND~, APPEND+1, APPEND+2, APPEND+3 , APPEND+6, APPEND+7, APPEND+8, APPEND+9 |
| >> IEN( | APPEND+6 |
| >> RECORD | COB+3*, WORKCOMP+3*, APPEND+4*, APPEND+6*, APPEND+10* |
| >> SPECIAL( | APPEND+7, APPEND+8 |
| >> SPECIAL(315 | 315GET, 315GET+1 |
| >> SPECIAL(316 | 316GET, 316GET+1 |
| >> SPECIAL(317 | 317GET, 317GET+1 |
| >> SPECIAL(318 | 318GET, 318GET+1 |
| >> SPECIAL(319 | 319GET, 319GET+1 |
| >> SPECIAL(320 | 320GET, 320GET+1 |
| >> SPECIAL(321 | 321GET, 321GET+1 |
| >> SPECIAL(327 | 327GET, 327GET+1 |
| >> SPECIAL(337 | 337GET, 337GET+1 |
| >> SPECIAL(338 | 338GET, 338GET+1 |
| >> SPECIAL(339 | 339GET, 339GET+1 |
| >> SPECIAL(340 | 340GET, 340GET+1 |
| >> SPECIAL(341 | 341GET, 341GET+1 |
| >> SPECIAL(342 | 342GET, 342GET+1 |
| >> SPECIAL(431 | 431GET, 431GET+1 |
| >> SPECIAL(434 | 434GET, 434GET+1 |
| >> SPECIAL(435 | 435GET, 435GET+1 |
| >> SPECIAL(443 | 443GET, 443GET+1 |
| >> SPECIAL(471 | 471GET, 471GET+1 |
| >> SPECIAL(472 | 472GET, 472GET+1 |
| >> SPECIAL(993 | 993GET, 993GET+1 |
| >> SUPRESF( | COB+5, WORKCOMP+5 |
| >> SUPRESSG("COB" | COB+1 |
| >> SUPRESSG("Wor | kers Comp" , WORKCOMP+1 |