PSO7P529 ;ALB/BI - DEA INITIAL IMPORT ;5/5/21 06:52
Source file <PSO7P529.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INITLOAD(LIFE) | ; -- main entry point for DEA INITIAL IMPORT
|
|
| GET(FG,DEA) | ; Function to Get the Remote DEA information, Return in FG.
|
|
| LOG(FG,NPIEN,PHANDLE,REASON) | ; -- Log import issues
|
|
| DEAFILE(DEA,NPIEN,PHANDLE,FG,DEAIEN) | ; -- File the import data in DEA NUMBERS FILE #8991.9
; POSTAL^XIPUTL used in agreement with Integration Agreement: 3618 |
|
| NPFILE(DEA,NPIEN,DEAIEN,FILERR) | ; -- File the DEA NUMBER in the NEW PERSON FILE #200.
|
|
| INITXTMP(NAMESPC,TITLE,LIFE) | ||
| TMPMSG |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ, GETS^DIQ |
