BPSSCRCV ;BHAM ISC/SS - ECME SCREEN CHANGE VIEW ;05-APR-05
Source file <BPSSCRCV.m>
| Package | Total | Call Graph |
|---|---|---|
| E Claims Management Engine | 8 | SAVEVIEW^BPSSCR01 $$INSURSEL^BPSSCRCU ERRMSG^BPSSCRCV $$DS^BPSSCRDS ($$GETPARAM,$$SAVEPAR,ENDEDIT,READPROF)^BPSSCRSL REDRAW^BPSSCRUD ($$BPS101,$$BPS102,$$BPS103,$$BPS201)^BPSSCRV1 ($$BPS106,$$BPS108,$$BPS109,$$BPS110)^BPSSCRV2 |
| VA FileMan | 4 | ^DIC FILE^DIE GETS^DIQ ^DIR |
| Kernel | 1 | ($$FMDIFF,$$FMTE,$$NOW)^XLFDT |
| List Manager | 1 | (FULL,PAUSE)^VALM1 |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CV | ;
|
|
| CV1 | ;
|
|
| EDITPROF(BPARR,BPDUZ7) | ;
|
|
| BPS113 | ; FIELD 1.13 - Division
|
|
| DATETIME | ; Display by Date Range or Timeframe
; Prompt the user to select Display Activity Date Range or Timeframe. |
|
| ERRMSG(BPMSG) | ;
|
|
| EDITFLD(FLDNO,RECIEN,DIR0,PRMTMSG,DFLTVAL,BPARRAY) | ;*/
|
|
| FILEIT(FILENO,FLDNO,RECIEN,NEWVAL) | ;
|
|
| PROMPT(ZERONODE,PRMTMSG,DFLTVAL) | ;
|
|
| GETFLD(FILENO,FLDNO,RECIEN) | ;
|
|
| FILEALL(BPARRAY,BPDUZ7) | ;
|
|
| ACTTYP() | ; Prompt the user to select Display Activity Date Range or Timeframe.
; The user is required to select D or T and there is no default value. ; |
|
| BEGDATE() | ; Enter Activity Beginning Date when Date Range is selected
|
|
| BEGDATE1 | ;
|
|
| ENDDATE() | ; Enter Activity Ending Date when Date Range is selected
|
|
| ENDDATE1 | ;
|
|
| DTERNG | ; Date Range Check
; If ALL patients selected, verify the user preferred time frame ; is not outside of the allowable range. If time frame is outside ; of the allowable range, update range to the past 7 days. |
| Name | Field # of Occurrence |
|---|---|
| SAVEVIEW^BPSSCR01 | CV+19, CV1+1 |
| $$INSURSEL^BPSSCRCU | DATETIME+48 |
| ERRMSG^BPSSCRCV | CV+6 |
| $$DS^BPSSCRDS | BPS113+1 |
| $$GETPARAM^BPSSCRSL | EDITFLD+3, ACTTYP+4, BEGDATE+2, ENDDATE+2, DTERNG+5, DTERNG+6, DTERNG+7, DTERNG+8, DTERNG+9 |
| $$SAVEPAR^BPSSCRSL | FILEALL+7, FILEALL+8, FILEALL+9 |
| ENDEDIT^BPSSCRSL | CV+26 |
| READPROF^BPSSCRSL | CV+10 |
| REDRAW^BPSSCRUD | CV1+3 |
| $$BPS101^BPSSCRV1 | BPS113+8 |
| $$BPS102^BPSSCRV1 | BPS113+9 |
| $$BPS103^BPSSCRV1 | BPS113+11 |
| $$BPS201^BPSSCRV1 | BPS113+7 |
| $$BPS106^BPSSCRV2 | DATETIME+42 |
| $$BPS108^BPSSCRV2 | DATETIME+44 |
| $$BPS109^BPSSCRV2 | DATETIME+45 |
| $$BPS110^BPSSCRV2 | DATETIME+46 |
| ^DIC | PROMPT+9 |
| FILE^DIE | FILEIT+5 |
| GETS^DIQ | GETFLD+5 |
| ^DIR | CV+16, PROMPT+24, ACTTYP+11, BEGDATE1+5, ENDDATE1+5 |
| FULL^VALM1 | CV+2 |
| PAUSE^VALM1 | ERRMSG+2 |
| $$FMDIFF^XLFDT | ENDDATE1+12, DTERNG+10, DTERNG+17 |
| $$FMTE^XLFDT | BEGDATE1+3, BEGDATE1+4, BEGDATE1+10, ENDDATE1+3 |
| $$NOW^XLFDT | BEGDATE1+4, BEGDATE1+10 |
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BPS( | FILEIT+4, FILEIT+6 |
| ^BPSF(9002313.93 - [#9002313.93] | EDITFLD+6 |
| ^DPT - [#2] | EDITFLD+4 |
| Name | Line Occurrences |
|---|---|
| $$ACTTYP | DATETIME+2 |
| $$BEGDATE | DATETIME+16 |
| $$EDITFLD | DATETIME+32, DATETIME+35, DATETIME+39, DATETIME+40, DATETIME+41, DATETIME+43 |
| $$ENDDATE | DATETIME+18 |
| $$PROMPT | EDITFLD+10 |
| BEGDATE1 | BEGDATE1+10 |
| BPS113 | BPS113+5 |
| CV1 | CV+18 |
| DATETIME | DATETIME+21 |
| DTERNG | BPS113+10 |
| EDITPROF | CV+21 |
| ENDDATE1 | ENDDATE1+10, ENDDATE1+12 |
| ERRMSG | EDITPROF+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BP1 | EDITPROF+2~ |
| BP2 | FILEALL+4~ |
| BPACT | EDITPROF+2~, DATETIME+5*, DATETIME+12, DATETIME+28 |
| BPARR | CV+5!, CV+10, CV+19, CV+21, CV+26, CV1+1, EDITPROF~, BPS113+1, BPS113+7, BPS113+8 , BPS113+9, BPS113+11, DATETIME+32, DATETIME+35, DATETIME+39, DATETIME+40, DATETIME+41, DATETIME+42, DATETIME+43, DATETIME+44 , DATETIME+45, DATETIME+46, DATETIME+48 |
| BPARR( | CV+24, CV+25!, CV+27*, BPS113+5*, BPS113+10, DATETIME+9, DATETIME+14*, DATETIME+25*, DATETIME+30*, ACTTYP+16* , ACTTYP+17, BEGDATE1+13*, BEGDATE1+14, ENDDATE1+10, ENDDATE1+12, ENDDATE1+17*, ENDDATE1+18, DTERNG+11*, DTERNG+12*, DTERNG+13* , DTERNG+14*, DTERNG+15* |
| BPARR("1.13" | CV+13 |
| BPARR("DIVS" | BPS113+5 |
| BPARR("TEMPCV" | CV+4 |
| BPARRAY | EDITFLD~, FILEALL~ |
| BPARRAY( | EDITFLD+13*, FILEALL+6, FILEALL+9 |
| BPARRAY("DIVS" | FILEALL+7 |
| BPARRAY("INS" | FILEALL+8 |
| BPDUZ7 | CV+7~, CV+8*, CV+10, CV+21, CV+26, EDITPROF~, BPS113+1, DATETIME+32, DATETIME+35, DATETIME+39 , DATETIME+40, DATETIME+41, DATETIME+43, DATETIME+48, FILEALL~, FILEALL+7, FILEALL+8, FILEALL+9, ACTTYP+4, BEGDATE+2 , ENDDATE+2, DTERNG+5, DTERNG+6, DTERNG+7, DTERNG+8, DTERNG+9 |
| BPFLD | FILEALL+4~, FILEALL+5*, FILEALL+6*, FILEALL+7, FILEALL+8, FILEALL+9 |
| BPINP | EDITPROF+2~, DATETIME+2*, DATETIME+3, DATETIME+5, DATETIME+16*, DATETIME+17, DATETIME+18*, DATETIME+19, DATETIME+32*, DATETIME+33 , DATETIME+34, DATETIME+35*, DATETIME+36 |
| BPMSG | ERRMSG~, ERRMSG+1 |
| BPQ | EDITPROF+2~, DATETIME+6*, DATETIME+17*, DATETIME+19*, DATETIME+21, DATETIME+33*, DATETIME+36*, DATETIME+37 |
| BPQUIT | PROMPT+1~, PROMPT+2*, PROMPT+10*, PROMPT+25*, PROMPT+26 |
| BPRET | EDITPROF+3~, BPS113+1*, BPS113+2 |
| BPS1031 | DTERNG+4~, DTERNG+5*, DTERNG+10, DTERNG+16, DTERNG+17 |
| BPS1032 | DTERNG+4~, DTERNG+6*, DTERNG+10, DTERNG+17 |
| BPS1033 | DTERNG+4~, DTERNG+7*, DTERNG+10, DTERNG+17 |
| BPS104 | DTERNG+4~, DTERNG+8* |
| BPS105 | DTERNG+4~, DTERNG+9*, DTERNG+10, DTERNG+16 |
| BPS106 | EDITPROF+5~ |
| BPS106STR | EDITPROF+5~ |
| BPS108 | EDITPROF+5~ |
| BPS108STR | EDITPROF+5~ |
| BPS109 | EDITPROF+5~ |
| BPS109STR | EDITPROF+5~ |
| BPS115 | EDITPROF+5~ |
| BPS115AR | EDITPROF+5~ |
| BPS115NM | EDITPROF+5~ |
| BPS115X | EDITPROF+5~ |
| BPS116 | EDITPROF+6~ |
| BPS116AR | EDITPROF+6~ |
| BPS116NM | EDITPROF+6~ |
| BPS116X | EDITPROF+6~ |
| BPS117 | EDITPROF+6~ |
| BPS117AR | EDITPROF+6~ |
| BPS117NM | EDITPROF+6~ |
| BPS117X | EDITPROF+6~ |
| BPS118 | EDITPROF+6~ |
| BPS118AR | EDITPROF+6~ |
| BPS118X | EDITPROF+6~ |
| BPS201 | EDITPROF+7~ |
| BPS201STR | EDITPROF+7~ |
| BPSCNT | EDITPROF+7~ |
| BPSDAYS | EDITPROF+7~, DATETIME+8*, DATETIME+9*, DATETIME+35, ENDDATE1+4, ENDDATE1+12, ENDDATE1+13, ENDDATE1+14, DTERNG+4~, DTERNG+16* , DTERNG+17*, DTERNG+19 |
| BPSDRUG | EDITPROF+7~ |
| BPSERR | EDITPROF+7~, EDITFLD+8 |
| BPSRESCV | CV+1~, CV+17*, CV+18 |
| BPSRT | CV+24~*, CV+27 |
| BPSRXD | EDITPROF+7~ |
| BPSRXN | EDITPROF+7~ |
| BPSSEL | EDITPROF+7~ |
| BPSTMPCV | CV+1~, CV+4*, CV+13 |
| BPSTMPDT | EDITPROF+7~, BPS113+10*, BEGDATE+3, ENDDATE+3, DTERNG+21* |
| BPSX | EDITPROF+7~ |
| BPTF | EDITPROF+2~, DATETIME+34*, DATETIME+35 |
| DA | EDITPROF+4~ |
| DFLTVAL | EDITFLD~, EDITFLD+8*, EDITFLD+10, PROMPT~, PROMPT+7, PROMPT+15 |
| DIC | PROMPT+4~, PROMPT+5* |
| DIC("A" | PROMPT+8* |
| DIC("B" | PROMPT+7* |
| DIC(0 | PROMPT+6* |
| DIE | EDITPROF+4~ |
| DIR | CV+1~, EDITPROF+4~, EDITFLD+1~, PROMPT+12~, ACTTYP+3~, BEGDATE+1~, ENDDATE+1~ |
| DIR("?" | ACTTYP+9*, ACTTYP+10*, BEGDATE1+4*, ENDDATE1+4* |
| DIR("A" | CV+15*, PROMPT+14*, PROMPT+19*, PROMPT+20*, PROMPT+21*, ACTTYP+6*, BEGDATE1+2*, ENDDATE1+2* |
| DIR("B" | PROMPT+15*, ACTTYP+7*, ACTTYP+8*, BEGDATE1+3*, ENDDATE1+3* |
| DIR(0 | CV+14*, PROMPT+13*, ACTTYP+5*, BEGDATE1+1*, ENDDATE1+1* |
| DIR0 | EDITFLD~, EDITFLD+10 |
| DIROUT | PROMPT+1~, PROMPT+25, ACTTYP+3~, BEGDATE+1~, ENDDATE+1~ |
| DIRUT | ACTTYP+3~, ACTTYP+14, BEGDATE+1~, BEGDATE1+8, ENDDATE+1~, ENDDATE1+8 |
| DR | EDITPROF+4~ |
| DTOUT | PROMPT+1~, PROMPT+10, PROMPT+25, ACTTYP+3~, BEGDATE+1~, ENDDATE+1~ |
| DUOUT | PROMPT+1~, PROMPT+10, PROMPT+25, ACTTYP+3~, BEGDATE+1~, ENDDATE+1~ |
| DUZ | CV+6, CV+8, EDITPROF+1 |
| ERRARR | EDITFLD+2~, FILEIT+7 |
| ERRARR("DIERR" | FILEIT+7 |
| FDA | EDITFLD+2~ |
| FDA( | FILEIT+3* |
| FILENO | FILEIT~, FILEIT+3, FILEIT+4, FILEIT+6, GETFLD~, GETFLD+5, GETFLD+6 |
| FLDNO | EDITFLD~, EDITFLD+3, EDITFLD+4, EDITFLD+6, EDITFLD+13, FILEIT~, FILEIT+3, PROMPT+18, GETFLD~, GETFLD+5 , GETFLD+6 |
| IOF | CV+3 |
| LCK | EDITFLD+2~, FILEIT+4*, FILEIT+6 |
| NEWVAL | FILEIT~, FILEIT+3, FILEIT+4, FILEIT+7, FILEIT+8 |
| PRMTMSG | EDITFLD~, EDITFLD+10, PROMPT~, PROMPT+8, PROMPT+14 |
| RECIEN | EDITFLD~, EDITFLD+3, FILEIT~, FILEIT+2, FILEIT+4, FILEIT+6, GETFLD~, GETFLD+3 |
| RECIENS | EDITFLD+2~, FILEIT+1~, FILEIT+2*, FILEIT+3, GETFLD+2~, GETFLD+3*, GETFLD+5, GETFLD+6 |
| RETARR | EDITFLD+1~, GETFLD+1~ |
| RETARR( | GETFLD+6 |
| RETV | EDITFLD+1~, EDITFLD+3*, EDITFLD+4*, EDITFLD+6*, EDITFLD+8, EDITFLD+10*, EDITFLD+11, EDITFLD+13, EDITFLD+14, GETFLD+1~ , GETFLD+6*, GETFLD+7, ACTTYP+3~, ACTTYP+4*, ACTTYP+8, BEGDATE+1~, BEGDATE+2*, BEGDATE+3*, BEGDATE1+3, ENDDATE+1~ , ENDDATE+2*, ENDDATE+3*, ENDDATE1+3 |
| U | DATETIME+34, EDITFLD+4, EDITFLD+6, PROMPT+5, PROMPT+27 |
| >> VALMBG | CV1+2* |
| X | ACTTYP+3~, BEGDATE+1~, ENDDATE+1~ |
| Y | CV+1~, CV+17, PROMPT+1~, PROMPT+10, PROMPT+25, PROMPT+27, ACTTYP+3~, ACTTYP+16, BEGDATE+1~, BEGDATE1+10 , BEGDATE1+13, ENDDATE+1~, ENDDATE1+10, ENDDATE1+12, ENDDATE1+17 |
| Y(0 | BEGDATE1+12, ENDDATE1+16 |
| ZERONODE | PROMPT~, PROMPT+3, PROMPT+5, PROMPT+13 |