©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
SCMCHLR3 ;ALB/KCL - PCMM HL7 Reject Processing - Build List Area con't; 10-JAN-2000
Source file <SCMCHLR3.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 3 | $$GETLOG^SCMCHLA ($$GETEC,$$GETHL7ID)^SCMCHLA2 $$PROV^SCMCHLP |
| Registration | 2 | PID^VADPT ($$FDATE,$$LOWER,$$SETSTR)^VALM1 |
| VA Fileman | 1 | $$EXTERNAL^DILFD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BLDLIST(SCSORTBY,SCEPS,SCCNT) | ; Description: Build list area for for PCMM Transmission errors.
|
|
| SET(SCARY,SCLINE,SCTEXT,SCCOL,SCWID,SCNUM,SCTLIEN,SCDFN,SCERIEN,SCCNT) | ;
; Description: Set display array. |
|
| CAPFLD(SCCOL,SCWID) | ; Description: Used to determine column/width of caption fields in the List Template.
|
| Name | Field # of Occurrence |
|---|---|
| $$EXTERNAL^DILFD | BLDLIST+71, BLDLIST+81 |
| $$GETLOG^SCMCHLA | BLDLIST+35 |
| $$GETEC^SCMCHLA2 | BLDLIST+93 |
| $$GETHL7ID^SCMCHLA2 | BLDLIST+68 |
| $$PROV^SCMCHLP | BLDLIST+65 |
| PID^VADPT | BLDLIST+54 |
| $$FDATE^VALM1 | BLDLIST+58 |
| $$LOWER^VALM1 | BLDLIST+50, BLDLIST+58, BLDLIST+71, BLDLIST+81, BLDLIST+94 |
| $$SETSTR^VALM1 | SET+20 |
| FileNo | Call Tags |
|---|---|
| 404.47142 | EXTERNAL^DILFD |
| ^SCTM(404.52 - [#404.52] | EXTERNAL^DILFD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | BLDLIST+50 |
| ^SCTM(404.52 - [#404.52] | BLDLIST+70 |
| ^TMP( | SET+19, SET+20*, SET+21*, SET+26*, SET+27* |
| ^TMP("SCERRSRT" | BLDLIST+23, BLDLIST+26, BLDLIST+29 |
| Name | Line Occurrences |
|---|---|
| $$CAPFLD | BLDLIST+19 |
| SET | BLDLIST+44, BLDLIST+48, BLDLIST+51, BLDLIST+55, BLDLIST+59, BLDLIST+72, BLDLIST+78, BLDLIST+82, BLDLIST+88, BLDLIST+97 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SET+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | BLDLIST+13~, BLDLIST+54* |
| SCARY | BLDLIST+44, BLDLIST+48, BLDLIST+51, BLDLIST+55, BLDLIST+59, BLDLIST+72, BLDLIST+78, BLDLIST+82, BLDLIST+88, BLDLIST+97 , SET~, SET+19, SET+20, SET+21, SET+26, SET+27 |
| SCCNT | BLDLIST~, BLDLIST+44, BLDLIST+48, BLDLIST+51, BLDLIST+55, BLDLIST+59, BLDLIST+72, BLDLIST+78, BLDLIST+82, BLDLIST+88 , BLDLIST+97, SET~, SET+18* |
| SCCOL | BLDLIST+19, SET~, SET+20, CAPFLD~ |
| SCCOL("DTR" | BLDLIST+59, CAPFLD+19* |
| SCCOL("INST" | BLDLIST+88, CAPFLD+23* |
| SCCOL("NUM" | BLDLIST+44, CAPFLD+15* |
| SCCOL("PAT" | BLDLIST+51, CAPFLD+17* |
| SCCOL("PATID" | BLDLIST+55, CAPFLD+18* |
| SCCOL("PROV" | BLDLIST+72, CAPFLD+20* |
| SCCOL("RET" | BLDLIST+48, CAPFLD+16* |
| SCCOL("STA" | BLDLIST+82, CAPFLD+22* |
| SCCOL("TYPE" | BLDLIST+78, CAPFLD+21* |
| SCDFN | SET~, SET+25, SET+27 |
| SCEPS | BLDLIST~ |
| SCERIEN | BLDLIST+13~, BLDLIST+28*, BLDLIST+29*, BLDLIST+35, BLDLIST+44, SET~, SET+24, SET+26, SET+27 |
| >> SCERR | BLDLIST+93 |
| >> SCERR("CODE" | BLDLIST+94 |
| >> SCERR("SHORT" | BLDLIST+94 |
| SCHL | BLDLIST+13~, BLDLIST+63!, BLDLIST+68 |
| SCHL("HL7ID" | BLDLIST+69, BLDLIST+75 |
| SCLINE | BLDLIST+16*, BLDLIST+32, BLDLIST+41*, BLDLIST+44, BLDLIST+48, BLDLIST+51, BLDLIST+55, BLDLIST+59, BLDLIST+72, BLDLIST+78 , BLDLIST+82, BLDLIST+88, BLDLIST+90*, BLDLIST+97, SET~, SET+18, SET+19, SET+20, SET+21, SET+26 , SET+27 |
| SCNUM | BLDLIST+16*, BLDLIST+38*, BLDLIST+44, BLDLIST+48, BLDLIST+51, BLDLIST+55, BLDLIST+59, BLDLIST+72, BLDLIST+78, BLDLIST+82 , BLDLIST+88, BLDLIST+97, SET~, SET+21, SET+26 |
| >> SCPROV | BLDLIST+62*, BLDLIST+65*, BLDLIST+70*, BLDLIST+71 |
| >> SCPTR | BLDLIST+69*, BLDLIST+70 |
| SCSORTBY | BLDLIST~, BLDLIST+22, BLDLIST+23, BLDLIST+26, BLDLIST+29, BLDLIST+85 |
| SCSUB | BLDLIST+13~, BLDLIST+22*, BLDLIST+23*, BLDLIST+26, BLDLIST+29, BLDLIST+87 |
| SCTEXT | BLDLIST+13~, BLDLIST+47*, BLDLIST+48, BLDLIST+50*, BLDLIST+51, BLDLIST+58*, BLDLIST+59, BLDLIST+71*, BLDLIST+72, BLDLIST+77* , BLDLIST+78, BLDLIST+81*, BLDLIST+82, BLDLIST+87*, BLDLIST+88, BLDLIST+94*, BLDLIST+96*, BLDLIST+97, SET~, SET+20 |
| SCTLIEN | BLDLIST+13~, BLDLIST+25*, BLDLIST+26*, BLDLIST+29, BLDLIST+35, BLDLIST+44, SET~, SET+24, SET+26, SET+27 |
| SCTLOG | BLDLIST+13~, BLDLIST+35 |
| SCTLOG("ACK D | T/TM" , BLDLIST+58 |
| SCTLOG("DFN" | BLDLIST+44, BLDLIST+50, BLDLIST+54 |
| SCTLOG("ERR" | BLDLIST+67, BLDLIST+68, BLDLIST+81, BLDLIST+93 |
| SCTLOG("STATUS" | BLDLIST+47 |
| SCTLOG("WORK" | BLDLIST+50, BLDLIST+65, BLDLIST+76, SET+25 |
| >> SCTYPE | BLDLIST+75*, BLDLIST+76*, BLDLIST+77 |
| SCWID | BLDLIST+19, SET~, SET+20, CAPFLD~ |
| SCWID("DTR" | BLDLIST+59, CAPFLD+19* |
| SCWID("INST" | BLDLIST+88, CAPFLD+23* |
| SCWID("NUM" | BLDLIST+44, CAPFLD+15* |
| SCWID("PAT" | BLDLIST+51, CAPFLD+17* |
| SCWID("PATID" | BLDLIST+55, CAPFLD+18* |
| SCWID("PROV" | BLDLIST+72, CAPFLD+20* |
| SCWID("RET" | BLDLIST+48, CAPFLD+16* |
| SCWID("STA" | BLDLIST+82, CAPFLD+22* |
| SCWID("TYPE" | BLDLIST+78, CAPFLD+21* |
| >> VA("BID" | BLDLIST+55 |
| >> VALMDDF | CAPFLD+12 |
| >> VALMDDF("DATE" | CAPFLD+19 |
| >> VALMDDF("INST" | CAPFLD+23 |
| >> VALMDDF("NUMBER" | CAPFLD+15 |
| >> VALMDDF("PATID" | CAPFLD+18 |
| >> VALMDDF("PATIENT" | CAPFLD+17 |
| >> VALMDDF("PROV" | CAPFLD+20 |
| >> VALMDDF("RETRANS" | CAPFLD+16 |
| >> VALMDDF("STATUS" | CAPFLD+22 |
| >> VALMDDF("TYPE" | CAPFLD+21 |
| X | BLDLIST+95!*, BLDLIST+96, SET+17~, SET+19*, SET+20, CAPFLD+14~, CAPFLD+15*, CAPFLD+16*, CAPFLD+17*, CAPFLD+18* , CAPFLD+19*, CAPFLD+20*, CAPFLD+21*, CAPFLD+22*, CAPFLD+23* |