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 |