Beispiel #1
0
 void executePrivate( )
 {
     /* GeneXus formulas */
     /* Output device settings */
     AV20Options       = (GxSimpleCollection <String>)(new GxSimpleCollection <String>());
     AV23OptionsDesc   = (GxSimpleCollection <String>)(new GxSimpleCollection <String>());
     AV25OptionIndexes = (GxSimpleCollection <String>)(new GxSimpleCollection <String>());
     GXt_boolean1      = AV8IsAuthorized;
     new GeneXus.Programs.wwpbaseobjects.secisauthbyfunctionalitykey(context).execute("Check_Encounter", out GXt_boolean1);
     AV8IsAuthorized = GXt_boolean1;
     if (AV8IsAuthorized)
     {
         new GeneXus.Programs.wwpbaseobjects.loadwwpcontext(context).execute(out AV9WWPContext);
         /* Execute user subroutine: 'LOADGRIDSTATE' */
         S111();
         if (returnInSub)
         {
             this.cleanup();
             if (true)
             {
                 return;
             }
         }
         if (StringUtil.StrCmp(StringUtil.Upper(AV17DDOName), "DDO_BR_ENCOUNTER_DEPARTMENTADM") == 0)
         {
             /* Execute user subroutine: 'LOADBR_ENCOUNTER_DEPARTMENTADMOPTIONS' */
             S121();
             if (returnInSub)
             {
                 this.cleanup();
                 if (true)
                 {
                     return;
                 }
             }
         }
         else if (StringUtil.StrCmp(StringUtil.Upper(AV17DDOName), "DDO_BR_ENCOUNTER_DEPARTMENTDISCH") == 0)
         {
             /* Execute user subroutine: 'LOADBR_ENCOUNTER_DEPARTMENTDISCHOPTIONS' */
             S131();
             if (returnInSub)
             {
                 this.cleanup();
                 if (true)
                 {
                     return;
                 }
             }
         }
     }
     AV21OptionsJson       = AV20Options.ToJSonString(false);
     AV24OptionsDescJson   = AV23OptionsDesc.ToJSonString(false);
     AV26OptionIndexesJson = AV25OptionIndexes.ToJSonString(false);
     this.cleanup();
 }
Beispiel #2
0
 protected void S131( )
 {
     /* 'LOADBR_ENCOUNTER_DEPARTMENTDISCHOPTIONS' Routine */
     AV13TFBR_Encounter_Departmentdisch     = AV15SearchTxt;
     AV14TFBR_Encounter_Departmentdisch_Sel = "";
     pr_default.dynParam(1, new Object[] { new Object[] {
                                               AV33BR_EncounterID,
                                               AV12TFBR_Encounter_Departmentadm_Sel,
                                               AV11TFBR_Encounter_Departmentadm,
                                               AV14TFBR_Encounter_Departmentdisch_Sel,
                                               AV13TFBR_Encounter_Departmentdisch,
                                               A19BR_EncounterID,
                                               A570BR_Encounter_Departmentadm,
                                               A572BR_Encounter_Departmentdisch,
                                               A360BAS_TenantTenantCode,
                                               AV35tCurrentCode,
                                               AV34BR_Information_ID,
                                               A85BR_Information_ID
                                           },
                                           new int[] {
                                               TypeConstants.STRING, TypeConstants.STRING, TypeConstants.STRING, TypeConstants.STRING, TypeConstants.STRING, TypeConstants.LONG, TypeConstants.STRING, TypeConstants.BOOLEAN, TypeConstants.STRING, TypeConstants.BOOLEAN,
                                               TypeConstants.STRING, TypeConstants.BOOLEAN, TypeConstants.STRING, TypeConstants.LONG, TypeConstants.LONG, TypeConstants.BOOLEAN
                                           } });
     lV33BR_EncounterID = StringUtil.Concat(StringUtil.RTrim(AV33BR_EncounterID), "%", "");
     lV11TFBR_Encounter_Departmentadm   = StringUtil.Concat(StringUtil.RTrim(AV11TFBR_Encounter_Departmentadm), "%", "");
     lV13TFBR_Encounter_Departmentdisch = StringUtil.Concat(StringUtil.RTrim(AV13TFBR_Encounter_Departmentdisch), "%", "");
     /* Using cursor P004R3 */
     pr_default.execute(1, new Object[] { AV34BR_Information_ID, AV35tCurrentCode, lV33BR_EncounterID, lV11TFBR_Encounter_Departmentadm, AV12TFBR_Encounter_Departmentadm_Sel, lV13TFBR_Encounter_Departmentdisch, AV14TFBR_Encounter_Departmentdisch_Sel });
     while ((pr_default.getStatus(1) != 101))
     {
         BRK4R4 = false;
         A85BR_Information_ID             = P004R3_A85BR_Information_ID[0];
         n85BR_Information_ID             = P004R3_n85BR_Information_ID[0];
         A360BAS_TenantTenantCode         = P004R3_A360BAS_TenantTenantCode[0];
         n360BAS_TenantTenantCode         = P004R3_n360BAS_TenantTenantCode[0];
         A572BR_Encounter_Departmentdisch = P004R3_A572BR_Encounter_Departmentdisch[0];
         n572BR_Encounter_Departmentdisch = P004R3_n572BR_Encounter_Departmentdisch[0];
         A570BR_Encounter_Departmentadm   = P004R3_A570BR_Encounter_Departmentadm[0];
         n570BR_Encounter_Departmentadm   = P004R3_n570BR_Encounter_Departmentadm[0];
         A19BR_EncounterID = P004R3_A19BR_EncounterID[0];
         AV27count         = 0;
         while ((pr_default.getStatus(1) != 101) && (P004R3_A85BR_Information_ID[0] == A85BR_Information_ID) && (StringUtil.StrCmp(P004R3_A572BR_Encounter_Departmentdisch[0], A572BR_Encounter_Departmentdisch) == 0))
         {
             BRK4R4            = false;
             A19BR_EncounterID = P004R3_A19BR_EncounterID[0];
             AV27count         = (long)(AV27count + 1);
             BRK4R4            = true;
             pr_default.readNext(1);
         }
         if (!String.IsNullOrEmpty(StringUtil.RTrim(A572BR_Encounter_Departmentdisch)))
         {
             AV19Option = A572BR_Encounter_Departmentdisch;
             AV20Options.Add(AV19Option, 0);
             AV25OptionIndexes.Add(StringUtil.Trim(context.localUtil.Format((decimal)(AV27count), "Z,ZZZ,ZZZ,ZZ9")), 0);
         }
         if (AV20Options.Count == 50)
         {
             /* Exit For each command. Update data (if necessary), close cursors & exit. */
             if (true)
             {
                 break;
             }
         }
         if (!BRK4R4)
         {
             BRK4R4 = true;
             pr_default.readNext(1);
         }
     }
     pr_default.close(1);
 }