PXRMETX ; SLC/PJH - Run Extract for QUERI ;01/28/2013
Source file <PXRMETX.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| LOCK(PXRMXIEN) | ||
| TRANS(PXRMXIEN) | ;Transmit HL7 messages | |
| GETNAME(NAME,CLASS) | ;Get the extract name. | |
| MH | ;Monthly MH Extract, called from option PXRM EXTRACT VA-MH QUERI. | |
| RUN(IEN,NEXT,MODE,PURGE) | ;Process extract parameter ; IEN is ien of Extract Parameter ; NEXT is period to extract ; MODE = 0 is extract and transmission ; MODE = 1 is extract only ; MODE = 2 is manual extract and transmission (doesn't update 810.2) ; MODE = 3 is manual extract only (doesn't update 810.2) | |
| EXIT | ;Clear workfile | |
| UNLOCK(PXRMXIEN) | ||
| UPDPAR | ;Update parameters when run complete | |
| MAIL(NAME,NEXT,MODE) | ;Completion mail message | |
| AUTO(ID,PURGE) | ;Called from option scheduling (#19.2) | |
| UPDEX(IEN) | ;Update extract summary | |
| IHD | ;Monthly IHD Extract, called from option PXRM EXTRACT VA-IHD QUERI. | 
| Name | Field # of Occurrence | 
|---|---|
| FIND^DIC | AUTO+3 | 
| UPDATE^DIE | RUN+72, TRANS+13 | 
| HL7^PXRM7API | TRANS+3 | 
| RUN^PXRMETX | AUTO+11 | 
| REM^PXRMETXR | RUN+55 | 
| PRGES^PXRMETXU | AUTO+13 | 
| PRGPL^PXRMETXU | AUTO+15 | 
| CALC^PXRMEUT | RUN+27 | 
| MES^PXRMEUT | MAIL+12 | 
| $$CRLST^PXRMRUL1 | RUN+46 | 
| CLEAR^PXRMRULE | RUN+50 | 
| START^PXRMRULE | RUN+48 | 
| AWRITE^PXRMUTIL | RUN+73 | 
| $$NOW^XLFDT | RUN+63, TRANS+12, UPDPAR+15 | 
| $$RJ^XLFSTR | GETNAME+7, UPDEX+20 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^PXRM(810.2 - [#810.2] | FIND^DIC | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PXRM(810.2 - [#810.2] | AUTO+7, AUTO+9, RUN+18, RUN+22, RUN+35, RUN+36, RUN+37, UPDPAR+2, UPDPAR+15* | 
| ^PXRMXT(810.3 - [#810.3] | GETNAME+1, GETNAME+6, TRANS+8, TRANS+9, UPDEX+21*, UPDEX+22*, UPDEX+38*, UPDEX+45*, UPDEX+46*, LOCK , UNLOCK | 
| ^TMP("PXRMETX" | RUN+12!, EXIT+1!, UPDEX+10, UPDEX+12, UPDEX+14, UPDEX+15, UPDEX+34 | 
| ^TMP("PXRMETX1" | RUN+12!, EXIT+1!, UPDEX+25, UPDEX+26, UPDEX+30, UPDEX+32 | 
| Name | Line Occurrences | 
|---|---|
| $$GETNAME | RUN+30 | 
| AUTO | IHD+1, MH+1 | 
| EXIT | RUN+73 | 
| LOCK | TRANS+6, UPDEX+3 | 
| RUN+85 | |
| TRANS | RUN+79 | 
| UNLOCK | TRANS+15, UPDEX+48 | 
| UPDEX | RUN+76 | 
| UPDPAR | RUN+82 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| APPL | UPDEX+6~, UPDEX+16*, UPDEX+20 | 
| CLASS | GETNAME~, RUN+8~, RUN+18*, RUN+20*, RUN+46, RUN+71 | 
| CNT | GETNAME+2~, GETNAME+3*, GETNAME+7*, UPDEX+6~, UPDEX+9*, UPDEX+19* | 
| DATA | RUN+16~, RUN+22*, RUN+24, RUN+37*, RUN+38, RUN+39, RUN+42, RUN+43, UPDEX+6~, UPDEX+15* , UPDEX+16, UPDEX+17, UPDEX+18, UPDPAR+1~, UPDPAR+2* | 
| DFN | UPDEX+6~ | 
| >> DILOCKTM | LOCK | 
| DUE | UPDEX+6~, UPDEX+17*, UPDEX+20 | 
| DUOUT | TRANS+6, UPDEX+1~, UPDEX+3, LOCK+1* | 
| ETYP | UPDEX+6~, UPDEX+27*, UPDEX+37 | 
| EVAL | UPDEX+6~, UPDEX+16*, UPDEX+20 | 
| FAPPL | UPDEX+7~, UPDEX+35*, UPDEX+37 | 
| FCNT | UPDEX+7~, UPDEX+24*, UPDEX+32*, UPDEX+38, UPDEX+45 | 
| FDA | RUN+8~ | 
| FDA( | RUN+60*, RUN+61*, RUN+62*, RUN+63*, RUN+64*, RUN+65*, RUN+66*, RUN+67*, RUN+68*, RUN+69* , RUN+70*, RUN+71*, TRANS+10*, TRANS+11*, TRANS+12* | 
| FDAIEN | RUN+8~ | 
| FDAIEN(1 | RUN+76, RUN+79 | 
| FDATA | UPDEX+7~, UPDEX+34*, UPDEX+35, UPDEX+36 | 
| FDUE | UPDEX+7~, UPDEX+36*, UPDEX+37 | 
| FEVAL | UPDEX+7~, UPDEX+35*, UPDEX+37 | 
| FGNAM | UPDEX+7~, UPDEX+27*, UPDEX+37 | 
| FGSTA | UPDEX+7~, UPDEX+27*, UPDEX+37 | 
| FIND | UPDEX+7~, UPDEX+32*, UPDEX+37 | 
| FNAPPL | UPDEX+7~, UPDEX+35*, UPDEX+37 | 
| FNDUE | UPDEX+7~, UPDEX+36*, UPDEX+37 | 
| FREQ | MAIL+1~, MAIL+2*, MAIL+3*, MAIL+4*, MAIL+11 | 
| FSEQ | UPDEX+7~, UPDEX+29*, UPDEX+30*, UPDEX+32, UPDEX+34, UPDEX+37 | 
| GDATA | UPDEX+8~, UPDEX+26*, UPDEX+27 | 
| GSEQ | UPDEX+8~, UPDEX+24*, UPDEX+25*, UPDEX+26, UPDEX+30, UPDEX+32, UPDEX+34 | 
| HL7ID | TRANS+1~, TRANS+2*, TRANS+3, TRANS+11 | 
| ID | AUTO~, AUTO+2 | 
| IEN | AUTO+1~, AUTO+5*, AUTO+7, AUTO+9, AUTO+11, RUN~, RUN+18, RUN+22, RUN+35, RUN+36 , RUN+37, RUN+48, RUN+64, UPDEX~, UPDEX+3, UPDEX+21, UPDEX+22, UPDEX+38, UPDEX+45, UPDEX+46 , UPDEX+48, UPDPAR+2, UPDPAR+15 | 
| INDP | RUN+16~, RUN+42*, RUN+48, RUN+54 | 
| INST | UPDEX+8~, UPDEX+11*, UPDEX+12*, UPDEX+14, UPDEX+15, UPDEX+20, UPDEX+34 | 
| INTP | RUN+16~, RUN+43*, RUN+48 | 
| ITER | RUN+10~, RUN+31*, RUN+45, RUN+48 | 
| LAST | UPDPAR+1~, UPDPAR+4*, UPDPAR+15 | 
| LIST | AUTO+1~, RUN+16~, RUN+39*, RUN+40*, RUN+41*, RUN+45*, RUN+46 | 
| LIST("DILIST" | AUTO+5 | 
| LUVALUE | AUTO+1~, AUTO+3 | 
| LUVALUE(1 | AUTO+2* | 
| MODE | AUTO+1~, AUTO+9*, AUTO+11, MAIL~, MAIL+6, MAIL+7, MAIL+8, MAIL+9, RUN~, RUN+68 , RUN+79, RUN+82, RUN+85 | 
| MSG | RUN+8~, RUN+73 | 
| NAME | GETNAME~, GETNAME+1, GETNAME+6, GETNAME+7*, GETNAME+8, MAIL~, MAIL+11, RUN+16~, RUN+24*, RUN+29 , RUN+30*, RUN+31, RUN+60, RUN+85, TRANS+1~, TRANS+8*, TRANS+10 | 
| NAPPL | UPDEX+8~, UPDEX+17*, UPDEX+20 | 
| NDUE | UPDEX+8~, UPDEX+17*, UPDEX+20 | 
| NEW | GETNAME+2~, GETNAME+3*, GETNAME+5, GETNAME+6* | 
| NEXT | AUTO+1~, AUTO+7*, AUTO+11, MAIL~, MAIL+3, MAIL+4, MAIL+11, RUN~, RUN+25, RUN+27 , RUN+85, TRANS+1~, TRANS+9*, UPDPAR+1~, UPDPAR+2*, UPDPAR+4, UPDPAR+6*, UPDPAR+9, UPDPAR+13*, UPDPAR+15 | 
| NUM | UPDPAR+8~, UPDPAR+10*, UPDPAR+11*, UPDPAR+12*, UPDPAR+13 | 
| PARTYPE | RUN+16~, RUN+24*, RUN+55, RUN+65 | 
| PATCREAT | RUN+9~, RUN+46* | 
| PCNT | UPDEX+8~ | 
| PERIOD | RUN+16~, RUN+25*, RUN+29, RUN+41, RUN+48, RUN+66, RUN+69, UPDPAR+1~, UPDPAR+9*, UPDPAR+10 | 
| PURGE | AUTO~, AUTO+11, RUN~, RUN+70 | 
| PXRMIDOD | RUN+9~, RUN+54* | 
| PXRMLIST | RUN+9~, RUN+46*, RUN+48, RUN+55, UPDEX+8~, UPDEX+18*, UPDEX+20 | 
| PXRMNODE | RUN+9~, RUN+14*, RUN+48, RUN+50 | 
| PXRMRULE | RUN+9~, RUN+38*, RUN+48, RUN+50 | 
| >> PXRMSTOP | RUN+27, RUN+48, RUN+55, RUN+62 | 
| PXRMSTRT | RUN+9~, RUN+27, RUN+48, RUN+55, RUN+61 | 
| PXRMXIEN | RUN+9~, TRANS~, TRANS+3, TRANS+6, TRANS+8, TRANS+9, TRANS+15, LOCK~, UNLOCK~ | 
| RCNT | UPDEX+8~, UPDEX+13*, UPDEX+14*, UPDEX+15, UPDEX+25, UPDEX+26, UPDEX+30, UPDEX+32, UPDEX+34 | 
| RIEN | UPDEX+8~, UPDEX+16*, UPDEX+20 | 
| RSEQ | UPDEX+8~, UPDEX+9*, UPDEX+19*, UPDEX+20, UPDEX+21, UPDEX+22, UPDEX+38, UPDEX+45, UPDEX+46 | 
| SEQ | RUN+33~, RUN+34*, RUN+35*, RUN+36, UPDEX+8~, UPDEX+9*, UPDEX+10*, UPDEX+12, UPDEX+14, UPDEX+15 , UPDEX+25, UPDEX+26, UPDEX+30, UPDEX+32, UPDEX+34 | 
| SNAME | RUN+16~ | 
| SUB | RUN+33~, RUN+36*, RUN+37, RUN+55 | 
| TEMP | UPDEX+8~, UPDEX+20*, UPDEX+21, UPDEX+22, UPDEX+37*, UPDEX+38 | 
| TEXT | MAIL+1~, MAIL+6*, MAIL+7*, MAIL+8*, MAIL+9*, MAIL+11*, MAIL+12, RUN+16~ | 
| TYPE | UPDPAR+1~, UPDPAR+2*, UPDPAR+6, UPDPAR+7, UPDPAR+10, UPDPAR+11, UPDPAR+12, UPDPAR+13 | 
| U | AUTO+5, AUTO+7, AUTO+9, RUN+18, RUN+24, RUN+38, RUN+39, RUN+42, RUN+43, TRANS+8 , TRANS+9, UPDEX+16, UPDEX+17, UPDEX+18, UPDEX+20, UPDEX+22, UPDEX+27, UPDEX+32, UPDEX+35, UPDEX+36 , UPDEX+37, UPDEX+45, UPDEX+46, UPDPAR+2, UPDPAR+15 | 
| XNAME | RUN+9~, RUN+29*, RUN+30 | 
| YEAR | RUN+16~, RUN+25*, RUN+29, RUN+40, RUN+48, RUN+67, UPDPAR+1~, UPDPAR+9*, UPDPAR+11*, UPDPAR+12* , UPDPAR+13 |