Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSO7P529

Package: Outpatient Pharmacy

Routine: PSO7P529


Information

PSO7P529 ;ALB/BI - DEA INITIAL IMPORT ;5/5/21 06:52

Source Information

Source file <PSO7P529.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 5 POSTAL^XIPUTIL  ($$FMADD,$$FMTE,$$NOW)^XLFDT  DECODE^XLFJSON  ($$LJ,$$UP)^XLFSTR  BMES^XPDUTL  
VA FileMan 2 (FILE,UPDATE)^DIE  ($$GET1,GETS)^DIQ  
MailMan 1 ^XMD  
Outpatient Pharmacy 1 ($$DETOXCHK,$$DETOXDUP)^PSODEAUT  
Web Services Client 1 ($$GET,$$GETREST)^XOBWLIB  

Entry Points

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

External References

Name Field # of Occurrence
FILE^DIE DEAFILE+72
UPDATE^DIE DEAFILE+68, NPFILE+6
$$GET1^DIQ INITLOAD+10, DEAFILE+12
GETS^DIQ LOG+2, DEAFILE+35
$$DETOXCHK^PSODEAUT DEAFILE+9, DEAFILE+13, DEAFILE+14
$$DETOXDUP^PSODEAUT DEAFILE+16
POSTAL^XIPUTIL DEAFILE+29
$$FMADD^XLFDT INITXTMP+3
$$FMTE^XLFDT TMPMSG+6
$$NOW^XLFDT INITXTMP+2
DECODE^XLFJSON GET+23
$$LJ^XLFSTR TMPMSG+13, TMPMSG+21, TMPMSG+22, TMPMSG+26, TMPMSG+29, TMPMSG+30, TMPMSG+33, TMPMSG+34, TMPMSG+35, TMPMSG+37
TMPMSG+39
$$UP^XLFSTR DEAFILE+3
^XMD TMPMSG+49
$$GET^XOBWLIB GET+11
$$GETREST^XOBWLIB GET+8
BMES^XPDUTL INITLOAD+11, INITLOAD+23, INITLOAD+24, INITLOAD+25, INITLOAD+26

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J INITLOAD+5*, INITLOAD+21!
^VA(200 - [#200] INITLOAD+7, INITLOAD+9
^XTMP( INITLOAD+2!, LOG+4*, LOG+5*, LOG+6*, LOG+7*, INITXTMP+5*, TMPMSG+5!, TMPMSG+10, TMPMSG+11, TMPMSG+15*
TMPMSG+19*, TMPMSG+21*, TMPMSG+22*, TMPMSG+26*, TMPMSG+29*, TMPMSG+30*, TMPMSG+33*, TMPMSG+34*, TMPMSG+35*, TMPMSG+37*
TMPMSG+41*, TMPMSG+42*, TMPMSG+48*
^XTMP("PSODEAWB" TMPMSG+3
^XTMP("PSODEAWB-" INITLOAD+2
^XTMP("PSOXMD" TMPMSG+5
^XTV(8991.9 - [#8991.9] INITLOAD+18
^XUSEC("PSDMGR" TMPMSG+7

Label References

Name Line Occurrences
$$DEAFILE INITLOAD+19
$$GET INITLOAD+12
$$INITXTMP INITLOAD+4, TMPMSG+4
LOG INITLOAD+14, INITLOAD+15, INITLOAD+16, INITLOAD+17, INITLOAD+18, INITLOAD+19, INITLOAD+20, DEAFILE+13, DEAFILE+14, DEAFILE+16
, DEAFILE+52, DEAFILE+61
NPFILE INITLOAD+20
TMPMSG INITLOAD+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BAC DEAFILE+2~, DEAFILE+8*, DEAFILE+9, DEAFILE+13, DEAFILE+14
BEGDT INITXTMP+1~, INITXTMP+2*, INITXTMP+3, INITXTMP+4, INITXTMP+5
CMPDETOX DEAFILE+15~*, DEAFILE+16
CNT LOG+1~, LOG+4*, LOG+5, LOG+6, LOG+7, TMPMSG+1~, TMPMSG+10*, TMPMSG+11, TMPMSG+12
DATA GET+1~, GET+16*
DEA INITLOAD+1~, INITLOAD+6*, INITLOAD+7*, INITLOAD+9, INITLOAD+11, INITLOAD+12, INITLOAD+18, INITLOAD+19, INITLOAD+20, GET~
, GET+2, GET+5, DEAFILE~, DEAFILE+6, DEAFILE+9, DEAFILE+14, DEAFILE+16, NPFILE~, NPFILE+3
DEAIEN INITLOAD+1~, INITLOAD+19!, INITLOAD+20, DEAFILE~, DEAFILE+5, DEAFILE+70*, DEAFILE+71, DEAFILE+72, NPFILE~, NPFILE+2
, NPFILE+5
DEAWORK TMPMSG+9~, TMPMSG+12, TMPMSG+45*
DIFROM TMPMSG+49~!
DS DEAFILE+3~*, DEAFILE+52, DEAFILE+55, DEAFILE+56, DEAFILE+57, DEAFILE+58, DEAFILE+59, DEAFILE+60, DEAFILE+61
DT TMPMSG+6
DUPDXDEA DEAFILE+2~, DEAFILE+16
DUZ DEAFILE+72, TMPMSG+49
ED DEAFILE+2~
ERRCODE INITLOAD+8~, INITLOAD+13*, INITLOAD+14, INITLOAD+15
ERRORS GET+1~
EXREAS TMPMSG+1~, TMPMSG+13*, TMPMSG+14, TMPMSG+15, TMPMSG+16, TMPMSG+39*, TMPMSG+40, TMPMSG+41, TMPMSG+42
EXREAS1 TMPMSG+14~*, TMPMSG+15, TMPMSG+16, TMPMSG+40~*, TMPMSG+41, TMPMSG+42
FDA DEAFILE+2~, NPFILE+1~
FDA(1 DEAFILE+6*, DEAFILE+7*, DEAFILE+9*, DEAFILE+15, DEAFILE+17*, DEAFILE+19*, DEAFILE+20*, DEAFILE+21*, DEAFILE+22*, DEAFILE+23*
, DEAFILE+24*, DEAFILE+25*, DEAFILE+26*, DEAFILE+31*, DEAFILE+33*, DEAFILE+46*, DEAFILE+47*, DEAFILE+48*, DEAFILE+49*, DEAFILE+50*
, DEAFILE+51*, DEAFILE+55*, DEAFILE+56*, DEAFILE+57*, DEAFILE+58*, DEAFILE+59*, DEAFILE+60*, DEAFILE+63*, DEAFILE+66*, NPFILE+3*
, NPFILE+4*, NPFILE+5*
FDA(2 DEAFILE+72*
FG INITLOAD+1~, INITLOAD+8~, INITLOAD+12, INITLOAD+14, INITLOAD+15, INITLOAD+16, INITLOAD+17, INITLOAD+18, INITLOAD+19, INITLOAD+20
, GET~, LOG~, LOG+6, DEAFILE~, DEAFILE+13, DEAFILE+14, DEAFILE+16, DEAFILE+52, DEAFILE+61
FG("additionalCompanyInfo" DEAFILE+23
FG("address1" DEAFILE+24
FG("address2" DEAFILE+25
FG("businessActivityCode" INITLOAD+17, DEAFILE+7, DEAFILE+8
FG("businessActivitySubcode" GET+26*, DEAFILE+7, DEAFILE+8
FG("city" DEAFILE+26
FG("drugSchedule" DEAFILE+3
FG("expirationDate" DEAFILE+19
FG("name" INITLOAD+16, DEAFILE+22
FG("zipCode" DEAFILE+29, DEAFILE+33
FILERR INITLOAD+8~, INITLOAD+20, NPFILE~, NPFILE+7*
FLD LOG+1~
IENROOT DEAFILE+2~, NPFILE+1~
IENROOT(1 DEAFILE+70
IENS LOG+1~, LOG+3*, LOG+6, DEAFILE+2~, DEAFILE+5*, DEAFILE+6, DEAFILE+7, DEAFILE+9, DEAFILE+15, DEAFILE+17
, DEAFILE+19, DEAFILE+20, DEAFILE+21, DEAFILE+22, DEAFILE+23, DEAFILE+24, DEAFILE+25, DEAFILE+26, DEAFILE+31, DEAFILE+33
, DEAFILE+46, DEAFILE+47, DEAFILE+48, DEAFILE+49, DEAFILE+50, DEAFILE+51, DEAFILE+55, DEAFILE+56, DEAFILE+57, DEAFILE+58
, DEAFILE+59, DEAFILE+60, DEAFILE+63, DEAFILE+66, DEAFILE+70
LIFE INITLOAD~, INITLOAD+3*, INITLOAD+4, INITXTMP~, INITXTMP+3, TMPMSG+4
MSGROOT DEAFILE+2~, DEAFILE+69, NPFILE+1~, NPFILE+7
MSGROOT("DIERR" DEAFILE+69, NPFILE+7
NAMESPC INITXTMP~, INITXTMP+4*, INITXTMP+5, INITXTMP+6
NPDATA INITLOAD+1~
NPDETOX DEAFILE+2~, DEAFILE+12*, DEAFILE+13, DEAFILE+14
NPIEN INITLOAD+1~, INITLOAD+9*, INITLOAD+10, INITLOAD+14, INITLOAD+15, INITLOAD+16, INITLOAD+17, INITLOAD+18, INITLOAD+19, INITLOAD+20
, LOG~, LOG+2, LOG+5, DEAFILE~, DEAFILE+12, DEAFILE+13, DEAFILE+14, DEAFILE+16, DEAFILE+35, DEAFILE+37
, DEAFILE+38, DEAFILE+39, DEAFILE+40, DEAFILE+41, DEAFILE+42, DEAFILE+43, DEAFILE+46, DEAFILE+47, DEAFILE+48, DEAFILE+49
, DEAFILE+50, DEAFILE+51, DEAFILE+52, DEAFILE+61, NPFILE~, NPFILE+2, NPFILE+3, NPFILE+4, NPFILE+5, TMPMSG+7*
NPNAME INITLOAD+1~, INITLOAD+10*, INITLOAD+11, INITLOAD+16
OBJ TMPMSG+1~, TMPMSG+11!*
OBJ("Exception" TMPMSG+13, TMPMSG+39
OBJ("LOCAL" TMPMSG+12, TMPMSG+21, TMPMSG+22, TMPMSG+24, TMPMSG+29, TMPMSG+30, TMPMSG+33, TMPMSG+34, TMPMSG+35, TMPMSG+37
TMPMSG+45
OBJ("WS" TMPMSG+24, TMPMSG+26
PATH GET+1~
PHANDLE INITLOAD+1~, INITLOAD+4*, INITLOAD+14, INITLOAD+15, INITLOAD+16, INITLOAD+17, INITLOAD+18, INITLOAD+19, INITLOAD+20, LOG~
, LOG+4, LOG+5, LOG+6, LOG+7, DEAFILE~, DEAFILE+13, DEAFILE+14, DEAFILE+16, DEAFILE+52, DEAFILE+61
TMPMSG+1~, TMPMSG+3*, TMPMSG+10, TMPMSG+11
PSOCNT TMPMSG+1~, TMPMSG+8*, TMPMSG+15*, TMPMSG+16*, TMPMSG+17*, TMPMSG+19, TMPMSG+20*, TMPMSG+21, TMPMSG+22, TMPMSG+25*
TMPMSG+26, TMPMSG+28*, TMPMSG+29, TMPMSG+30, TMPMSG+32*, TMPMSG+33, TMPMSG+34, TMPMSG+35, TMPMSG+37*, TMPMSG+41*
TMPMSG+42*, TMPMSG+44*, TMPMSG+47*, TMPMSG+48
PSODASH TMPMSG+1~, TMPMSG+2*, TMPMSG+19, TMPMSG+48
PSOERR GET+1~, GET+11
PSOLDHNDL INITLOAD+1~, INITLOAD+2*
PSOLDXMD TMPMSG+1~, TMPMSG+5*
PSOTEXT TMPMSG+8!, TMPMSG+50!
PSOTEXT( TMPMSG+16*
PSOXMD TMPMSG+1~, TMPMSG+4*, TMPMSG+15, TMPMSG+19, TMPMSG+21, TMPMSG+22, TMPMSG+26, TMPMSG+29, TMPMSG+30, TMPMSG+33
TMPMSG+34, TMPMSG+35, TMPMSG+37, TMPMSG+41, TMPMSG+42, TMPMSG+48, TMPMSG+49
PURGDT INITXTMP+1~, INITXTMP+3*, INITXTMP+5
REASON LOG~, LOG+7
REQUEST GET+1~, GET+8*, GET+11
RESOURCE GET+1~, GET+5*, GET+11
RESPJSON GET+1~, GET+17*, GET+18*, GET+19*, GET+20
RESPONSE GET+1~, GET+15*
SC INITLOAD+12*, INITLOAD+13, INITLOAD+14, INITLOAD+15, INITLOAD+19*, GET+1~, GET+11*, GET+12, DEAFILE+2~, DEAFILE+4*
, DEAFILE+69*, DEAFILE+71*, DEAFILE+73
SCH200 DEAFILE+2~
SCH200(200 DEAFILE+37, DEAFILE+38, DEAFILE+39, DEAFILE+40, DEAFILE+41, DEAFILE+42, DEAFILE+43, DEAFILE+46, DEAFILE+47, DEAFILE+48
, DEAFILE+49, DEAFILE+50, DEAFILE+51
SCH200ST DEAFILE+2~, DEAFILE+36*, DEAFILE+38*, DEAFILE+39*, DEAFILE+40*, DEAFILE+41*, DEAFILE+42*, DEAFILE+43*, DEAFILE+52, DEAFILE+61
SCHCNT DEAFILE+2~, DEAFILE+37*, DEAFILE+45, DEAFILE+54
SCHFLD DEAFILE+2~, DEAFILE+37*
SERVER GET+1~, GET+3*, GET+8
SERVICE GET+1~, GET+4*, GET+8
TITLE INITXTMP~, INITXTMP+5
TR LOG+1~
TR(200 LOG+3, LOG+6
XIP DEAFILE+2~, DEAFILE+29
XIP("STATE" DEAFILE+30
XMDUZ TMPMSG+1~, TMPMSG+6*
XMSUB TMPMSG+1~, TMPMSG+6*
XMTEXT TMPMSG+49*, TMPMSG+50!
XMY TMPMSG+7!
XMY( TMPMSG+7*, TMPMSG+49*
XSTATE DEAFILE+2~, DEAFILE+30*, DEAFILE+31
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All