Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSOEPUT

Package: Outpatient Pharmacy

Routine: PSOEPUT


Information

PSOEPUT ;ALB/BI - DEA Manual Entry ;10/30/23 13:02

Source Information

Source file <PSOEPUT.m>

Entry Points

Name Comments DBIA/ICR reference
DEALIST(RET,NPIEN)
DEADOJ(RET,DEA)
DEAREM(RET,NPIEN,DEATXT)
VIEWFM(RET,DEA)
FILEWS(RET,ARRAY)
DEACOPY(FG) ; -- Private Subroutine to Copy import data in the GETS Array
; POSTAL^XIPUTL used in agreement with Integration Agreement: 3618
FILEFM(RET,DATA,NPIEN)
NPFILE(DNDEATXT,NPIEN,DNDEAIEN,SUFFIX) ; -- File the DEA NUMBER in the NEW PERSON FILE #200.
NPSFILE(NPIEN,DATA) ; -- File the DEA institutional schedules in the NEW PERSON FILE #200.
PROVTYPE(BA)
CONVNAME(CN)
GETS(DEAIEN,GETS)
DEANUM(X) ; -- Check DEA # part
DEANUMFL(X) ;Check DEA # First Letter Part
DEANUMF2(X) ;Check DEA # First Letter Part
DUPCHK(RET,DEATXT,SUFFIX)
DETOXCHK(BAC)
MBM(RET) ; -- MEDS BY MAIL for ePCS GUI
ENTRY(RESULT,INPUT) ; -- remoteprocedure
RECORD(LINE,NOW) ;
CLEARDTX(NPIEN)
GETDNDTX(NPIEN)
WSGET(FG,DEA) ; Function to Get the Remote DEA information, Return in FG.
; INPUT: DEA ;Properly formatted DEA Number for lookup.

Used in RPC

RPC Name Call Tags
PSO EPCS ADD DEA FILEFM
PSO EPCS DEADOJ DEADOJ
PSO EPCS MBM MBM
PSO EPCS REMOVE DEA DEAREM
PSO EPCS DEA DUP CHECK DUPCHK
PSO EPCS DEALIST DEALIST

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls,  GET1^DIQ,  GETS^DIQ
200.5321 GET1^DIQ,  GETS^DIQ
^PS(59.7 - [#59.7] GET1^DIQ
^XTV(8991.8 - [#8991.8] GET1^DIQ
^XTV(8991.9 - [#8991.9] GET1^DIQ,  GETS^DIQ
Info |  Source |  Entry Points |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call