PSOREJP1 ;BIRM/MFR - Third Party Reject Display Screen ;04/29/05
Source file <PSOREJP1.m>
| Package | Total | Call Graph |
|---|---|---|
| Outpatient Pharmacy | 9 | $$LSTRFL^PSOBPSU1 ($$RXSITE,$$STATUS)^PSOBPSUT LST^PSOPMP0 ($$RXINFO,COM,SEND)^PSOREJP3 ($$CLA,$$OVRCOD,$$OVRX,OVRDSP)^PSOREJU1 ($$DVINFO,$$PA,$$PTINFO,GET)^PSOREJU2 $$FIND^PSOREJUT EPH^PSORXEDT DP^PSORXVW |
| Registration | 3 | EN^VALM FULL^VALM1 (CNTRL,RESTORE,SAVE)^VALM10 |
| VA Fileman | 2 | ^DIC $$GET1^DIQ |
| Kernel | 1 | $$FMTE^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HDR | ||
| RES | ; - Re-submit a claim action
|
|
| REOPN(RX,REJ) | ; Returns whether the REJECT was RE-OPENED or NOT
|
|
| REJ | ; - DUR Information
|
|
| TRIC(RX,RFL,PSOTRIC) | ; - Return 1 for TRICARE or 0 (zero) for not TRICARE
|
|
| EXP(CODE) | ; - Returns the explanation field (.02) for a reject code
; Input: (r) CODE - .01 field (Code) value from file 9002313.93 ; Output: .02 field (Explanation) value from file 9002313.93 |
|
| HELP | ;
|
|
| EN(RX,REJ,CHANGE) | ; Entry point
|
|
| SET(FIELD,L,UND) | ; Sets the lines for fields that require text wrapping
|
|
| INIT | ; Builds the Body section
|
|
| PA | ; - Submit Prior Authorization
|
|
| CLOSED(RX,REJ,MSG) | ; Returns whether the REJECT is RESOLVED or NOT
|
|
| OVR | ; - Override a REJECT action
|
|
| SETLN(TEXT,REV,UND,HIG) | ; Sets a line to be displayed in the Body section
|
|
| CLA | ; - Submit Clarification Code
|
|
| LABEL(FIELD) | ; Sets the label for the field
|
|
| CLS | ; - Resolution Information
|
|
| OTH | ; - Other Rejects Information
|
|
| INS | ; - Insurance Information
|
|
| OUT(RX) | ; - Supported call by outside PROTOCOLs to act on specific REJECTs
|
|
| EXIT | ;
|
|
| MP | ; - Patient Medication Profile
|
|
| EDT | ; - Rx Edit hidden action
|
|
| VIEW | ; - Rx View hidden action
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | EXP+4 |
| $$GET1^DIQ | EN+4, EN+5, TRIC+1, CLS+12, CLS+13, CLS+16, OVR+4, MP+6, CLOSED+1, REOPN+1 |
| $$LSTRFL^PSOBPSU1 | INIT+2 |
| $$RXSITE^PSOBPSUT | EDT+9, MP+5 |
| $$STATUS^PSOBPSUT | REJ+9 |
| LST^PSOPMP0 | MP+7 |
| $$RXINFO^PSOREJP3 | HDR+3 |
| COM^PSOREJP3 | INIT+9 |
| SEND^PSOREJP3 | OVR+8, RES+3, CLA+5, PA+5 |
| $$CLA^PSOREJU1 | CLA+4 |
| $$OVRCOD^PSOREJU1 | OVR+4, OVR+5, OVR+6 |
| $$OVRX^PSOREJU1 | CLS+8, CLS+9, CLS+10 |
| OVRDSP^PSOREJU1 | OVR+7 |
| $$DVINFO^PSOREJU2 | HDR+2 |
| $$PA^PSOREJU2 | PA+4 |
| $$PTINFO^PSOREJU2 | HDR+2 |
| GET^PSOREJU2 | INIT+6 |
| $$FIND^PSOREJUT | OUT+8 |
| EPH^PSORXEDT | EDT+11 |
| DP^PSORXVW | VIEW+10 |
| EN^VALM | EN+7, EN+8, EN+9 |
| FULL^VALM1 | EN+10, OVR+3, RES+2, CLA+3, PA+3, MP+4 |
| CNTRL^VALM10 | SETLN+9, SETLN+10, SETLN+11, SETLN+13 |
| RESTORE^VALM10 | INIT+4 |
| SAVE^VALM10 | SETLN+6 |
| $$FMTE^XLFDT | REJ+6, REJ+15, REJ+19 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(59 - [#59] | EDT+10 |
| ^PSRX - [#52] | OUT+7 |
| ^TMP("PSOREJP1" | INIT+5!, EXIT+1!, SETLN+4* |
| ^XUSEC("PSORPH" | OUT+2 |
| Name | Line Occurrences |
|---|---|
| $$CLOSED | EN+7, EN+8, EN+9, CLS+2, EDT+13, OVR+1, RES+1, CLA+2, PA+2 |
| $$EXP | REJ+5, REJ+14, OTH+7 |
| $$LABEL | SET+2, SET+4 |
| $$TRIC | EN+5, INIT+3, REJ+2 |
| CLS | INIT+11 |
| EN | OUT+10 |
| INS | INIT+10 |
| OTH | INIT+8 |
| REJ | INIT+7 |
| SET | REJ+17, REJ+18, REJ+20, CLS+7 |
| SETLN | REJ+4, REJ+6, REJ+7, REJ+8, REJ+9, REJ+12, REJ+15, REJ+16, REJ+21, OTH+3 , OTH+4, OTH+7, INS+1, INS+2, INS+3, INS+4, INS+5, INS+6, INS+7, CLS+3 , CLS+4, CLS+5, CLS+6, CLS+8, CLS+9, CLS+10, CLS+14, CLS+17, CLS+18, SET+2 , SET+4, SET+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CHANGE | EN~, EDT+13* |
| CLA | CLA+1~, CLA+4*, CLA+5 |
| CLAPNTR | CLS+12~*, CLS+13 |
| COD1 | OVR+2~, OVR+4*, OVR+7, OVR+8 |
| COD2 | OVR+2~, OVR+5*, OVR+7, OVR+8 |
| COD3 | OVR+2~, OVR+6*, OVR+7, OVR+8 |
| CODE | EXP~, EXP+4 |
| DA | VIEW+8~, VIEW+9* |
| DATA | INIT+1~, INIT+6, OUT+1~, OUT+8 |
| DATA( | REJ+5, REJ+6, REJ+9, REJ+13, REJ+14, REJ+15, REJ+16, REJ+19, OTH+2, INS+3 , INS+4, INS+5, INS+6, INS+7, CLS+5, CLS+6, CLS+7, CLS+8, CLS+9, CLS+10 , CLS+11, CLS+13, CLS+15, CLS+16, CLS+17, CLS+18, SET+2 |
| DATA("" | OUT+8 |
| DIC | EXP+3~, EXP+4* |
| DIC(0 | EXP+4* |
| DUZ | OUT+2 |
| FIELD | SET~, SET+2, SET+4, LABEL~, LABEL+1, LABEL+2, LABEL+3, LABEL+4 |
| FILL | EN+3~, EN+4*, EN+5, HDR+2, HDR+3, INIT+6, REJ+2, REJ+9, VIEW+10~, EDT+9 , EDT+11~, MP+5 |
| HIG | SETLN~, SETLN+12, SETLN+13 |
| I | INIT+4*, REJ+8*, OTH+1~, OTH+5*, OTH+6, SET+3*, SET+4, OUT+1~, OUT+7* |
| >> IOINHI | SETLN+13 |
| >> IOINORM | SETLN+9, SETLN+10, SETLN+11, SETLN+13 |
| >> IORVON | SETLN+9 |
| >> IOUON | SETLN+10, SETLN+11, SETLN+13 |
| J | OTH+1~, OTH+6* |
| L | SET~, SET+2, SET+4, SET+5 |
| LAST | OTH+1~, OTH+6*, OTH+7 |
| LASTLN | EN+3~, INIT+4, SETLN+6* |
| LINE | INIT+1~, INIT+5*, INIT+12, VIEW+10~, EDT+11~, SETLN+4*, SETLN+6, SETLN+9, SETLN+10, SETLN+11 , SETLN+13 |
| LINE1 | HDR+1~ |
| LINE2 | HDR+1~ |
| LST | OTH+1~, OTH+2*, OTH+5, OTH+6 |
| MSG | CLOSED~, CLOSED+1 |
| ORN | EDT+8~, EDT+9*, EDT+10 |
| PA | PA+1~, PA+4*, PA+5 |
| PATIENT | MP+3~, MP+6*, MP+7 |
| PFLDT | REJ+1~, REJ+19*, REJ+20, REJ+21 |
| PS | VIEW+8~, VIEW+9*, OUT+4 |
| PSOBACK | VIEW+2, EDT+2, MP+1, OUT+1~, OUT+6* |
| PSOCODE | EN+3~, EN+5*, EN+6 |
| PSOLIST | EDT+8~ |
| PSOLIST(1 | EDT+10* |
| PSOPAR | EDT+8~, EDT+10* |
| PSOSITE | EDT+8~, EDT+9*, EDT+10, MP+5 |
| >> PSOSTFLT | EDT+13 |
| PSOTCODE | EN+3~, EN+6*, EN+8, EN+9 |
| PSOTRIC | EN+3~, EN+5*, EN+6, TRIC~, TRIC+1*, TRIC+2, INIT+3*, REJ+1~, REJ+2*, REJ+3 , REJ+4, REJ+11 |
| PSOVDA | VIEW+8~, VIEW+9* |
| REJ | EN~, EN+4, EN+5, EN+7, EN+8, EN+9, INIT+6, REJ+5, REJ+6, REJ+9 , REJ+13, REJ+14, REJ+15, REJ+16, REJ+19, OTH+2, INS+3, INS+4, INS+5, INS+6 , INS+7, CLS+2, CLS+5, CLS+6, CLS+7, CLS+8, CLS+9, CLS+10, CLS+11, CLS+12 , CLS+13, CLS+15, CLS+16, CLS+17, CLS+18, SET+2, VIEW+10~, EDT+11~, EDT+13, OVR+1 , OVR+4, RES+1, CLA+2, PA+2, CLOSED~, CLOSED+1, REOPN~, REOPN+1, OUT+1~, OUT+8* , OUT+9, OUT+10 |
| REV | SETLN~, SETLN+8 |
| RFL | TRIC~, TRIC+1, INIT+2*, INIT+3, OUT+1~, OUT+7*, OUT+8 |
| RJC | OTH+1~, OTH+5*, OTH+7 |
| RX | EN~, EN+4, EN+5, EN+7, EN+8, EN+9, HDR+2, HDR+3, TRIC~, TRIC+1 , INIT+2, INIT+3, INIT+6, REJ+2, REJ+9, CLS+2, CLS+12, CLS+16, VIEW+9, VIEW+10~ , EDT+9, EDT+11~, EDT+13, OVR+1, OVR+4, RES+1, CLA+2, PA+2, MP+5, MP+6 , CLOSED~, CLOSED+1, REOPN~, REOPN+1, OUT~, OUT+7, OUT+8, OUT+10 |
| RXN | OUT+1~ |
| SITE | MP+3~, MP+5*, MP+7 |
| T | SET+1~, SET+5* |
| TDATA | REJ+1~*, REJ+5*, REJ+7 |
| TDATA( | REJ+8 |
| TEXT | SETLN~, SETLN+2*, SETLN+3*, SETLN+4, SETLN+9, SETLN+10 |
| TITLE | VIEW+1~, VIEW+4*, VIEW+10~, VIEW+12, EDT+1~, EDT+4*, EDT+11~, EDT+14 |
| TREJ | REJ+1~ |
| TXT | SET+1~, SET+2*, SET+3, SET+4*, SET+5* |
| TYPE | REJ+1~, REJ+13*, REJ+14*, REJ+15 |
| UND | SET~, SET+2, SET+5, SETLN~, SETLN+10, SETLN+11, SETLN+13 |
| >> VALM("TITLE" | VIEW+4, VIEW+12*, EDT+4, EDT+14* |
| VALMBCK | VIEW+3*, VIEW+12*, EDT+3*, EDT+13!, EDT+14*, OVR+4*, OVR+5*, OVR+6*, CLA+4*, PA+4* , MP+2*, MP+7*, CLOSED+2*, OUT+3*, OUT+5*, OUT+9*, OUT+10* |
| VALMCNT | INIT+5*, INIT+12*, VIEW+1~, EDT+1~, OUT+1~ |
| >> VALMHDR(1 | HDR+2* |
| >> VALMHDR(2 | HDR+2* |
| >> VALMHDR(3 | HDR+3* |
| >> VALMHDR(4 | HDR+3* |
| >> VALMSG | VIEW+3*, EDT+3*, MP+2*, CLOSED+2*, OUT+3*, OUT+5*, OUT+9* |
| X | HDR+1~, CLS+1~, CLS+13*, CLS+14, CLS+16*, CLS+17, SETLN+1~, EXP+3~, EXP+4*, OUT+8* |
| Y | EXP+3~ |
| Y(0 | EXP+5 |