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 |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All
Print Page as PDF
Routine: MBAAMDAL

Package: Mobile Scheduling Applications Suite

Routine: MBAAMDAL


Information

MBAAMDAL ;OIT-PD/VSL - FILE ACCESS DAL ;02/10/2016

Source Information

Source file <MBAAMDAL.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 LIST^DIC  GETS^DIQ  
Kernel 1 $$FMADD^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Mobile Scheduling Applications Suite 3 MBAAMDA1  MBAAMDA2  MBAAMDA3  

Entry Points

Name Comments DBIA/ICR reference
SCREEN(SD) ;
; SCREEN will either be I Y=SD (FileMan format)
; or I $P(Y,".")=SD
; or I Y>(TODAY - 1 second) (FileMan Format)
GETREC(RETURN,IFN,FILE,FLDS,SFILES,INT,EXT,REZ,SD) ;
; Input Variables
; RETURN - RETURN results passed by reference
; IFN - Internal Entry Number to the Files passed in (File 2 or File 44)
; FILE - File #
; FLDS = Array of FLDS
; SFILES - Array of Sub-files
; INT - Internal values returned
; EXT - External values returned
; REZ - Resolve field names instead of those peck numbers
; SD - Date.Time if you only want one appointment in particular
; Date if you want all appointment on a give date
; or nothing if you want all appointments from today forward
GETRECA ;MBAA*1*7;will use SCREEN to get only the data that is needed from sub-file 2.98
; The orignal code pulled every appointment the patient ever had by doing one inquiry on the patient file.
; It returned so many that it had to store in a global and then parse the global to return everything > than yesterday
; and then potentially further parse when it gets back to calling routine which may have only wanted one to cancel
; Instead of one DIQ call on the patient, it has been changed to a LIST^DIC call using a SCREEN on the sub-file which gets just what you want.
GETSREC(RETURN,REC,SFILE,SFLD,FLAG) ; Get record subfile data Called by RPC MBAA APPOINTMENT MAKE, MBAA RPC: MBAA CANCEL APPOINTMENT, MBAA PATIENT PENDING APPT

External References

Name Field # of Occurrence
LIST^DIC GETRECA+17
GETS^DIQ GETREC+29, GETRECA+32
$$FMADD^XLFDT SCREEN+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
2.98 GETS^DIQ,  LIST^DIC

Label References

Name Line Occurrences
$$SCREEN GETRECA+15
GETRECA GETREC+31
GETSREC GETREC+41

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APT GETRECA+14~, GETRECA+31!, GETRECA+33
C GETREC+15~
DT SCREEN+6
ERROR GETRECA+14~
EXT GETREC~, GETREC+26
FILE GETREC~, GETREC+29, GETREC+33, GETREC+34, GETREC+35, GETREC+36, GETREC+42!
FLAG GETREC+15~, GETREC+24*, GETREC+25*, GETREC+26*, GETREC+27*, GETREC+29, GETREC+34, GETREC+35, GETREC+36, GETREC+40
, GETREC+41, GETREC+42!, GETSREC~, GETSREC+5, GETSREC+6, GETSREC+7, GETRECA+32
FLD GETREC+15~, GETREC+24*, GETREC+33*, GETREC+34, GETREC+35, GETREC+36, GETSREC+1*, GETSREC+3*, GETSREC+5, GETSREC+6
, GETSREC+7, GETSREC+9, GETSREC+10
FLDS GETREC~
FLDS( GETREC+18
ID GETSREC+1~, GETSREC+4*, GETSREC+5, GETSREC+6, GETSREC+7, GETSREC+10
IDX GETSREC+1~*, GETSREC+2*, GETSREC+3, GETSREC+4, GETSREC+5, GETSREC+6, GETSREC+7, GETSREC+9, GETSREC+10
IENS GETRECA+14~, GETRECA+16*, GETRECA+17, GETRECA+30*, GETRECA+32
IFLD GETREC+15~, GETREC+17*, GETREC+18*
IFN GETREC~, GETREC+29, GETREC+33, GETREC+34, GETREC+35, GETREC+36, GETRECA+16, GETRECA+30
INT GETREC~, GETREC+25
LP GETRECA+14~, GETRECA+29*, GETRECA+30
REC GETREC+15~, GETREC+41, GETSREC~, GETRECA+33*
REC( GETREC+33, GETREC+34, GETREC+35, GETREC+36, GETSREC+2, GETSREC+3, GETSREC+5, GETSREC+6, GETSREC+7, GETSREC+9
, GETSREC+10
RETURN GETREC~, GETREC+41, GETSREC~
RETURN( GETREC+34*, GETREC+35*, GETREC+36*, GETSREC+5*, GETSREC+6*, GETSREC+7*, GETSREC+10*
REZ GETREC~, GETREC+27
SCREEN GETRECA+14~, GETRECA+15*, GETRECA+17
SD GETREC~, GETRECA+15, SCREEN~, SCREEN+4, SCREEN+5
SFILE GETREC+15~, GETREC+19*, GETREC+22*, GETREC+38*, GETREC+39*, GETREC+40, GETREC+41, GETSREC~, GETSREC+2, GETSREC+3
, GETSREC+5, GETSREC+6, GETSREC+7, GETSREC+9, GETSREC+10
SFILES GETREC~
SFILES( GETREC+22, GETREC+39, GETREC+40, GETREC+41
SFILES(1900 GETREC+31
SFLD GETSREC~, GETSREC+5, GETSREC+6, GETSREC+7, GETSREC+10
SFLDN GETREC+15~, GETREC+40*, GETREC+41
SI GETSREC+8~*, GETSREC+9*, GETSREC+10
SKIPSF GETREC+15~
STRF GETREC+15~, GETREC+16*, GETREC+18*, GETREC+22*, GETREC+29, GETREC+42!
TARGET GETRECA+14~
TARGET("DILIST" GETRECA+26, GETRECA+29, GETRECA+30
U GETREC+36, GETSREC+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All