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 |  Interaction Calls
Print Page as PDF
Routine: DGPTFJ

Package: Registration

Routine: DGPTFJ


Information

DGPTFJ ;ALB/MRL - JUMP BETWEEN PTF SCREENS ; 12/12/06 9:04am

Source Information

Source file <DGPTFJ.m>

Entry Points

Name Comments DBIA/ICR reference
TEST
HELP
QUES
Q
PROG ;
1 ;;WR^DGPTF1;'101' Screen--Admission/disposition Transaction
5 ;;EN^DGPTFM4;'501' Screen--Patient movement transaction
4 ;;EN^DGPTFM5;'401' Screen--Surgical/procedure entry
6 ;;E^DGPTFM1;'601' Screen--Procedure entry (AVAILABLE FOR DISCHARGES AFTER 10/1/87)
7 ;;EN1^DGPTF4;'701' Screen--PDXLS/DRG print
8 ;;F^DGPTFM2;'801' Screen--CPT entry (CPT and HCPCS)
M ;;^DGPTFM;'MAS' screen--surgery/procedure/diagnosis code edits
C ;;EN^DGPTFM7;'MPCR' screen--displays MPCR information
SA ;called from input transform on SOURCE OF ADMISSION field (#20) PTF file (#45)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** Undefined screen number. Valid screens are: ",!
  • Line Location: TEST+1
Function Call: WRITE
  • Prompt: !!,"PTF Screens are: ",!
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !?5,I,?10,$P(T,";",4)
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !!,"Press Return to continue: "
  • Line Location: QUES+0
Info |  Source |  Entry Points |  Interaction Calls