PSSNDCUT ;BIRM/MFR - NDC Utilities ;10-Dec-2013 16:28;DU
Source file <PSSNDCUT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SAVNDC(DRG,SITE,NDC,CMP) | ; Saves the NDC in the DRUG file (Format: 5-4-2)
; Input: (r) DRG - Drug IEN (#50) ; (r) SITE - Outpatient Site IEN (#59) ; (r) NDC - NDC Number ; (o) CMP - CMOP? (1-YES/0-NO) |
|
| NDCFMT(NDC) | ; Formats NDC codes into 5-4-2
|
|
| GETNDC(DRG,SITE,CMOP) | ; Retuns the NDC for a specific Drug/Site/CMOP or NON-CMOP
|
|
| CHKCH(STR) | ; Checks characters different from "-" and numbers
|
| FileNo | Call Tags |
|---|---|
| ^PSDRUG - [#50] | GET1^DIQ |
| ^PSNDF(50.68 - [#50.68] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PSDRUG - [#50] | SAVNDC+10 |
| ^PSDRUG("AQ" | GETNDC+3 |
| Name | Line Occurrences |
|---|---|
| $$CHKCH | NDCFMT+2 |
| $$NDCFMT | SAVNDC+7, GETNDC+10, GETNDC+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CHKCH | CHKCH+1~, CHKCH+3*, CHKCH+4 |
| CMOP | GETNDC~, GETNDC+3* |
| CMP | SAVNDC~, SAVNDC+16 |
| DA | SAVNDC+5~, SAVNDC+15!, SAVNDC+16* |
| DA(1 | SAVNDC+12*, SAVNDC+16* |
| DD | SAVNDC+5~, SAVNDC+13! |
| DIC | SAVNDC+5~, SAVNDC+11* |
| DIC(0 | SAVNDC+12* |
| DIE | SAVNDC+5~, SAVNDC+15!* |
| DINUM | SAVNDC+5~, SAVNDC+12*, SAVNDC+13! |
| DO | SAVNDC+5~, SAVNDC+13! |
| DR | SAVNDC+5~, SAVNDC+15!, SAVNDC+16* |
| DRG | SAVNDC~, SAVNDC+10, SAVNDC+11, SAVNDC+12, SAVNDC+15, SAVNDC+16, GETNDC~, GETNDC+3, GETNDC+10, GETNDC+12 |
| I | SAVNDC+5~, CHKCH+3* |
| NDC | SAVNDC~, SAVNDC+7*, SAVNDC+16, GETNDC+1~, GETNDC+10*, GETNDC+12*, GETNDC+13, NDCFMT~, NDCFMT+2, NDCFMT+3 , NDCFMT+4, NDCFMT+6, NDCFMT+7 |
| NDF | GETNDC+1~, GETNDC+12* |
| RFL | SAVNDC+5~ |
| S1 | NDCFMT+1~, NDCFMT+7*, NDCFMT+8, NDCFMT+9, NDCFMT+11*, NDCFMT+12*, NDCFMT+16 |
| S2 | NDCFMT+1~, NDCFMT+7*, NDCFMT+8, NDCFMT+9, NDCFMT+13*, NDCFMT+16 |
| S3 | NDCFMT+1~, NDCFMT+7*, NDCFMT+8, NDCFMT+9, NDCFMT+14*, NDCFMT+16 |
| SITE | SAVNDC~, SAVNDC+10, SAVNDC+12, SAVNDC+16, GETNDC~ |
| STR | CHKCH~, CHKCH+2, CHKCH+3 |
| X | SAVNDC+5~, SAVNDC+12* |
| Y | SAVNDC+5~, SAVNDC+13! |